beberapa contoh script pada visual basic

game tic tac tot=tic tac entot ini dia. Fungsi Tersembunyi ()

Shape1.Visible = Salah

Shape2.Visible = Salah

Shape3.Visible = Salah

Shape4.Visible = Salah

Shape5.Visible = Salah

Shape6.Visible = Salah

Shape7.Visible = Salah

Shape8.Visible = Salah

Shape9.Visible = Salah

M1 = Salah: M2 = Salah: M3 = Salah: M4 = Salah

M5 = Salah: M6 = Salah: M7 = Salah: M8 = Salah: M9 = Salah

H1 = Salah: H2 = Salah: H3 = Salah: H4 = Salah

H5 = Salah: H6 = Salah: H7 = Salah: H8 = Salah: H9 = Salah

Fungsi akhir


Private Sub Command1_Click ()

Tersembunyi

Point_Merah = 0

Point_Hitam = 0

End Sub


Private Sub Command2_Click ()

Akhir

End Sub