1. Buka aplikasi V.B 6.0
2. Pilihlah program standar.exe seperti pada gambar dibawah ini
3. Maka akan muncul sebuah form seperti gambar dibawah
4. Lalu mulailah membuat label, textbox, dan command button dan akan menjadi seperti dibawah ini
· Text2.Text = Clear
· Label5.Caption = Clear
· Label6.Caption = Clear
· End Sub
(berfungsi untuk menghapus input)
6. Coding yang ke-2
· Private Sub Command2_Click()
· Dim x As Integer
· Dim y As Integer
· x = Text1.Text
· y = Text2.Text
· Label5.Caption = (x + y) / 2
· If Label5.Caption >= 70 Then Label6 = "LULUS"
· If Label5.Caption < 70 Then Label6 = "GAGAL"
· End Sub
(berfungsi untuk menampilkan hasil dari input)
7. Dan coding yang terahir
· Private Sub Command3_Click()
· End
· End Sub
(berfungsi untuk mengakhiri program)
dan ketika di runing, yang akan keluar adalah form sperti dibawah ini :
5. Mulailah memasukan codingnya, yang pertama
· Private Sub Command1_Click()
· Text1.Text = Clear
0 komentar:
Post a Comment