Etiketler
Yazar: leventm - Cevaplar: 3 - İzleme: 3201
Sayfada Mekanik Saat
Değerli Arkadaşlar

Yine excel.web.tr sitesindede yayınlanmış olan yaptığım ilk saat çalışmalarından birini sizlerle paylaşmak istiyorum. Bu çalışmamda özellikle excelin önemli özelliklerinden bir olan koşullu biçimlendirme kullanılmıştır.
Yazar: leventm - Cevaplar: 10 - İzleme: 6402
Sayfada Dijital saat
Değerli Arkadaşlar

Bu örnektede sayfa üzerinde bir dijital saat örneği göreceksiniz. Örnekte yine koşullu biçimlendirme özelliği kullanılmıştır.
Yazar: ozanakkaya - Cevaplar: 8 - İzleme: 5478
Form Üzerinde Analog Saat
Formlarınıza altform olarak ekleyebileceğiniz saat örnekleri


[Resim: http://ekim09.kucukresim.com/uploads/adsize14f9.jpg]
Yazar: chopper07 - Cevaplar: 7 - İzleme: 5498
Transparan Analog Saat
işinize yarar umarım
Yazar: chopper07 - Cevaplar: 1 - İzleme: 2565
Degisik Bir Saat
progress barlar ile sekillendirilen bir saat örneği. Img-grin
Yazar: serg - Cevaplar: 6 - İzleme: 4265
küçük saat
visual basic öğrenmeye başladım ,bu da ilk denemem
Yazar: ODRBCR - Cevaplar: 12 - İzleme: 6302
Digital Saat
Selam herkese, Digital bir saat'e ihtiyacım var ek'te bir şey yaptım ama her saniye formu yeniden sorgulama yaptırıyorum. Hem saniye düzgün gitmiyor. Hemde sistemi kastırıyo gibi geldi bana. Doğru ve stabil bir digital saat örneği bulamadım. Yardım edebilirseniz sevinirim.
Yazar: onur_can - Cevaplar: 4 - İzleme: 3066
Bir Sade Saat
Bir Sade Saat de ben ekleyim dedim. uygulamalarda alt form olarak kullanabilirsiniz..

iyi çalışmalar...
Yazar: chopper07 - Cevaplar: 0 - İzleme: 3276
Çok Kolay bir Analog Saat Yapalım
formumuza sadece 2 tane timer koyalım ve kodları yapştıralım. işte bu kadar kolay

[code]Private Sub Form_Load()

Dim aci, i, t

AutoRedraw = True

Timer1.Interval = 1000 ' 1 saniye

Timer2.Interval = 10 '1 saniye

'zemin desenini çiz

ScaleMode = 3 'pixel moduna geçir

For i = 0 To ScaleHeight

Line (0, i)-(ScaleWidth, i), i * 256

Next

ScaleMode = 1 'normal moda dön

'form yüksekli?ini ve genisligini ayni yap

Width = ScaleHeight

'matematiksel koordinatlara göre y
Yazar: chopper07 - Cevaplar: 0 - İzleme: 2784
Basit bir saat daha tarihli
gerekli olanlar formumuza bir adet label ve bir adet timer.

[code]Private Sub Form_Load()
Timer1.Interval = 1000
Label1.ForeColor = &H8000000D
Label1.Font = Arial
Label1.FontSize = 14
Label1.AutoSize = True
Form1.Height = 930
Form1.ScaleHeight = 525
Form1.ScaleWidth = 3500
Form1.Width = 3500
Form1.BackColor = &H8000000E
Label1.BackStyle = 0
Form1.BorderStyle = 4
Form1.Caption = Saat
End Sub
Private Sub Label1_Click()
MsgBox ("ACCESSTR.net - ERKAN")
End Sub
Private Sub Timer

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.