在vb.net 教程 8-2 简单的SQL语言1 一文中讲到数据定义语言DDL

在command中仍然可以使用ddl来创建一个表：

    Private Sub Button4_Click(sender As Object,e As EventArgs) Handles Button4.Click
        Dim strsql As String
        strsql = "CREATE TABLE 工作组 " &
    "(小组编号 COUNTER CONSTRAINT PrimaryKey PRIMARY KEY," &
    "小组名称 TEXT(30) NOT NULL," &
    "人数 SHORT," &
    "建立时间 DATE DEFAULT Now()," &
    "备注信息 MEMO);"

        Dim odc As New OleDbConnection()
        odc.ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0;data source=D:\save\博客教程\08 数据库\Northwind.mdb"

        Dim odcommand As New OleDbCommand()
        odcommand.CommandText = strsql
        odcommand.Connection = odc
        odc.Open()

        odcommand.ExecuteNonQuery()

        odc.Close()
    End Sub

对DDL简单说明：

小组编号：自动编号

小组名称：文本，大小30个字

人数：整型

建立时间：日期时间型，设置默认值为Now()

备注信息：备注类型。

注意，这里使用的odcommand.ExecuteNonQuery()，

这里command不是查询，我们并不需要返回值，所以直接使用ExecuteNonQuery

对于 UPDATE、INSERT 和 DELETE 语句，返回值为该命令所影响的行数。 对于其他所有类型的语句，返回值为 -1。 如果发生回滚，则返回值也是 -1。

按下按钮后到mdb中查看：

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

学习更多vb.net知识，请参看vb.net 教程 目录