PDA

View Full Version : typing text in vb.net


dw5304
03-05-2005, 04:59 AM
hi there every one agin,
Im haveing truble geting my text box to type the leters like a virtural type writer


Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
TextBox1.Visible = True
Timer2.Enabled = True
Timer1.Enabled = False
End Sub

Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
TextBox2.Visible = True
Timer3.Enabled = True
Timer2.Enabled = False
End Sub

Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
TextBox3.Visible = True
Timer4.Enabled = True
Timer3.Enabled = False
End Sub

Private Sub Timer4_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer4.Tick
TextBox4.Visible = True
Timer5.Enabled = True
Timer4.Enabled = False
End Sub

Private Sub Timer5_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer5.Tick
TextBox5.Visible = True
Timer6.Enabled = True
Timer5.Enabled = False
End Sub

Private Sub Timer6_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer6.Tick
TextBox6.Visible = True
Timer7.Enabled = True
Timer6.Enabled = False
End Sub

Private Sub Timer7_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer7.Tick
TextBox7.Visible = True
Timer8.Enabled = True
Timer7.Enabled = False
End Sub

Private Sub Timer8_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer8.Tick
TextBox8.Visible = True
Timer9.Enabled = True
Timer8.Enabled = False
End Sub

Private Sub Timer9_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer9.Tick
TextBox9.Visible = True
Timer10.Enabled = True
Timer9.Enabled = False
End Sub

Private Sub Timer10_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer10.Tick
TextBox10.Visible = True
Timer11.Enabled = True
Timer10.Enabled = False
End Sub

Private Sub Timer11_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer11.Tick
TextBox11.Visible = True
Timer12.Enabled = True
Timer11.Enabled = False
End Sub

Private Sub Timer12_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer12.Tick
TextBox12.Visible = True
Timer1.Enabled = True
Timer12.Enabled = False
End Sub

when running just displays every thing at once

abhishek.in
03-06-2005, 03:51 AM
hi,
well, i actually didnt get what exactly r u trying to do.
do u just want to display the text boxes one by one?
it will be better if u explain ur problem more explicitely.

dw5304
03-06-2005, 05:00 AM
i wanted it to write like a virtual type writer. I tryed to do this by using textbox1.text += char and showed up all at once. want to do somthing like>
"w"
"we"
"wel"
"welc"
"welco"
"welcom"
"welcome"
to be displayed like we are typing. but not on seprate lines.
To look likethis (http://webdeveloper.earthweb.com/repository/javascripts/2004/02/370771/typingII.htm) .
with out the falling effect at the end