• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

akan (yürüyen) yazı

Katılım
16 Temmuz 2005
Mesajlar
151
Excel Vers. ve Dili
2000 türkçe
Altın Üyelik Bitiş Tarihi
3.6.2022
Değerli ustalarım:

ACİL BİR DURUMDA 155 POLİS İMDATI ARAYINIZ


yazısını form 1 de akan (yürüyen) yazı şekline nasıl getirebilirim?
 
Katılım
22 Haziran 2005
Mesajlar
120
Access ile ilgili maalesef fazla bilgim yok. Forumdaki diğer arkadaşlar belki bu konuda size yardımcı olabilirler.
 
Katılım
5 Eylül 2004
Mesajlar
571
Excel Vers. ve Dili
Excel 2003 SP1 Ingilizce
scroll

Günaydın :hey:

Forma bir etiket ekleyin (Label1) ve Formun olaylarında on timer a aşağıdaki kodu yazın, yine olaylarda timer intervalı:150 yapın. Bu Sayıyı değiştirerek kayan yazının hızlanıp yavaşladığını görebilirsiniz.

[vb:1:3db96129b2]Option Compare Database

Private Sub Form_Timer()
Static strMsg As String, intLet As Integer, intLen As Integer
Dim strTmp As String
Const TXTLEN = 40
If Len(strMsg) = 0 Then
strMsg = Space(TXTLEN) & " ACİL BİR DURUMDA 155 POLİS İMDATI ARAYINIZ " & Space(TXTLEN)
intLen = Len(strMsg)
End If
intLet = intLet + 1
If intLet > intLen Then intLet = 1
strTmp = Mid(strMsg, intLet, TXTLEN)
Label1.Caption = strTmp

End Sub[/vb:1:3db96129b2]

Deneyin yapamazsanız örnek dosyayı foruma eklerim
 
Katılım
16 Temmuz 2005
Mesajlar
151
Excel Vers. ve Dili
2000 türkçe
Altın Üyelik Bitiş Tarihi
3.6.2022
:mutlu: SÜPER OLDU...... :mutlu:


:D teşekkür ederim.... :D
 
Katılım
7 Temmuz 2004
Mesajlar
1,141
elken'e en yakın benim nikim olduğu için üzerime alınıyorum.

Diğer denetimler -> Microsoft web tarayıcısı
 
Katılım
16 Temmuz 2005
Mesajlar
151
Excel Vers. ve Dili
2000 türkçe
Altın Üyelik Bitiş Tarihi
3.6.2022
Sayın Alpen:

:oops: Ã?zür dilerim :oops:

yoğun iş temposundan ve access sorunlarından zaman zaman gözler bakıyor ama göremiyor.

ayrıca açıklamanız için teşekkür ederim......
 
Üst