2-Dimensional Array mit anderen Datentyp Spalten

Question

Code: VBA

Angenommen, ein 8 X 2 array, val(1 to 8, 1 to 2) gibt. zu sein von „Long“ Typ

Ich mag die erste Spalte von „String“ Typ und der zweiten Spalte sein.

Kann ein solches 2-D-Array definiert werden?

Answer 1

Dim A(8,2) As Variant 

Arrays sind alle vom gleichen Typ.

Recordsets sind Tabellen. Dies liest eine Textdatei und legt eine Zufallszahl als Doppel und eine Zeichenfolge in jeden Datensatz.

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