read line by line from richtextbox and show in label (vb.net) -

i read line line richtextbox , show each line every second in label.
have code blocks.
, think need timer couldnt make it.
can me ?
remarks :

if use code , can see last line in label.

private sub button1_click(byval sender system.object, byval e system.eventargs) handles button1.click     dim rotatecount string()     integer = 0 richtextbox1.lines.length - 1         label1.text = richtextbox1.lines(i)     next end sub 

i mean, assume have lines in richtextbox like..

a1 b2 c3 d4 e5 

and show label1 in each second like..

a1  (after 1 sec.) b2  (after 1 sec.) c3  (after 1 sec.) 

like this...

you seems expect that, because set text property, label repaints new text. doesn't happen until exit event handler , system repaint label. of course, code, last text shown.

to reach goal, use timer set 1 second interval , counter keeps track of current line dispayed:

 dim tm system.windows.forms.timer = new system.windows.forms.timer()  dim counter integer = 0 

at point button click start timer , exits

private sub button1_click(byval sender system.object, byval e system.eventargs) handles button1.click      tm.interval = 1000      addhandler tm.tick, addressof ontick      tm.start()      ' don't allow click again button until      ' timer stopped      button1.enabled = false      button2.enabled = true end sub 

when tick event raised change label text line indexed counter, increment , check if have reached last line restarting first 1 if case. note button disabled before exiting. required avoid second/third/fourth/etc click on same button while timer runs..... more on button2 later....

sub ontick(sender object, e eventargs)     label1.text = richtextbox1.lines(counter)     counter += 1     if counter >= richtextbox1.lines.count         counter = 0     end if end sub 

of course, need button stop timer run , reenable first button

' button stops timer , reenable first button disabling ' - should start disabled form-designer private sub button2_click(byval sender system.object, byval e system.eventargs) handles button2.click     tm.stop     removehandler tm.tick, addressof ontick     button1.enabled = true     button2.enabled = false end sub