+- (wL) Forums (https://war-lords.net/forum)
+-- Forum: Resources (https://war-lords.net/forum/forum-31.html)
+--- Forum: Programming (https://war-lords.net/forum/forum-33.html)
+--- Thread: Random VB codes (/thread-5623.html)
Random VB codes - Dre@m$ - Dec 26 2011
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) _
Handles MyBase.Load
Me.MovingLabel1._MovingDirection = MovingLabel.Direction.RightToLeft
Me.MovingLabel1._MovingText = ArabicDate.GetFullDate
Me.MovingLabel1.StartMoving()
Me.MovingLabel2._MovingDirection = MovingLabel.Direction.LeftToRight
Me.MovingLabel2._MovingText = ArabicDate.GetFullDate
Me.MovingLabel2.StartMoving()
Me.MovingLabel3._MovingDirection = MovingLabel.Direction.TopToBottom
Me.MovingLabel3._MovingText = ArabicDate.GetFullDate
Me.MovingLabel3.StartMoving()
Me.MovingLabel4._MovingDirection = MovingLabel.Direction.BottomToTop
Me.MovingLabel4._MovingText = ArabicDate.GetFullDate
Me.MovingLabel4.StartMoving()
End Sub
End Class
RE: Random VB codes - Leaky - Dec 26 2011
this code is useless :/ you're missing all of the declarations and everything.