Visual Basic ile daktilo yazı

 
Formumuza bitane Label Ekliyoruz adını LblRawkmetal farzedelim
bitane de Timer Ekliyoruz İnterval değerini 100 yapıyoruz.

daha sonra kodları olduğu gibi C/P yapıyoruz...


Option Explicit
Const CREDITS = "Burdan böle ince ince geçerkene " & vbNewLine & " bide alt satıra geçtik hayda breeee " & vbNewLine

Private Sub Timer1_Timer()
Static Counter As Integer
With LblRawkmetal ' label ismi
Counter = Counter + 1
.Caption = Left$(CREDITS, Counter)
End With
End Sub

Yorum Yapabilmek İçin Üye Girişi Yapmanız Gerekmektedir.

visual basic ile daktilo yazı