Laman


I made this widget at MyFlashFetish.com.

Minggu, 16 Oktober 2011

Contoh Program Visual Basic

contoh program yang ditulis dalam bahasa Visual Basic :
Private Sub Command1_Click()
    Dim a, b As Integer
    a = txt1.Text
    b = txt2.Text
    txt3.Text = a + b
    txt4.Text = a / b
    txt5.Text = a - b
    txt6.Text = a * b
    txt7.Text = a ^ b
 End Sub

 Private Sub Command2_Click()
    txt1.Text = ""
    txt2.Text = ""
    txt3.Text = ""
    txt4.Text = ""
    txt5.Text = ""
    txt6.Text = ""
    txt7.Text = ""
 End Sub

 Private Sub Command3_Click()
    End

Tidak ada komentar:

Posting Komentar