by Hafeez Ullah Arain faith college of information technology hyderabad. (1 Submission)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Wed 10th July 2002
Date Added: Mon 8th February 2021
Rating: (1 Votes)
randomly changing the form caption ,label caption ,label tooltip text and label bckcolor.
API Declarations
Dim i As Integer
Label1.Caption = ""
Label1.Width = Me.Width
End Sub
Private Sub Timer1_Timer()
Label1.BackColor = QBColor(Rnd() * 15)
arr(0) = "Faith "
arr(1) = " College "
arr(2) = " Of"
arr(3) = "Information "
arr(4) = " Technology"
arr(5) = " This Programe Made By"
arr(6) = " Hafeez Ullah Arain"
If i = 6 Then
Label1.Caption = arr(6)
Me.Caption = arr(6)
i = 0
Else
Label1.Caption = arr(i)
Me.Caption = arr(i)
Label1.ToolTipText = arr(i)
i = i + 1
End If
End Sub
No comments have been posted about randomly changing the form caption ,label caption ,label tooltip text and label bckcolor.. Why not be the first to post a comment about randomly changing the form caption ,label caption ,label tooltip text and label bckcolor..