Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan
Etiketler
Yazar: myAccess - Cevaplar: 2 - İzleme: 5299
Bilgisayar Terim ve Kısaltmalar Sözlüğü (myaccess / Örnek Çalışma)
Merhabalar;
Access uygulamamı daha önce göndermiştim. Yeni yapı için tekrar gönderiyorum.
Saygılarımla.
Yazar: myAccess - Cevaplar: 3 - İzleme: 6427
Animasyon-Açılıp Kapanan Form (myaccess / Örnek Çalışma)
Animasyon,

Uyarı gerektiğinde kullanılabilecek küçük bir örnek.
Yazar: myAccess - Cevaplar: 10 - İzleme: 9248
Kayan ve Renk Değiştiren Yazılar (myaccess / Örnek Çalışma)
Kayan ve renk değiştiren yazı örnekleri..
Yazar: ozanakkaya - Cevaplar: 13 - İzleme: 11092
Kayan Resim
Form üzerinde hareket eden resim.

[Resim: http://ekim08.kucukresim.com/uploads/adsiz7b5d9.jpg]
Yazar: ferhatozge - Cevaplar: 9 - İzleme: 5747
butonların renk değiştirmesi
bir formda 5 adet buton var ben bunların üzerine fareyi götürdüğümde kenarlarının mavi renk olmasını istiyorum basit bir uygulama örnek verebilirmisiniz.

başka örneklerden inceledim ama çözemedim olayı (kendi çalışmamama uyarlıyamadım)
basit bir kaç örnek verebilirmisiniz

İyi akşamlar diliyorum.
Yazar: Abdullah - Cevaplar: 9 - İzleme: 7260
Kayan Yazı
Merhaba, yukarıya doğru kayan yazı yapmak istiyorum.Yardımcı olabilirmisiniz?
Yazar: chopper07 - Cevaplar: 7 - İzleme: 14430
Label da kayan yazı
formumuza 1 timer - 1 label ekliyoruz ve kodları forma yapıştırıyoruz.

buradan "Timer1.Interval = 100" hızı ayarlayabilirsiniz.

Kod:
Private Sub Form_Load()
Label1.Caption = "Accesstr.net | Access Öğrenmenin Kısa yolu"
Label1.Left = ScaleLeft
Label1.Width = Me.ScaleWidth
Timer1.Interval = 100
End Sub

Private Sub Timer1_Timer()

On Error Resume Next
Label1 = Mid(Label1, 2, Len(Label1) - 1) + Left(Label1, 1)

End Sub
Yazar: chopper07 - Cevaplar: 2 - İzleme: 4681
Label da Aşağı kayan Yazı
formumuza bir timer - 1 label ekleyip kodları yapıştırıyoruz.

Kod:
Option Explicit

Private Sub Form_Load()
Timer1.Interval = 1
Label1.Caption = "Accesstr.net"
End Sub

Private Sub Timer1_Timer()
Label1.Top = Label1.Top + 3
If Label1.Top = Me.Top Then Label1.Top = 0
End Sub
Yazar: delicocuk - Cevaplar: 1 - İzleme: 5146
access ornek calismalari acma sorunu
arkadaslar siteden indirdigin Access orneklerinde actigim zaman resimdeki gibi hata aliyorum.
Yazar: bzkrt-sbr - Cevaplar: 6 - İzleme: 5200
konu bulmam lazım
arkadaşlar bi konu bulmam lazım..accessde yapılabilecek çok zor olmayan ama gerçekten güzel ve kullanıuşlı bi program olması lazım...aklına konu gelenlerden cvp bekliorum..
Task