具有不同數據類型列的二維陣列

Question

代碼：VBA

假設有一個8 X 2 array, val(1 to 8, 1 to 2)。

我想的第一列是「字符串」類型，第二列的是「龍」類型。

是否可以定義這樣的二維數組？

Answer 1

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