Tür Tanımlama Sembol Byte Değer Aralığı Integer DefInt % 2 -32,768 den 32,767 ye kadar Long DefLng & 4 -2,147,483,648 den 2,147,483,648 e kadar Single Pozitif DefSgn! 4 1,401298E-45 den 3,402823E38 e kadar Single Negatif DefSgn -3,402823E38 den -1,401298E-45 e kadar Double Pozitif DefDbl # 8 4,940656458412447E-324 den 1,79769313486232E308 e kadar Double Negatif DefDbl -1,79769313486232E308 den -4,940656458412447E-324 e kadar Currency DefCur @ 8 -922,337,203,685,477.5808 den 922,337,203,685,477.5807 e kadar String DefStr $ Değişken 0 65,535 karakter ( 16 bit ) 1 2,000,000,000 ( 32 bit ) karakter Boolean DefBool 2 True / False değerlerinden birisi Byte DefByte 2 0 255 arası bir tam sayı Date DefDate 8 01.01.100 31.12.9999 arası Variant DefVar 16 dan Büyük Tarih ya da yukarıdakilerden birisi Uzunluk 255 karaktere kadardır İlk karakter bir harf olmalıdır Sonraki karakterler, harf, rakam ya da alt çizgi sembolü olabilir Harflerin büyük yada küçük harf olmasının önemi yoktur İçerisinde +, - , boşluk, /, gibi karakterler bulunmamalıdır Akılda kalabilecek anlamlı isimler olmadır Tools > Options > Editor > Require Variable Declaration seçeneği seçili değil ise Visual Basic içerisinde tanımlanmayan değişkenler Variant tip olarak kullanılır. Seçili ise tüm değişkenlerin deklare edilmesi zorunluluğu getirilmiş olur. Ayrıca Form yada Modülün kısmına Option Explicit yazıldığında tanımlanmamış değişkenler kabul edilmeyecektir. Variant tip değişkenler gereksiz hafıza kullanımına neden olur. Form bölümünde tanımlanan değişkenler o forma ait alt yordamlarda, modül bölümünde tanımlanan değişkenler ise o modüle ait alt yordamlarda kullanılır. Form, Module ya da Class bünyesinde değişken ve tip tanımlamaların bulunduğu kısım 64 KB'tan uzun olamaz. Dim ile değişken tanımlama : Bir form yada bir yordam içerisinde kullanılacak değişkenlerin tanımlanmasında kullanılır. Dim Ad As String 12 Ad değişkeni String olarak saklanır 12 karakterlik yer ayrılır Dim Yas As Integer Yas değişkeni Integer olarak saklanır Dim İlk İlk değişkeni Variant olarak saklanır Dim İlk As String, Son As String Dim İlk, Son, Orta As String İlk, Son değişkeni Variant Orta değişkeni String Dim ButonYeni As CommandButton Yeni bir denetim tanımlamak Global ile değişken tanımlama : Modül düzeyinde tanımlama. Projenin tamamında kullanılabilir. Global Sehir As String Global Nufus As Double Private ile değişken tanımlama : Form ve modül düzeyinde tanımlama. Tanımlı olduğu form ya da modül içerisinde kullanılabilir. Private Sehir As String Public ile değişken tanımlama : Modül düzeyinde tanımlama. Public Sehir As String Static değişken tanımlama : Alt yordamlar içerisinde deklare edilen yerel değişkenlerin; almış oldukları değerlerin alt yordamın tekrar çağrılmasında korunmasını sağlamak için kullanılır. Bir yordam Static olarak tanımlanırsa içerisindeki tüm değişkenler Static olur. Static GecenOgrenciSayısı As Integer Static Function Toplam Dizi değişken tanımlama : Bir bilgi birden fazla değer taşıyorsa bu bilginin tanımlanmasında kullanılır. Dizi değişkenlerin 0 dan değil 1 den başlamasını isteniyorsa kısmına Option Base 1 yazıldığında değişkenler 1 den başlayacaktır. Diziler alt yordamlarda argüman olarak kullanılabilir. ü Dim Oda_No As Integer Dinamik dizi Dim Oda_No(255) As Integer Statik dizi 256 Integer içerir Dim Oda(100) As String 0 ile 100 arasında sınırlı Dim Not(25 To 50) As Integer 25 ile 50 arasında sınırlı Çok boyutlu dizi değişkenlerin tanımlanması Dim Boyut(1 To 2, 1 To 3) Dizi elemanları Boyut(1,1) Boyut(1,2) Boyut(1,3) Boyut(2,1) Boyut(2,2) Boyut(2,3) ReDim ile dizilerin boyutunu değiştirme : Dinamik bir dizinin boyutunu belirler. Alt yordam içerisinde kullanılır. ReDim ile dinamik olarak açılan dizilerin isleri bitince Erase komutu ile silinmesi kullanılan belleği azaltır. Preserve deyimi ile yeni boyutlandırma yapılırken eski bilgiler saklanır. Bu şekilde boyut değiştirmede dizinin sadece son boyutu değiştirilebilir. Dim Arrayy Dinamik bir dizi ReDim Arrayy(120,120) Dizi yeniden boyutlandırılıyor ReDim Arrayy(12,12) Dizinin boyutu küçültülüyor ReDim Preserve Arrayy(12,14) Önceki değerler saklanarak dizi boyutu artırılıyor Erase ile dizilerin silinmesi : Bir veya daha fazla diziyi siler. Dinamik dizilerde ayrılan hafıza serbest kalırken statik dizilerde alan saklanır. Erase Arrayy Dizi ve bilgilerini siler Def ile değişken tanımlama : Değişken adının ilk karakterine göre tanımlama yapılmasını bir harf yada harf aralığı belirterek sağlar. Form ve modüllerin kısmında kullanılır. DefStr String DefInt Integer DefLng Long DefSgn Single DefDbl Double DefCur Currency DefVar Variant DefBool Boolean DefByte Byte DefDate Date DefObj Object DefStr A A ile başlayan değişkenler String DefInt M-R M - R aralığındaki harfler ile başlayan değişkenler Integer Const : Bunlar program içinde değeri değiştirilemeyen sabitlerdir. Visual Basic içinde tanımlanmış sabitleri mönüden Add-Ins > Add_Ins Manager ile API Viewer çalıştırılarak WIN32API. TXT dosyasından okunabilir. Const SbtVar = 3326 Public Const SbtString = "Merhaba" Private Const SbtInt As Integer = 2 Declare ile API fonksiyonlarını tanımlamak : DLL ler içerisinde bulunan API fonksiyonları program içerisinde kullanılmadan önce declare ile kısmında tanımlanırlar. Declare Sub GetSystemInfo Lib Kernel32 Declare Function GetMenu Lib User32 As Long Enum... End Enum : Enumerated tip yani numaralandırılmış birkaç değer alabilen veri tiplerinin tanımlandırılmasında kullanılır. Properties penceresi içerisinde listelenir. Enum Hiza Numaralanmış hiza tanımlaması 0 değeri 1 değeri 2 değeri End Enum Set ile bir nesne değişkenine değer atamak : Bir kontrolü değişkene atayarak kontrol üzerinde işlem yapılabilmesini sağlar. Set TKutu = Text1 TKutu. Text = Deneme Nümerik değişkenler ilk kullanıldıklarında sıfır değeri alır Variant değişkenler ilk oluşturulduklarında boştur Single değişkenler 7 hane duyarlıdır sonrası yuvarlatılır Variant değişken değişkenler içerisinde en yavaş olanıdır Döngü sayaçları için Long ya da Variant yerine integer kullanmak programı hızlandır Integer bir değişkene kesirli sayılar tam sayıya dönüştürülerek atanır Tarih bilgileri # arasında verilir CStr : Matemetiksel değişkeni String değişkene dönüştürür Sonuc = CStr(638.424) Sonuc = "638.424" CInt : Matemetiksel değişkeni yuvarlayarak Integer değişkene dönüştürür Sonuc = CInt(5,5) Sonuc = 6 CLng : Matemetiksel değişkeni Long değişkene dönüştürür Sonuc = CLng(35327,35) Sonuc = 35327 CCur : Matemetiksel değişkeni Currency değişkene dönüştürür Sonuc = CCur(2096,529176) Sonuc = 2096,5292 CSng : Matemetiksel değişkeni Single değişkene dönüştürür

