kalkulator VB
TUGAS VB 2 YAYAN NURYANA NPM:43A87067100022 D3\KA\3\M LANGKAH – LANGKAH MEMBUAT PROGRAM KALKULATOR Dim st, st2 As String Private Sub Text1_Click() st = "T" st2 = "f" End Sub Private Sub Text2_Click() st = "f" st2 = "T" End Sub 1. Private Sub Command1_Click() If st = "T" Then Text1.Text = 1 Else If st2 = "T" Then Text2.Text = 1 End If End If End Sub 2. Private Sub Command2_Click() If st = "T" Then Text1.Text = 2 Else If st2 = "T" Then Text2.Text = 2 End If End If End Sub 3. Private Sub Command3_Click() If st = "T" Then Text1.Text = 3 Else If st2 = "T" Then Text2.Text = 3 End If End If End Sub 4. Private Sub Command4_Click() If st = "T" Then Text1.Text = 4 Else If st2 = "T" Then Text2.Text = 4 End If End If End Sub 5. Private Sub Comman...