Membuat Program Kalkulator Cinta menggunakan Microsoft Visual Basic 6.0
Membuat Program Kalkulator Cinta menggunakan Microsoft Visual Basic 6.0 1 Buka aplikasi Microsoft Visual Basic 6.0 pada PC/Laptop anda. 2. New Project. Pilih Standard EXE. Kemudian klik OPEN. 3. Buatlah Design program seperti dibawah ini : 4. Untuk coding lengkapnya adalah sebagai berikut : Private Sub Command1_Click() If Command1.Caption = "&Prosses" Then If Text1.Text = "" Then MsgBox "Anda Wajib Isikan Nama Anda", vbInformation, "" Text1.SetFocus Exit Sub End If If Text2.Text = "" Then MsgBox "Anda Wajib Mengisi Nama Pasangan Anda", vbInformation, "" Text2.SetFocus Exit Sub End If Command1.Caption = "&Reset" b = 0 Pasangan = UCase(Text1.Text & Text2.Text) For i = 1 To Len(Pasangan) ...