Program Tebak Perkalian dengan Visual Basic

Option Explicit Dim kali As Integer Dim angkaprob As Integer, angkabetul As Integer Private Sub command1_Click() Dim angka1 As Integer Dim angka2 As Integer Text1.Text = "" Label7.Caption = "" angkaprob = angkaprob + 1 angka1 = Int(Rnd * 10) + 1 angka2 = Int(Rnd * 10) + 1 Label1.Caption = Format(angka1, "#0") Label3.Caption = Format(angka2, "#0") kali...

Read More