Here is a simple program that will ask the user to give two numbers and then our program will compute the difference between two numbers provided by our user.
I am currently accepting programming work kindly contact me in the following email address for further details. Thank you.
My mobile number here in the Philippines is 09173084360.
I am currently accepting programming work kindly contact me in the following email address for further details. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.
My mobile number here in the Philippines is 09173084360.
My telephone number at home here in Bacolod City, Negros Occidental is (034) 4335675.
Sample Program Output
Program Listing
Private Sub Command1_Click()
Dim solve As Integer
solve = Val(Text1.Text) - Val(Text2.Text)
Label3.Caption = "The difference between " & Text1.Text & _
" and " & Text2.Text & " is " & solve & "."
End Sub
Private Sub Command2_Click()
Label3.Caption = ""
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus
End Sub
Private Sub Command3_Click()
End
End Sub
No comments:
Post a Comment