VİSUAL BASİC 6’DA MATEMATİKSEL İŞLEMLER Profesyonel programcılık aslında iyi bir matematik ve algoritma bilgisini gerektiren bir iştir ama en azından standart işlemleri bilmemiz gerekir. Toplama : + Vb’de iki sayı aşağıdaki gibi toplanır. Dim Sayı1 As Integer Dim Sayı2 As Integer Dim Toplam As Integer Toplam = Sayı1 + Sayı2 Gördüğünüz gibi önce değişkenleri tanımladık ve sonra sayı1 ve sayı2 aslı değişkenleri toplatıp Toplam değişkenine atadık.Bu örneği daha anlamlı bir hale getirelim. Basit Hesap Makinesi: Önce formu ağaşıdaki gibi hazırlayın.3 Adet Lable,3 Adet TextBox ve 4 adet CommandButton bize gereken malzemeler. Şimdi Properties panelinden nesnelerin özelliklerini resimde gördügünüz gibi isimlerini verip konumlandırın Label nesnelerinin önce Caption özelliklerini sırasıyla şekildeki gibi Sayı1, Sayı2 ve Toplam olarak değiştirin Autosize özelliğini True yapın.TextBox nesnelerininde Height: 300 ve Width : 1500 olarak ayarladıktan sonra. sırasıyla seçerek Text özelliklerini silin.Nesnelerin Name özelliklerini değiştirmeyin! Şimdi Project penceresinden ViewCode butonunu kullanarak kod penceresini açın.General kısmındayız.Değişkenleri şu şekilde tanımlayın. Dim S1 As Integer Dim S2 As Integer Dim Toplam As Integer Daha sonra General yazan kısımdan Command1’i Seçin ve şunları yazın. Sayı1 = Text1.Text Sayı2 = Text2.Text Toplam = Sayı1 + Sayı2 Text3.Text = Toplam Command2’yi seçin ve şunalrı yazın Sayı1 = Text1.Text Sayı2 = Text2.Text Toplam = Sayı1 - Sayı2 Text3.Text = Toplam Comman3’ü seçin ve şunları yazın Sayı1 = Text1.Text Sayı2 = Text2.Text Toplam = Sayı1 * Sayı2 Text3.Text = Toplam Comman4’ü seçin ve şunları yazın Sayı1 = Text1.Text Sayı2 = Text2.Text Toplam = Sayı1 / Sayı2 Text3.Text = Toplam Kodları incelediğinizde sadece matematiksel işleçlerin değişmiş olduğunu görürsünüz.Şimdi programı çalıştırın sayı1 ve sayı2 yi girip bir işlem butonuna basın.Gördüğünüz gibi VB2de matematiksel işleçleri kullanmak zor değil. GEOMETRİK HESAPLAMALAR VE İLERİ DÜZEY İŞLEMLER Abs(x) x’in mtlak değerini verir. Atn(x) x’in radyan cinsinden arktanjantını verir Cos(x) x açısının kosinüsünü verir.Açı radyan cinsinden olmalıdır. Exp(x) x kuvvete yükseltilen y sabitini verir. Rnd(x) 0 ile 1 arasında rasgele bir sayı verir. Sgn(x) x 0 dan küçükse -1, 0 ve 0 dan büyükse +1 değerini verir. Sin(x) x açısının sinüsünü verir.X açısı radyan cinsinden olmalıdır. Aqr(x) x’in karekökünü verir. Str(x) Bir sayısal değeri dizilime(yazı gibi) çevirir. Val(x) Bir dizilimi sayısal değere çevirir. Tan(x) x açısının tanjantını verir.x açısı radyan cinsinden olmalıdır. X^y : X in y kadar üssünü alır. xy : x’i tamsayı olarak y’ye böler x Mod y : Kalanlı bölme için kullanılır. Yazdığınız formüllerin önce hesaplanması için işlemleri parantez içine alın. örnek: Toplam = (x*16) / (y+8) ^ 4
