by Bhuwan Chand Joshi (69 Submissions)
Category: Graphics
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Fri 3rd August 2001
Date Added: Mon 8th February 2021
Rating:
(1 Votes)
Make a Magic. Put a command button Over the form and Type the code written below and Try to click command button during run time.
Form1.WindowState=vbNormal
End Sub
Private Sub Command1_Click()
MsgBox "Hello Iam Bhuwan",vbInformation
End Sub
Private Sub Command1_MouseMove(Button as Integer, Shift as Integer, X as Single, Y as Single)
Dim Left as Integer
Dim Top as Integer
Randomize
Left=Int((3000 * Rnd) + 1)
Top=Int((3000 * Rnd) + 1)
Command1.Move Left,Top
End Sub
No comments have been posted about Make a Magic. Put a command button Over the form and Type the code written below and Try to click c. Why not be the first to post a comment about Make a Magic. Put a command button Over the form and Type the code written below and Try to click c.