Dim k as Byte
Dim a() as byte=
Dim b(a(1)) as byte
for k=1to4
b(k-1)=3+k
next
MsgBox(b(5-k))



arkadaşlar şu sorunun mantığını acıklayabilir misiniz? şimdiden sağolun
__________________