求助，当想在数据表中写入空值，在VB中如何写代码？

jacket6978、

现有数据表  有3列
当我在VB 3个TEXTBOX中随便输入2个，都能插入相应的数值，没有输入的就空着，如何操作？
为什么下面代码不行？
If A1.Text = "" Then A1.Text = " "
        If A2.Text = "" Then A2.Text = " "
        If A3.Text = "" Then A3.Text = " "

        Dim conconnection As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" & My.Application.Info.DirectoryPath & "\HH.mdb"
        Dim conn As New OleDb.OleDbConnection(conconnection)
        
                Dim querystring As String = "insert into 77(A,B,C) values('" & A1.Text & "','" & A2.Text & "','" & A3.Text & "')"
                Dim cmd As New OleDb.OleDbCommand(querystring, conn)
                conn.Open()
                cmd.ExecuteNonQuery()

ASLXT

假如你的表的C字段可以为空，则：
"insert into 77(A,B) values('" & A1.Text & "','" & A2.Text & "')"

咱家是猫

把代码中的所有的".Text"去掉.

老水牛

IF THEN 怎么没有END？

jacket6978、

咱家是猫 发表于 2013-5-12 17:03
把代码中的所有的".Text"去掉.

你这方法不行

咱家是猫

"insert into 77(A,B,C) values('" & Nz(A1) & "','" & Nz(A2) & "','" & Nz(A3) & "')"
另外,你的表名77可能会引起错误,这违反命令规则,最好是改为以字母打头的,如tbl77