Dear Long (or is it Huynh?)

you need to redim the empty 0x0 matrix so that it is 2x2

either
  Dim sCategory(-1, -1) As String

or
redim sCategory(1,1)


I get an error OutofBoundException

___________________
  Dim sCategory(-1, -1) As String
  Dim i, j As Integer

  sCategory(0, 0) = "heart"
  sCategory(0, 1) =  "心"
  sCategory(1, 0) = "Lungs"
  sCategory(1, 1) =  "肺"
For i = 0 To UBound(sCategory, 1)
    App.CatalogDB.SQLExecute "INSERT INTO Category (
Category, cCategory ) VALUES ( '" + sCategory(i, 0) +
"', '" + sCategory(i, 1) + "')"
  Next i

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>


--

Cheers,

Dr Gerard Hammond
Bioinformatic Analyst
Garvan Institute of Medical Research, Sydney, Australia.

PowerPC Mac the world's most advanced obsolete computer.
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to