Ciao, eccoti la tua risposta.... ah senti sapresti mica dirmi come fare per creare con vb.net delle macro per windows?
ciao..

nella finestra esplora soluzioni fai clic col destro su references (riferimenti) e clicca su aggiungi riferimento, poi vai sulla scheda com e cerchi "microsoft Ado ext 2.5 (o 2.7) for DDL and security" e lo aggiungi, infinne dagli ok.

poi scrivi quanto segue.....

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim str1 = "db1.mdb"
If System.IO.File.Exists(str1) Then
System.IO.File.Delete(str1)
End If
Dim cat1 As ADOX.Catalog
cat1 = New ADOX.Catalog
str1 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + str1
cat1.Create(str1)
cat1 = Nothing
GC.Collect()
GC.WaitForPendingFinalizers()
End Sub