none
想指点一些代码 RRS feed

  • 问题

  • 我感到困惑 有关add data 通过 textbox 和listbox 很大差别 我一直add 不到 listbox data 进database 反之textbox没有这种问题

    Dim con As New OleDbConnection
            Dim cmd As New OleDbCommand
            Try
                con.ConnectionString = "Provider=Microsoft.Jet.Oledb.4.0; Data Source=" + strFullDBPath + ";Jet OLEDB:Database Password=224466;"
                con.Open()
                cmd.Connection = con
                cmd.CommandText = "INSERT INTO EmployeeID([Name],[Date], [TypeOfLeave],[TotalLeave],[Description],[TotalLeaveApply],[Balance]) VALUES(@Name, @Date, @TypeOfLeave,@TotalLeave,@Description,@TotalLeaveApply,@Balance)"

                cmd.Parameters.AddWithValue("@Name", Me.txtName.Text)
                cmd.Parameters.AddWithValue("@Date", Me.txtDate.Text)
                cmd.Parameters.AddWithValue("@TypeOfLeave", Me.comTypeOfLeave.Text)
                cmd.Parameters.AddWithValue("@TotalLeave", Me.txtTotalLeave.Text)

                cmd.Parameters.AddWithValue("@Description", Me.ListBox1.Text)
                MessageBox.Show(ListBox1.ValueMember)

                cmd.Parameters.AddWithValue("@TotalLeaveApply", Me.txtLeaveApply.Text)
                cmd.Parameters.AddWithValue("@Balance", Me.txtBalance.Text)

                cmd.ExecuteNonQuery()
                RefreshData()
            Catch ex As Exception
                MessageBox.Show("Error while inserting record on table..." & ex.Message, "Insert Records")
            Finally
                con.Close()

            End Try


            RefreshData()
            btnClear.PerformClick()
        End Sub


    2021年1月25日 4:26

全部回复

  • Hi christing,

    ListBox是以 List形式存储多个 类似 textbox的值,我注意到你通过 Me.ListBox1.Text来获取值,正确的做法应当是通过

    Me.ListBox1.Items(...).ToString

    来获取特定的值。

    希望对你有帮助。

    另外,如果你需要更多帮助,请提供更多关于你 ListBox中存储的值的信息,这将有助于我们测试。

    Best Regards,

    Xingyu Zhao


    Visual Basic and CLR forum will be migrating to a new home on Microsoft Q&A! (VB.NET and CLR) We invite you to post new questions in the new home on Microsoft Q&A ! For more information, please refer to the sticky post(VB.NET and CLR).

    2021年1月25日 7:16
    版主