Tried this example and works great, but how can I add more tables in it?

I tried This, but doesn't work for some reason.


ADOXtable.Name = "Addressbook",
ADOXtable.Columns.Append("Firstname1", ADOX.DataTypeEnum.adVarWChar, 50)
ADOXtable.Columns.Append("Middlename1", ADOX.DataTypeEnum.adVarWChar, 50)
ADOXtable.Columns.Append("Lastname1",

ADOXcatalog.Tables.Append(ADOXtable)

ADOXtable.Name = "Addressbook2",
ADOXtable.Columns.Append("Firstname2", ADOX.DataTypeEnum.adVarWChar, 50)
ADOXtable.Columns.Append("Middlename2", ADOX.DataTypeEnum.adVarWChar, 50)
ADOXtable.Columns.Append("Lastname2",

ADOXcatalog.Tables.Append(ADOXtable)

ADOXtable = Nothing
ADOXindex = Nothing
ADOXcatalog = Nothing

Thanks for your help...