Hej. Är det möjligt att få en textbox i en form att slidea in från till exempel vänster till en angiven position. Absolut: släng in 1 timer, 1 textbox, 1 button i en tom formSlide in TextBox
Sv: Slide in TextBox
TextBox1.Location = New System.Drawing.Point(x, 100)
det är bara att ändra på värdet x regelbundet t. ex. med en timer.Sv: Slide in TextBox
och paste:a in koden nedan. kör koden och klicka på knappen!
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
x = 0
Timer1.Interval = 10
Timer1.Enabled = True
End Sub
Dim x As Integer = 0
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
TextBox1.Location = New System.Drawing.Point(x, 100)
x += 1
If x = 300 Then
Timer1.Enabled = False
End If
End Sub