Inputbox a girilen sayıya isim verme

17/03/2013, 23:24

adrian

Selamlar,
d= val(textbox2.text) diyerek bir d değişkeni belirledim. Belirlenen bu değişkene göre
for i= 0 to d-1 diyerek bir döngü oluşturdum ve
c= inputbox(val(j+1) & " . sayıyı giriniz") diyerek "d" değişkeni kadar sayı girdim. Ancak bu yöntemin programın ilerleyen safhalarında yaşattığı karmaşadan dolayı
Sorum: Inputbox a girilen sayı değişken (val(j+1)) olduğundan dolayı acaba, oluşturulan herbir Inputbox değeri için isim verilerek bu isimler programın ilerleyen safhalarında kullanılabilir mi?
18/03/2013, 00:01

Yandemir

dizilerden bahsediyorsunuz sanırım. değişkeni tanımlarken dizi değeri verirseniz kullanılabilir.

Dim Degisken(100) As String

Degisken(1)="İstanbul"
Degisken(2)="İzmir"
Degisken(3)="Mersin"

msgbox Degisken(2)

gelen mesajda İzmir yazar.
18/03/2013, 01:00

mcmaho

dizi tanımlayarak yaparsan kolay olur. aşağıdaki gibi. dim sayi(3) yazısını general declaration bölümünde tanımlarsan programın heryerinde kullanabilirsin.

Private Sub Command1_Click()
Dim sayi(3)
d = Val(Text1.Text)
For i = 0 To d - 1
sayi(i) = InputBox(i + 1 & ". sayıyı giriniz")
List1.AddItem sayi(i)
Next
End Sub