Visual Basic Dersleri - 4

'Programlama' forumunda sha. tarafından 19 Eki 2009 tarihinde açılan konu

Konu etiketleri:
  1. sha.

    sha. ..daha çirkin, daha huysuz

    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
     

Bu Sayfayı Paylaş