by Shaidul Islam Prince (1 Submission)
Category: Databases/Data Access/DAO/ADO
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Wed 16th March 2005
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Design a vb form in which there will be a moving text
If Option1 = True Then
Form2.Show
End If
If Option2 = True Then
Form3.Show
End If
If Option3 = True Then
Form4.Show
End If
Unload Me
End Sub
Private Sub Command2_Click()
Form8.Show
Unload Me
End Sub
Private Sub Form_Load()
Label3.Caption = Date
tx = ScaleWidth
ty = ScaleHeight / 44
End Sub
Private Sub open_Click()
Form9.Show
Unload Me
End Sub
Private Sub Timer1_Timer()
ForeColor = BackColor
FontSize = 12
FontName = "Arial Bold"
CurrentX = tx + 10
CurrentY = ty
Print "This form is Designed by Shaidul Islam Prince for VB Code.com."
ForeColor = QBColor(1)
CurrentX = tx
CurrentY = ty
Print "This form is Designed by Shaidul Islam Prince for VB Code.com."
tx = tx - 10
End Sub