-2

我正在尝试创建一个可以通过在组合框中键入更改来添加和更新的 GUI

前任。

ID(combobox) 1002
Lastname:(textbox) Esteban
Firstname:(textbox) Aldus

那么如果我点击保存,所有输入的内容都会保存在我的数据库中。

我是 vb.net 的新手

这是我的代码

Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click

    dt.Clear()

    sql = "SELECT * FROM tblInfo WHERE stud_id='" & cbSI.Text & "'"
    da = New OleDb.OleDbDataAdapter(sql, con)
    da.Fill(dt)

if dt.rows.count <= 0 Then

    sql = "INSERT INTO tblStud (stud_id, lastname, firstname) VALUES('"& cbSI.Text & "','" & txtLN.Text & "' , '" & txtFN.Text "');"
    da = New OleDb.OleDbDataAdapter(sql, con)
    da.Fill(dt)

    dgList.DataSource = dt

    cbSI.Clear()
    txtLN.Clear()
    txtFN.Clear()
    cbSI.Focus()
End Sub
4

1 回答 1

1

您可以尝试将 if 语句更改为

    if dt.rows.count >= 0 Then

    sql = "INSERT INTO tblStud (stud_id, lastname, firstname) VALUES('"& cbSI.Text & "','" & txtLN.Text & "' , '" & txtFN.Text "');"
    da = New OleDb.OleDbDataAdapter(sql, con)
    da.Fill(dt)

    dgList.DataSource = dt

    cbSI.Clear()
    txtLN.Clear()
    txtFN.Clear()
    cbSI.Focus()

因为,您可能会在 dt 上有超过零行。

于 2013-09-27T12:41:11.463 回答