Punya Account Blogger?
Posted by Sofyan SOX on Sabtu, 24 April 2010 in
                                               Download | klik disini

Private Sub cmdlogout_Click()
  Me.txtlama.Text = ""
  Me.txttarif.Text = ""
  Me.txttotal.Text = ""
End Sub

Private Sub cmdshutdown_Click()
  MsgBox "Komputer akan Dimatikan "
  Unload Me
End Sub

Private Sub cmdtotal_Click()
  Me.txttotal.Text = Val(Me.txttarif.Text) * Val(Me.txtlama.Text)
End Sub

0 Responses to “Latihan 2 - Perkalian”:

Posting Komentar