Son Dakika Haberlerini Takip Edebileceğiniz FrmTR Haber Yayında.
Forum TR
Go Back   Forum TR > Programlama Dilleri Yazılım Teknolojileri ve Algoritmalar > Programlama > visual basic
FrmTR'ye Reklam Vermek İçin: [email protected]

Matematik İşlemleri

Programlama Kategorisinde ve visual basic Forumunda Bulunan Matematik İşlemleri Konusunu Görüntülemektesiniz => Matematik İşlemleri Visual BASIC altında matematiksel işlemler çok kolay. O kadar kolay ki GWBASIC ten bu yana BASIC dilinin bu ...

Cevapla
 
Konu Araçları
Eski 02-09-07, 14:24   #1

Varsayılan Matematik İşlemleri


Matematik İşlemleri Visual BASIC altında matematiksel işlemler çok kolay. O kadar kolay ki
GWBASIC ten bu yana BASIC dilinin bu özelliğini kaybetmemiş olması en
harika özelliklerinden biridir. Şimdi bir noktada şunu da kabul etmek
gerekir ki matematiksel işlevler her programlama dilinde kullanılması
çok kolay olmasına karşın o işlevleri nerede ve nasıl, hamgi şartlar
altında kullanışlı hale getirmeyi tasarlamak kadar da zor bir iş yoktur.

Matematiksel işlevlerin sadece dört işlemine burada tanık olacaksınız.
Yalnız matematiksel işlevleri çok kolay kullanabilmeniz için de o kadar
iyi bir matematiksel zekaya sahip olmanız gerekiyor.Örneğin bir pencere
üzerindeki nesnelerin pencerenin boyut değiştirmesi üzerine nasıl bir hal
alacaklarını hesaplamak VB altında matematiksel fonksiyonların nasıl
kullanılması gerektiğini bilmekle alakalı birşey değildir.

Ben burada sizlerin matematiksel zekasını programlara nasıl aktarabileceğiniz
konusunda bir kaç öneride bulunacağım o kadar.

Şimdi ufak ufak başlayalım ve "Dört İşlem" diyelim...

DÖRT İŞLEM

VB altında dört işlem en kolay matematiksel işlemler olup bunun haricinde de sizlere anlatacağımız ya da anlatmamız gereken bir işlev pek bulunmamaktadır.
Aşağıdaki örnek ile sizlere bütün işlevleri anlatıyoruz ;

Dim Sonuç As Double 'Ondalık bir sayı tanımlanıyor..
Dim sayı1 As Integer
Dim sayı2 As Integer ' 2 Tane TamSayı tanımlıyoruz..

sayı1 = 3
sayı2 = 4 ' Şimdi de bu 2 sayıya değer atıyoruz..

' Toplam İşlemi
Sonuç = sayı1 + sayı2 ' Sonuç değeri 7 olarak belirlendi..

' Çıkarma işlemi
Sonuç = sayı2 - sayı1 ' Sonuç değeri 1 olarak belirlendi..

' Çarpma işlemi
Sonuç = sayı2 * sayı1 ' Sonuç değeri 12 olarak belirlendi..

' Bölme işlemi
Sonuç = sayı2 / sayı1 ' Sonuç değeri 1,3333 olarak belirlenir..

Bu arada sizlere bölme işlemi ile bir dipnotu da sunmak isterim.
Yukarıda da görüldüğü gibi çoğu zaman bölme işlemleri tam sayı
olarak geri dönmez. Bu gibi durumlarda "/" yerine "\" karakteri
kullanılarak işlem sonucunun bir tamsayı çıkması sağlanabilir.

' Tam Bölme İşlemi
Sonuç = sayı2 \ sayı1 ' Sonuç değeri 1 olarak belirlenir...

KUVVET ALMA

Matematik işlemlerinde yeri geldiği zaman kullanılması gereken bir işlev de üs ya da kuvvet olarak belirlenebilir.Bu gibi durumalarda ^ işaretini kullanacağız. Bu işareti daha önce kullanmamış olabilirsiniz. Birazdan nasıl kullanmanız gerektiğini öğreneceksiniz.
Dim Kenar As Integer ' Tamsayı
Dim Alan as Double ' Ondalık sayı
Dim Hacim as Double ' Ondalık Sayı