Sonuc = CSng(86.4421125) Sonuc = 86.44211 CDbl : Matemetiksel değişkeni Double değişkene dönüştürür Sonuc = CDbl(12,345) Sonuc = 12345 Sonuc = CDbl(12345) Sonuc = 12345 CVar : Matemetiksel değişkeni Variant değişkene dönüştürür Sonuc = Cvar(223 & 000 ) Sonuc = 223000 CBool : Matemetiksel değişkeni Boolean değişkene dönüştürür Sonuc = CBool(12 < 5) Sonuc = False CByte : Matemetiksel değişkeni Byte değişkene dönüştürür Sonuc = CByte(12 > 7) Sonuc = 1 CDate : Matemetiksel değişkeni Date değişkene dönüştürür Sonuc = CDate(1) Sonuc = 12/31/1899 Sonuc = CDate(2) Sonuc = 1/1/1900 CDec : Matemetiksel değişkeni Decimal değişkene dönüştürür InStr : Bir String in diğeri içerisinde ilk nerde bulunduğunu kontrol eder AdSoyad = Murat Ustaoğlu Sonuc = InStr(1, AdSoyad, r ) Sonuc = 3 Sonuc = InStr(4, AdSoyad, r ) 4. karakterden itibaren arar. Sonuc = 0 Sonuc = InStr(8, AdSoyad, u ) 8. karakterden itibaren arar. Sonuc = 14 Left : String in soldaki belli sayıdaki karakteri ile yeni bir String oluşturur Sonuc = Left(AdSoyad, 5) Sonuc = Murat Mid : String in ortasındaki karakterlerden yeni bir String yaratır Sonuc = Mid(AdSoyad, 3, 6) Sonuc = rat Us Right : String in sağındaki belli sayıdaki karakteri ile yeni bir String oluşturur Sonuc = Right(AdSoyad, 8) Sonuc = Ustaoğlu Trim : String in sağındaki ve solundaki boşlukları atarak yeni bir String oluşturur Soyad = usta Sonuc = Trim Sonuc = usta LTrim : String in soldaki boşlukları atarak yeni bir String oluşturur Sonuc = LTrim Sonuc = usta RTrim : String in sağında boşlukları atarak yeni bir String oluşturur Sonuc = RTrim Sonuc = usta LCase : String in bütün karakterlerini küçük harf yapar Sonuc = LCase Sonuc = murat ustaoğlu UCase : String in bütün karakterlerini büyük harf yapar Sonuc = UCase Sonuc = MURAT USTAOĞLU Len : Stringdeki karakter sayısını bulur Soyad= usta Sonuc = Len Sonuc = 4 Asc : Stringin ilk karakterinin ascii kodunu bulur Sonuc = Asc Sonuc 65 Sonuc = Asc Sonuc 97 Sonuc = Asc Sonuc 97 Chr : 0 255 arası tam sayıyı o sayıya karşılık gelen Ascii karaktere dönüştürür Sonuc = Chr(65) Sonuc A Str : String e dönüştürme Sonuc = Str(654846546) Sonuc = 654846546 Space : İstenen miktarda boşluk karakteri atar AdSoyad = "Murat" AdSoyad = AdSoyad + Space(10) AdSoyad = AdSoyad + "Ustaoğlu" AdSoyad = Murat Ustaoğlu StrComp : Variant yada String iki değişkeni karşılaştırır AD0 = Murat Ustaoğlu AD1= murat ustaoğlu Sonuc = StrComp(AD0, AD1, VbTextCompare) Sonuc = 0 Sabit Açıklama VbTextCompare Text karşılaştırma VbBinaryCompare Binary Karşılaştırma VbDataBaseCompare Database den karşılaştırma StrComp Geri Dönen Değer string1 string2 den küçükse -1 string1 string2 ye eşitse 0 string1 string2 den büyükse 1 string1 yada string2 boş ise Null StrConv : String değişkenlerde dönüşüm yapar Ad = Murat Sonuc = StrConv(ad, 1) Sonuc = MURAT Sabit Değer Açıklama VbUpperCase 1 Büyük harfe dönüşür VbLowerCase 2 Küçük harfe dönüşür VbProperCase 3 Bütün kelimelerin ilk harfi büyük harfe dönüşür VbUniCode 64 Varsayılan kod sayfasından UniCode dönüşür VbFromCode 128 UniCode den varsayılan kod sayfasına dönüşür StrReverse : String değişkende harfleri tersten sıralayarak atar Sonuc = StrReverse Sonuc = taruM Replace : Karakterleri istenen başka karakterlerle değiştirir Sonuç = Replace Sonuc = Mustafa Sabit Açıklama VbTextCompare Text karşılaştırma VbBinaryCompare Binary Karşılaştırma VbDataBaseCompare Database den karşılaştırma String : İstenilen sayıda karakteri Variant değişkene atar Sonuc = String( 5, ) Sonuc = Fix : Ondalık kısmı atarak Integer a dönüştürme Sayı = -99.8 Sonuc = Fix Sonuc = -99 Sayı = 99.8 Sonuc = Fix Sonuc = 99 Int : Ondalık kısmı atarak Integer a dönüştürme Sonuc = Int(6.94846546) Sonuc = 6 Sonuc = Int(6.35484654) Sonuc = 6 Sonuc = Int(-6.84654) Sonuc = -7 IsEmpty : Variant değişkenlerin dolu olup olmadığını kontrol eder Dim Soyad As Variant Soyad = usta Sonuc = IsEmpty Sonuc = False IsNull : Variant değişkendeki verinin boşaltıldığını gösterir Sonuc = IsNull Sonuc = False Soyad = Null Sonuc = IsNull Sonuc = True IsNumeric : Variant değişken bir sayı ise True olur Sonuc = IsNumeric Sonuc = False IsDate : Variant değişken tarih saat bilgisi içeriyorsa True olur Tarih = #January 1, 1970# Tarih = Tarih + 7 Tarih 1 hafta sonraya atlar Sonuc = IsDate Sonuc = True IsArray : Değişkenin dizi olup olmadığını denetler Dim Dizis(110) As String Sonuc = IsArray Sonuc = True CVErr : Bir hata numarası değeri alarak Error tipinde Variant olarak döndürür IsError : Değişkenin bir variant yada Error olup olmadığını denetler

