Çok sağol tşk, 4 gözle bekliyorum haberini.

çok sağol sayende mantığını kaptım, vb 6 da += yok tekrardan topla=topla+ ,,... diye yapınca oluyor. Yalnız çarpma olsa nasıl yapacaktım, ona çıkaramadım.

arkadaşlar resimde tasarımını yaptığm şekilde bir işlem yapacağım. Mesela listeye 10 tane sayı ekleyeceğim hepsini bir formüle göre işleme sokacağım. Bunu nasıl yaparım yardımcı olursanız sevinirim.

Buyur bu vb. net ile yaptığım örnek, proje halinde veriyorum. Bilgisayarında vb6 kurulu olan bir arkadaş bu örneği incelerse vb6 için olan örneğini de yapabilir zaten direk. Visual Studio 2008 kurulu değil ise kodlar şu şekilde; Kod: Public Class Form1 Private Sub Button1_Click Handles Button1. Click ListBox1. Items. Add(Int(TextBox1. Text)) TextBox1. Clear End Sub Private Sub Button2_Click Handles Button2. Click Dim Topla As Integer = 0 For i As Integer = 0 To ListBox1. Items. Count - 1 Topla += (ListBox1. Items. Item Next Label1. Text = Topla End Sub End Class Direk kodlardan bakıpta da yapabilirsin kendi örneğini. Burada amaç zaten anlayacağın gibi veriyi integer tipine çevirip daha sonra işlem yapmak. Mantığı anlamışsındır umarım. Kolay gelsin.

Birkaç kez daha aynı yardımı istemiştin sanırım sen, şu anda evde değilim, eve geçtiğim zaman vb6 kurup yardımcı olmaya çalışacağım. Kesin demiyorum ama, çünkü 2-3 yıl oluyor vb6 ile ilgilenmeyeli. Vb. net olsa daha kolay yardımcı olurdum ama zaten aynı dil olduğu için pek fark olduğunu zannetmiyorum. 2-3 saate kadar eve geçer, kurup denerim. Selamatle.

Çarpma operatörü için de " " kullanacaksın. Neredeyse her dilde aynıdır 4 işlem. "+","-"," ","/" işaretlerini kullanarak 4 işlemi yapabilirsin. Yalnız dikkat etmen gereken bir nokta var, o da şu ; Kod: Dim Topla As Integer = 0 Kodundaki "0" değerini "1" olarak değiştirmen gerekiyor. Kod: Dim Topla As Integer = 1 Bunu atlarsan, çok ufak bir hatadır , sürekli bir "0" değeri ile karşılaşırsın -