0
代碼:VBA具有不同數據類型列的二維陣列
假設有一個8 X 2 array, val(1 to 8, 1 to 2)
。
我想的第一列是「字符串」類型,第二列的是「龍」類型。
是否可以定義這樣的二維數組?
代碼:VBA具有不同數據類型列的二維陣列
假設有一個8 X 2 array, val(1 to 8, 1 to 2)
。
我想的第一列是「字符串」類型,第二列的是「龍」類型。
是否可以定義這樣的二維數組?
Dim A(8,2) As Variant
數組都是相同的類型。
記錄集是表格。這讀取一個文本文件,並將一個隨機數作爲一個雙精度和一個字符串放入每個記錄。
Randomize
Set rs = CreateObject("ADODB.Recordset")
With rs
.Fields.Append "RandomNumber", 4
.Fields.Append "Txt", 201, 5000
.Open
Do Until Inp.AtEndOfStream
.AddNew
.Fields("RandomNumber").value = Rnd() * 10000
.Fields("Txt").value = Inp.readline
.UpDate
Loop
.Sort = "RandomNumber"
Do While not .EOF
Outp.writeline .Fields("Txt").Value
.MoveNext
Loop
End With
我會推薦使用專用的類,以後在嘗試對數據進行排序和操作時會容易得多 –