Forumumuzda paylaşılan bütün uygulamaları kendi projelerinizde kullanabilirsiniz. Bunun için izin almanıza gerek yok.
Kodlamalarda kullanılan açıklamaları silmek ya da silmemek de tamamen sizin emeğe saygınızla alakalıdır. Örneğin kodlarda "Bu kod www.accesstr.net ailesi tarafından yazılmıştır" gibi bir ibare varsa, siz bunu isterseniz silebilirsiniz. Bu tamamen sizin emeğe saygınızla alakalı bir durum olur yani...
Kolay gelsin...
Hareketli Form Resimi Yazısı.
güzel yapılmış bir program ve daha başka konularda bize bilgi verirseniz sevinirim.iyi günler
Aşağıdaki kodları inceleyin ve uygulayın. Süre ölçer aralığı 0 dır. Onu da 10 yapın.
Buradaki değişken tanımları formun general decleration kısmındaki "option compare database" altına yapıştırılacak
Aşağıdaki kodlar da zaman dolduğunda olayına yapıştırılacak
Bu kadar. Süre ölçer aralığı değerini de 10 yaparsanız formunuz açıldığında yukarda "www.access.tr" yazısı hareketlenecektir.
Kolay gelsin.
Buradaki değişken tanımları formun general decleration kısmındaki "option compare database" altına yapıştırılacak
Kod:
Dim a As String, b As String, i As IntegerKod:
i = i + 1
a = "www.accesstr.net"
b = Space(100) & a
If i <= Len(b) - Len(a) Then
Me.Caption = Mid$(b, i, Len(b))
ElseIf i > Len(b) - Len(a) Then
Me.Caption = Space(1) & Me.Caption
If Len(Me.Caption) = Len(b) Then i = 0
End IfKolay gelsin.
İnadına, ille de Accesstr.net...
sayın hocam söyediklerinizi uyguladım ama olmadı ,
ayrıca ilginiz için teşekkür ederim
ayrıca ilginiz için teşekkür ederim
Konuyu Okuyanlar: 1 Ziyaretçi
