VB .NET
Slip3
Q.1) Write a Vb.Net program to move the Text “Dr D Y Patil College” continuously from Left to Right. [Marks 20]
Solution
Public Class Slip3
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If Label1.Left > 500 Then
Label1.Left = 20
End If
Label1.Left = Label1.Left + 15
End Sub
End Class
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If Label1.Left > 500 Then
Label1.Left = 20
End If
Label1.Left = Label1.Left + 15
End Sub
End Class
Tags:
VB .NET