অাজ অাপনােদর সােথ েছাট েগমস বানােনার েপ্রাগ্রাম েশয়ার করব। এর জন্য অামােদর দরকার হবে.vb6। প্রথেম একটি Form open করি। তিনটি কমান্ড বাটন নিব এবং দুইটি লেবেল নিব। কমান্ড বাটন১ ,৩ এর caption এ লিখব No,বাটন2 এ লিখব Yes. কমান্ড বাটন১ ,৩ এ নিচের কমান্ডগুলো লিখব। Level 1এর caption এ লিখব I AM FOOL?? এখন ....... করুন । মজা দেখুন, েকমন লাগল জানাবেন

* 3 command button

* 2 label

Now we start a little Game.

Code:

Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Me.Command1.Visible = False

Me.Command3.Visible = True

End Sub

Private Sub Command2_Click()

Label2.Visible = True

End Sub

Private Sub Command3_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Me.Command3.Visible = False

Me.Command1.Visible = True

End Sub

Private Sub Form_Load()

Me.Command3.Visible = False

Label2.Visible = False

End Sub

Enjoy this game. Pls comments.