Dear Gjoisa,
there is actually quite a good example in the helpfile, but here is a something I have used myself:
con.New1
cmd.New1("",con.Value)
con.Open("Data Source = " & DataF)
TableFields="Cat text, Title text, Note text, Deadline text"
Txt="create table if not exists MainTable (" & TableFields & ")"
cmd.CommandText=Txt
cmd.ExecuteNonQuery
cmd.CommandText="create table if not exists CatTable (Dummy text, Vis integer, Cat text)"
cmd.ExecuteNonQuery
It tries to open DataF. If the file does not exist or the database doesn't exist then it creates a database with two tables (MainTable and CatTable), the first with four fields and the second with three fields (the "text" is put in there to give the type of field). The database is opened with filename DataF.
But may I suggest that you have a look at the helpfile - it is really quite helpful
all the best / Björn