sonraki »

[HoşGeldin Ziyretçi, Lütfen Giriş Yap ya da Üye Ol]

[CodeR]

Şimdi Kücük bir Dijital Saat YapaLım.Program Aslında Dijital Çalar Saat oLarak Tasarlanmıştır aNcak ağır gelebilir diyerekten çalar saat kısmını iptal ettim 

 Formumuza yan yana olmak şartı ile üç adet label bir tanede timer ekleyin. Ve Şu komutları yazın.

Option Explicit
Dim a As Integer ' program boyunca kullanilacak a degiskeni
Dim b As Integer ' program boyunca kullanilacak b degiskeni
Private Sub Command2_Click()
End
End Sub
Private Sub Form_Load()
Dim zaman, dakika
Timer1.Enabled = True
Timer1.Interval = 1000 ' bu deger 1 saniyeye karsilik gelir
Form1.Caption = "Yuregim DijitaL Saat"
End Sub
Private Sub Timer1_Timer()
Dim zaman, saniye, dakika, saat
zaman = Time
saniye = Second(zaman)
dakika = Minute(zaman)
saat = Hour(zaman)
Label1.BackColor = QBColor(0)
Label1.ForeColor = QBColor(10)
Label1.FontSize = 20
Label1.Alignment = 2
Label1.Caption = saat
Label2.BackColor = QBColor(0)
Label2.ForeColor = QBColor(10)
Label2.FontSize = 20
Label2.Alignment = 2
Label2.Caption = dakika
Label3.BackColor = QBColor(0)
Label3.ForeColor = QBColor(10)
Label3.FontSize = 20
Label3.Alignment = 2
Label3.Caption = saniye
If saat = a Then
If dakika = b Then
Beep 'dakika degeri(label2), sizin kurdugunuz dakika degeri (text2) ile ayny oldugu müddetçe beep sesi alyrsynyz(60 saniye)
End If
End If
End Sub


Programın amacı System Saatini label lar üzerine yazılımda belirtilen boyut kadar büyüterek ve renklendirerek Taşımak. Bu durumda ;
label1=Saat
label2=dakika
label3=saniye
olma durumundadır. Sizlere kolaylık olsun diye label isimlerini degiştirmedim. Formun Tasarımı YazıLarı size kalmış Hayde KoLaygeLsin....
   İşte benim yaptıgım Dijital Saatin Görünümü Aceleden yaptığım icin Dış Görünümüne önem vermedim Kücük bisey yaptım

                                         

[Robot Moderator]

       
Hos Geldin Ziyaretci Arkadas. Ben Robot Moderator. HacKbanK tan Tam Anlamıyla Faydalanmak Icin Uye Olman Gerekmektedir.

 
indir Visual basic ile dijital saat indir, Visual basic ile dijital saat download, Visual basic ile dijital saat izle, Visual basic ile dijital saat bul, Visual basic ile dijital saat hack Visual basic ile dijital saat hacked Visual basic ile dijital saat hacking Visual basic ile dijital saat hacker Visual basic ile dijital saat programı Visual basic ile dijital saat indir, Visual basic ile dijital saat download, Visual basic ile dijital saat izle, Visual basic ile dijital saat smf, Visual basic ile dijital saat kurulumu, Visual basic ile dijital saat bul

[BaLıM]

Ahhh Ahhh codları görünce okul günlerım canlandı gozumde uyusss- Özcan ve Ben