Vb de Matris (Dizi(2 boyutlu)) köşegenler hesaplama

[mu_holy_man]

merhaba

15 25 36 25
14 25 56 78
65 37 78 11
10 89 73 78

programa bu şekilde veri girilecek
yani sayi(4 to 4)
sonra bunun köşegenleri toplanacak

1,1
2,2
3,3
4,4

bunu nasıl yaparız bir yedım etseniz

 

[ibrahimkaya396]

For i = 1 To Text1
a = InputBox(d)
For j = 1 To Text2
a = InputBox(a)
List1.AddItem a
Next
Next

ben bu tip bi dongu ile birseyler yapmaya calsıtım ama beceremedim belki işine yarar

 

[zqwerty]

benim önerim biraz külfetli ama kayda değer yapılabilir ilk önce form alanına 17 tane textbox ve 1 tane buton atarsın textboxlar yanyana 4 lü sıra ve alt alta 4 satır olcak şekilde yerleştirirsin 17 ciyi sonucu göst. için en alta koyarsın butonun click olayınada eğer sırayla text boxları koyduysan textbox17 = textbox1 + textbox6 +textbox11+text box16 şeklinde kodu yazarsın al sana 2 dakkikaya biter

 

[ibrahimkaya396]

dediğin baya mankıtlı ama 2 tane text kutus olusturup iç içe 2 tane for dongusu kurup bu dongude inputları kullanarak sayı alsak bu sayı alma işlemide text kutularına girilen miktar kadar olsa tabi bide busayıları list1'e eksetsek ve sayıları hafızaya alsak değişken yardımıyla ve bu değişkenleri seltex komutunu kullanarak değişkenlerin birinci degerlerini aldırsak olurmu acaba ? bilgisi olan ben ugrastım ama olmadı