How do you use DBUtils to create an INTEGER PRIMARY KEY?

Cursor1 = SQL1.ExecQuery("SELECT ID FROM database")   
   If Cursor1.RowCount > 0 Then
   
   For i = 0 To Cursor1.RowCount - 1
      Cursor1.Position = i
      Dim NewID As Int
      newID = cursor1.GetInt("ID")
   Next
   End If
   
   newID = newID +1

newID = SQL1.ExecQuerySingleResult(SELECT max(col) FROM database) + 1

CREATE TABLE TableName ( ID INTEGER PRIMARY KEY, Col1 TEXT, Col2 FLOAT )
Creates a table with the name 'TableName' and three columns:
Column Index Name Variable Type
1 ID INTEGER PRIMARY KEY
2 Col1 TEXT
3 Col2 FLOAT
Different available data types:
[B]INTEGER PRIMARY KEY is a special variable type used for identifiers ID's. It is a long integer 
value beginning with 1 and it is incremented by one each time a new data set, with a NULL 
parameter for this column, is added to the database.[/B]
INTEGER is a 64-bit signed integer number.
FLOAT is a 64-bit IEEE floating point number.
TEXT  is a string.
BLOB Binary Large OBject, the value is stored exactly as it was input.
NULL
SQL1.ExecuteNonQuery("CREATE TABLE TableName(ID INTERNAL PRIMARY KEY, Col1 TEXT, 
Col2 FLOAT")

Sub FillSimpleData
   Dim RowID As Long
   SQL1.ExecNonQuery("INSERT INTO table1 VALUES('abc', 1, 2)")
   RowID = SQL1.ExecQuerySingleResult("SELECT last_insert_rowid() FROM table1")
   Log("RowID: " & RowID)
   SQL1.ExecNonQuery2("INSERT INTO table1 VALUES(?, ?, ?)", Array As Object("def", 3, 4))
   RowID = SQL1.ExecQuerySingleResult("SELECT last_insert_rowid() FROM table1")
   Log("RowID: " & RowID)
End Sub