Here is a simple program that I wrote using Microsoft Visual Basic NET to ask the user to give an amount in US Dollars and then it will convert into Philippine Peso equivalent. Let us assume that one US Dollar is equivalent to Php 45.50 in Philippine Pesos. The code is very easy to understand I started learning Visual Basic NET in my spare time.
Add me at Facebook my address is jakerpomperada@gmail.com and jakerpomperada@yahoo.com
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com
My mobile number here in the Philippines is 09173084360.

Program Listing

Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim compute_peso As Double
        compute_peso = (Val(TextBox1.Text) * 45.5)
        Label3.Text = "The Philippine Peso Rate is Php " & Format(compute_peso, "0.00")
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        TextBox1.Text = ""
        Label3.Text = ""
        TextBox1.Focus()
    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        Dim result As DialogResult = MessageBox.Show("Do you want to quit?", _
                               "Quit Program", _
                               MessageBoxButtons.YesNo)

        If (result = DialogResult.Yes) Then
            End
        Else
            TextBox1.Text = ""
            Label3.Text = ""
            TextBox1.Focus()
        End If
    End Sub
End Class

Leave a Reply

Your email address will not be published. Required fields are marked *