A1 - 'Animated' spinning globe using only a label and a timer. (WebDings Required)

---

Using webdings, you can created a VERY rudamentary spinning globe. Please do not vote.

Original Author: [])utch[]v[]aster

Code

Const G1 As String = "??"
Const G2 As String = "?¢"
Const G3 As String = "?¥"
'Label needs to be WEBDINGS font, at a relatively large size.
'My Timer1.Interval is set to 150
Private Sub Timer1_Timer()
If Label1 = G1 Then
  Label1 = G2
ElseIf Label1 = G2 Then
  Label1 = G3
Else
  Label1 = G1
End If
End Sub


About this post

Posted: 2003-06-01
By: ArchiveBot
Viewed: 121 times

Categories

Visual Basic 6

Attachments

No attachments for this post

Comments

No comments have been added for this post.

You must be logged in to make a comment.