※ 引述《chensin.bbs@bbs.wretch.cc (沉星)》之銘言：
: 我預設
: dim a(5,5) as integer
: a={"","","A","",""},{"","A","","A",""},{"","A","A","A",""},{"","A","","A",""}-
: ,{"","A","","A",""}
: 可是這樣擺值方法錯誤
: 請問一下 要如何正確擺值
: 拜託各位了
VB6要用Array()創造陣列資料
應該是:
Dim a As Variant
a = Array(Array("", "", "A", "", ""), _
Array("", "A", "", "A", ""), _
Array("", "A", "A", "A", ""), _
Array("", "A", "", "A", ""), _
Array("", "A", "", "A", "") _
)
For i = LBound(a) To UBound(a)
For j = LBound(a(0)) To UBound(a(0))
If a(i)(j) = "" Then
Print ,
Else
Print a(i)(j),
End If
Next
Print
Next
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.160.212.245