Program Perkalian dan Penjumlahan Metode Perulangan - Visual Basic 6

Program untuk membuat sebuah operasi perkalian (*) dan penjumlahan (+) yang tampil dikomponen listbox dengan menginputkan jumlah perulangan 

Program Perkalian dan Penjumlahan Metode Perulangan

Private Sub Command1_Click()
List1.Clear
Text3.Text = ""
bil1 = Val(Text1.Text)
bil2 = Val(Text2.Text)
Text3.Text = bil1 & " + " & bil2 & " = " & bil1 + bil2
For i = 0 To bil2
List1.AddItem bil1 & " + " & i & " = " & bil1 + i
Next
End Sub

Private Sub Command2_Click()
List1.Clear
Text3.Text = ""
bil1 = Val(Text1.Text)
bil2 = Val(Text2.Text)
Text3.Text = bil1 & " * " & bil2 & " = " & bil1 * bil2
For i = 0 To bil2
List1.AddItem bil1 & " * " & i & " = " & bil1 * i
Next
End Sub

Private Sub Command3_Click()
End
End Sub

Related Posts:

Tweet