'Şimdi bir karenin alanını hesaplayalım..

Alan = Kenar ^ 2

'Şİmdi de Bir Küpün Hacmini Hesalayalım..

Hacim = Kenar ^ 3

" ^ " İşaretini çıkarmanın sırrını bilmeyenlere de söyleyelim. SHIFT tuşu ile beraber klayvenin 3 Tuşuna basınız. Daha sonra da alacağınız üs ne ise o tuşa basınınız. Örneğin bir sayının 5. dereceden üssünü alacaksanız. Önce SHIFT + 3; daha sonra da 5 tuşuna bastınız mı bu iş hayde hayde olur.


KÖK ALMA

Programlama dillerinde bildiğim kadarıyla sadece tamkare ifadelerin kökleri alınıyor.VB de de bu olay SQR() olarak yer alıyor.
Dim Sonuç As Double
Dim Tamkare As Integer

Tamkare = 36

Sonuç = SQR(36) ' Sonuç = 6 olacaktır.

Bu örneği kendinize göre şekillendirebilirsiniz.Örnek olarak kendinizi denemek için bir Pisagor Fonksiyonu hazırlayabilirsiniz. Bewn de sizlere yardımcı olabilirim.Nasıl mı ? İşte yardım :

Dim Kenar1 As Double
Dim Kenar2 As Double
Dim Hipotenüs As Double ' Hepsi tam sayı olmayabilir..

Kenar1 = 3
Kenar2 = 4

Hipotenüs = SQR( (Kenar1 ^ 2) + (Kenar2 ^ 2) ) ' Hipotenüs=5

Bunu Fonksiyon haline de ileride kendiniz dönüştürebileceksiniz.. Bunu
şimdi açıklamam birçok şeyi darmaduman edebilir.
  Alıntı Yaparak Cevapla
Eski 04-02-08, 16:10   #2

Varsayılan C: Matematik İşlemleri


arkadasım güzel yazmıssında sana bir sorun olucak ben bir proğram yazdım ve text1 deki sayıyı text2 den cıkarmak istiyorum vee text3 otomatik yazmasını istioyrum bu konuda bana yardımci olurmusun dediğinde yapamıyorum calsımıyor otomatik yazmnyor yanı teşekkür ederim...
  Alıntı Yaparak Cevapla
Eski 04-02-08, 16:36   #3

Varsayılan C: Matematik İşlemleri


Alıntı:
Gerçek Mesajı Gönderen bjkworm Mesajı Göster
arkadasım güzel yazmıssında sana bir sorun olucak ben bir proğram yazdım ve text1 deki sayıyı text2 den cıkarmak istiyorum vee text3 otomatik yazmasını istioyrum bu konuda bana yardımci olurmusun dediğinde yapamıyorum calsımıyor otomatik yazmnyor yanı teşekkür ederim...
Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
Dim trayhoper As Integer
a = Int(Text1.Text)
b = Int(Text2.Text)
trayhoper = a - b
text3.Text = trayhoper
End Sub

text2 deki değer text1 den çıkarılıp text3 e yazılıyor ... Kolay Gelsin
  Alıntı Yaparak Cevapla
Cevapla

Bu konunun kısa yolunu aşağıdaki sitelere ekleyebilirsiniz

Konu Araçları

Gönderme Kuralları
Yeni konu açamazsınız
Cevap yazamazsınız
Dosya gönderemezsiniz
Mesajlarınızı düzenleyemezsiniz

BB code is Açık
Smiley Açık
[IMG] kodu Açık
HTML kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Kapalı
Refbacks are Kapalı



5651 sayılı yasaya göre forumumuzdaki mesajlardan doğabilecek her türlü sorumluluk yazan kullanıcılara aittir. Şikayet Mailimiz. İçerik, Yer Sağlayıcı Bilgilerimiz. Reklam Mailimiz. Gizlilik Politikası


Reklamı Kapat

Reklamı Kapat