Function IndexOf( FieldName: String ): Integer
Description
Returns the column number on the basis of a specified field name.
Example
Sub Main()
Dim
SQL
Dim
Query
SQL = "
Select LangCode, Description From Language
"
Dim
Query = Application.DataBase.CreateQuery( SQL )
Query.Open
' Note the use of the ampersand (&) this is where the conversion takes place
MsgBox
"
Language is column number:
" & Query.Fields.IndexOf("
Language
")
Query.Close
End Sub