Bu Fonksiyon Now() Fonksiyonu… Eğer Bu Fonksiyonu Program İçerisinde Bir Değişkene Atarsanız O Ana Ait Tarih ve Saat Birlikte Bu Değişkenin Yeni Değeri Olacaktır. Ancak Size Lazım Olan Sadece Örnek Olarak Tarih İse Bu İşlemi Yapmak İçin Aşağıdaki Koda İhtiyacınız Olacaktır…
Dim tarih As String tarih = FormatDateTime(Now,.ShortDate)
Zaten:
FormatDateTime(Now
Kısmını Yazdığınız Zaman Karşınıza Gele Seçeneklerden İstediğinizi Seçerek İstediğiniz Türü Kullanabilirsiniz…
Kolay Gelsin…
1-Pointer::(Fare İmleci)Bu araç ile form üzerindeki araçların boyutlarını , yerlerini ve buna benzer özellikleri yapabiliriz.
2-PictureBox::(Resim Kutusu)Resim dosyalarının görüntülenmesinde kullanılır.
3-Label(Etiket)Form üzerinde kullanıcı bilgilendirmek amacı ile yazılması gereken yazılar bunla yazılır.
4-TextBox(Metin Kutusu)Kullanıcıdan veri almak için kullanılarn kutucuklardır.
5-Frame(Çerçeve)Form üzerindeki kontolleri gruplamak için kullandığımız bir aracımızdır.
6-CommandButton(Komut Butonu)En çok kullanılan araçlardan biris olup kullanıcının bu butonlara tıklaması ile kodların çalışması sağlanır.
7-CheckBox(Onay kutusu)Bu kutular kullanıcının herhangi bir konu yada sizin belirlerdiğini bazı şeyleri işatlemesi için kulanılır.Örneğin::Bir program yazdınız ve bazı ayarlar var bunlardan bazıları windows açıldığında bu da açılsın, çalıştığında simge durumunda çalışsın,otomatik güncelensin gibi bazı ayarlar kullanıcı bunların içinden kendine uygun olan seçnekleri seçer ve kaydeder.
8-OptionButton(Seçenek Kutusu)Bu ise checkbox gibidir yani seçim yapmaya yarar.Fakat bunda sadece bir seçenek seçilebilir.Nasıl;programda cinsiyet bölümü olsun erkek bayan diye bunlardan birisinin seçilmesi gerekir işte bu durum da bu araç kullanılır.
9-ComboBox(Açılır kutu)Kenarında bulunan butona basıldığı zaman içinde bulunan verileri görüntüler.
10-ListBox(Liste Kutusu)İçerisine yazdığımız verileri listelmeye yarar.
11-HScrollBar(Yatay Kaydırma Çubuğu)Formumuzu yatay kaydırmak için kullanılır.
12-VScrollBar(Dikey Kaydırma Çubuğu)Formumuzu dikey kaydırmak için kullanılır.
13-Timer(Zamalayıcı)Bunu bir örnekle açıklayalım.Örneğin;programda kullanıcı girişi var fakat kullanıcı şifresini belirli bir sürede girmek zorunda bu durumda bu timer devreye girer.
14-DriveListBox(Sürücü Listesi)Bilgisayarımızdaki sürücülerini listelemek için kullanılır.
15-DirListBox(Dizin Listesi)Bilgisayarımızdaki dizinleri listelemek için kullanılır.
16-FileListBox(Dosya Listesi)Dosyaları listelemek için kullanılır.
17-Shape(Şekil)Form üzerine şekil çizdirmek için kullanılır.
18-Line(Çizgi)Formumuza çizgi çizmek için kullanılır..
19-Image(Resim)Resim görüntülemek için kullanılır.PictureBox dan daha az özelliğe sahiptir.
20-Data(Veri İşlemleri)Programda kayıt işlemelerini denetler.
Visual Basic, Windows’un tüm renk öğelerine kolayca erişebilir. Windows’unuzun kaç renk kullandığını, grafik kartınızın bellek miktarını öğrenmeyi ve bunun gibi bazı özelliklere geçen aylarda değinmiştik. Şimdi sıra Visual Basic ile programlarımızda nasıl renk ekleyeceğinize geldi. VB formunuz üzerindeki herhangi bir nesnenin rengini değiştirmek için iki yol sunuyor bunlardan birincisi RGB komutu. Formlarınızı yaratırken kullandığınız renk paletinden bir renk seçtiğinizde o rengin Özellikler kutucuğunda değişik kodlara dönüştüğünü görürsünüz. Visual Basic, siz rengi seçtiğiniz anda onu sistemin anlayabileceği 16’lık sayı düzenine çevirir.
Visual Basic’in renk kutusundan seçtiğiniz renkler 16’lık sayı düzenine yandaki gibi çevrilir. KK, YY, MM iki haneli ve 16’lık düzende sayılardır.
Visual Basic’i kullanarak her bir renk’ten 1’den 255’e kadar bir ton alabilir, bunları karıştırabilir ve böylece 16.581.375 adet değişik renk elde edebilirsiniz. İşte size RGB komutu kullanılarak form üzerine basit bir palet yaratan ufak bir program. RGB değerini değiştirerek çok değişik görüntüler elde edebilirsiniz. Örnekte ayrıca bir formun ortasının nasıl bulunacağını da görebilirsiniz.
Private Sub Form_Click()
ScaleMode = 1 ‘ Ölçü sistemini piksele çevir
CX = ScaleWidth / 2 ‘ Formun dikey ortasını bul
CY = ScaleHeight / 2 ‘ Formun yatay ortasını bul
DrawWidth = 3 ‘ Çizim genişliğini ayarla
r = 100
For I = 50 To 0 Step -1
F = I / 50
F1 = 1 – F: F2 = 1 + F ‘ Hesaplamalar…
r = r + 10: b = b + 10
If b > 50 Then g = g + 5
ForeColor = RGB(r, g, b) ‘ Önalan rengini belirle
Line (CX * F1, CY * F1)-(CX * F2, CY * F2), , BF
Next I
End Sub
Programınızı yazdıktan sonra formunuzun üzerine bir kere tıklayın. Güzel bir renk paletinin oluştuğunu göreceksiniz.
Visual Basic’in size sunduğu diğer bir renk komutu ise QBColor komutudur. Bu komutu kullanarak QBASIC’ten kalan sınırlı 15 tane temel rengi kullanabilirsiniz. Aktif formun arkaplan rengini maviye boyamak için şunun gibi bir komut kullanmalısınız: