VB Generator Sinkron Berbeban

Private Sub Command1_Click()

Label1.Caption = Int(Text1.Text) + (Int(Text2.Text) * (Int(Text3.Text) + Int(Text4.Text)))

End Sub

Private Sub Command2_Click()

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

Text4.Text = ""

Label1.Caption = ""

End Sub

Private Sub Command3_Click()

End

End Sub