| Cemalizim | 21 Temmuz 2008 19:32 |
Visual Basic ile daktilo yazı
PHP- Kodu:
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
alıntı | 