Function Hesap CVErr fonksiyonu On error goto hata: ... hata: If Err. Number <> 0 then Hesap = CVErr End If End Function Deger=Hesap IsError fonksiyonu If IsError Then... End If IsObject : Değişkenin bir nesne olup olmadığını denetler Sonuc = IsObject(Command1) Sonuc = True Val : String den Sayıya dönüştürme Sonuc = Val( 1231 ) Sonuc = 1231 Sonuc = Val( 1231 Ali Amca ) Sonuc = 1231 Sonuc = Val( 1ASDF231 ) Sonuc = 1 Sonuc = Val( 12,31 ) Sonuc = 12 Sonuc = Val( AS1231 ) Sonuc = 0 TypeName : Değişkenin veri tipinin ismini verir Dim Ad As String Ad= Murat Sonuc = TypeName Sonuc = String VarType : Variant değişkendeki verinin tipini kontrol eder Sonuc = VarType Sonuc = 8 Sonuc = VarType Sonuc = 2 VarType Sabit Geri Dönen Değer Default VbEmpty 0 Null VbNull 1 Integer VbInteger 2 Long VbLong 3 Single VbSingle 4 Double VbDouble 5 Currency VbCurrency 6 Date VbDate 7 String VbString 8 Object VbObject 9 Error VbError 10 Boolean VbBoolean 11 Variant VbVariant 12 Data Object VbDataObject 13 Ondalık Değer VbDecima 14 Byte CbByte 17 Array CbArray 8192 Abs : Sayının mutlak değerini bulur Sonuc = Abs(12) Sonuc = 12 Sonuc = Abs(-12) Sonuc = 12 Sqr : Sayının karekökünü alır Sayı = 9 Sonuc = Sqr Sonuc = 3 Sgn : Sayının pozitif mi negatif mi olduğunu bulur Sayı = 6 Sonuc = Sgn Sonuc = 1 Sayı = -6 Sonuc = Sgn Sonuc = -1 Sayı = 0 Sonuc = Sgn Sonuc = 0 Rnd : 0 1 arasında rastgele bir sayı döndürür Randomize Her seferinde aynı sayının üretilmesini engeler sonuc = Int(Rnd 25 + 1) 1- 25 arası bir sayı üretir Round : Sayıyı istenen basamağa kadar yuvarlar Sonuc= Round(3.48) Sonuc = 3 Sonuc= Round(3.523214324, 2) Sonuc = 3.52 Sonuc= Round(3.523214324) Sonuc = 4 LBound : Dizi içerisinde ki en küçük indisi döndürür Dim arrayy1(3 To 5) As Integer Sonuc = LBound(arrayy1 Sonuc = 3 Ubound : Dizi içerisinde ki en büyük indisi döndürür Dim arrayy1(3 To 5) As Integer Sonuc = UBound(arrayy1 Sonuc = 5 Array : Bir variant dizisi oluşturur Dim X As Variant X = Array(23, 45, 67, 89, 12) sonuc = X(3) Sonuc = 89 X = Array Sonuc = X(2) Sonuc = Kemal Timer : Gece yarısından sonra geçen saniye mikarı Sonuc = Timer Sonuc 22:50 için 82200 Date : Sistem tarihini verir Sonuc = Date Sonuc o günün tarihi Date = #January 25, 2099# Tarih 25.01.2099 olarak değişir Time : Sistem saatini verir Sonuc = Time Sistem saati Time = 12:00.00 Saati 12:00:00 olarak değiştirir Now : Sistem tarih ve saatini gösterir Sonuc = Now Tarih ve saat Day : Tarinin gününü gösterir Sonuc = Day Gün WeekDay : Haftanın kaçıncı olduğunu gösterir Sonuc = WeekDay 0- Pazar, 1 Pazartesi, 2 Salı... WeekDayName : Haftanın 1. 3. gibi günlerinin ismi Sonuc = WeekDayName(5) Sonuc = Cuma Month : Tarihin ayını verir Sonuc = Month Ay MonthName : Sayısal olarak verilen ayın ismini verir Sonuc = Month(7) Sonuc = Temmuz Year : Tarihin yılını verir Sonuc = Year Yıl Hour : Zamanın saat bilgisini verir Sonuc = Hour Saat 0 23 Minute : Zamanın dakika bilgisini verir Sonuc = Minute Dakika 0- 59 Second : Zamanın saniye bilgisini verir Sonuc = Second Saniye 0 - 59 DateSerial : Verilen yıl, ay ve güne karşı gelen tarih bilgisi oluşturur Sonuc = DateSerial(1413, 11, 21) Sonuc = 21.11.1413 DateValue : Tarihe ait bir Variant döndürür Sonuc = DateValue("08.07.2002")+ 1000 Sonuc = 03.04.2005 Sonuc = DateValue("08.07.2002") - DateValue("08.07.2001") Sonuc = 365 TimeSerial : Verilen saat, dakika ve saniye ile zaman bilgisi döndürür Sonuc = TimeSerial(5, 9, 32) Sonuc = 05:09:32 Saat 4:32:00 ile 2:22:12 arasında geçen süre Sonuc = TimeSerial(4-2, 32-22, 00-12) Sonuc = 02:04:48 TimeValue : Zamana ait Variant döndürür Saat1 =