I am trying to convert my qbasic to vb6
Not sure how to convert the data statements.
Load them in an array?, ListBox?, other ?
Any ideas?
Dim ONENAME(19) As String
Dim TENNAME(9) As String
Dim TRIONAME(20) As String
Dim TRIO$

Rem ...... READ IN DATA
For I = 1 To 19: READ ONENAME(I): Next I
For I = 1 To 9: READ TENNAME(I): Next I

Rem ...... DATA
Data ONE, TWO, THREE, FOUR, FIVE
Data SIX, SEVEN, EIGHT, NINE, TEN
Data ELEVEN, TWELVE, THIRTEEN, FOURTEEN, FIFTEEN
Data SIXTEEN, SEVENTEEN, EIGHTEEN, NINETEEN

Data TEN, TWENTY, THIRTY, FORTY, FIFTY
Data SIXTY, SEVENTY, EIGHTY, NINETY

Data M, B, TR, QUADR, QUINT
Data SEXT, SEPT, Oct, NON, DEC
Data UNDEC, DUODEC, TREDEC, QUATTUORDEC, QUINDEC
Data SEXDEC, SEPTENDEC, OCTODEC, NOVEMDEC, VIGINT