AccessTr.neT

Tam Versiyon: Inputbox a girilen sayıya isim verme
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
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?
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.
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