Question

我现在遇到我的程序有问题我想要检索MySQL DB中的日期以显示我在ListView中的DateTimePicker中选择的日期/周/年但我遇到了问题并且可以'看到解决方案，我也找不到类似的东西：

Try
    conn.Open()
    Dim Reader As MySqlDataReader
    Dim Query As String
    Query = "Select * from farm.sales where datesale= ('" & DateTimePicker1.Text & "') "
    command = New MySqlCommand(Query, conn)
    Reader = command.ExecuteReader
    While Reader.Read

        Dim Datesale = Reader.GetString("datesale")
        Dim Clients= Reader.GetString("clients")
        Dim Bank= Reader.GetString("bank")
        Dim Revenue= Reader.GetString("revenue")
        Dim Total = Reader.GetString("total")

        Dim LV As New ListViewItem
        LV.Text = Reader("Datesale").ToString
        LV.SubItems.Add(Reader("Clients").ToString)
        LV.SubItems.Add(Reader("Bank").ToString)
        LV.SubItems.Add(Reader("Revenue").ToString)
        LV.SubItems.Add(Reader("Total").ToString)
        ListView1.Items.Add(LV)
    End While

    conn.Close()

Catch ex As MySqlException
    MessageBox.Show(ex.Message)

Finally
    conn.Dispose()
End Try

我遇到的问题是这一行LV.Text = Reader("Datesale ").ToString，我认为这是因为我正在检索的格式，但我找不到解决方案，有人可以帮助我找到解决方案谢谢

编辑：

我的错误没有发布错误程序崩溃的问题而且我收到错误System.IndexOutOfRangeException

中出现MySql.Data.dll类型的未处理异常

其他信息：在结果中找不到指定的列：Datesales

Answer 1

这就是我使用listview的方式。我希望这会有所帮助。

    conn.Close()
    conn.Open()
    cmd.CommandText = "SELECT * FROM tblUser"
    cmd.Connection = conn
    dr = cmd.ExecuteReader

    While dr.Read
        Dim itm = frmAdminMain.lvUser.Items.Add(dr("UserID"))
        itm.SubItems.Add(dr("Username"))
        itm.SubItems.Add(dr("Password"))
        itm.SubItems.Add(dr("FName"))
        itm.SubItems.Add(dr("LName"))
        itm.SubItems.Add(dr("Title"))
        itm.SubItems.Add(dr("Department"))

    End While
    dr.Close()
    conn.Close()

我用 lvUser.Items.Add（dr（“UserID”）） 在你的情况下，你使用LV.text ..

只需将其更改为 LV.Items.Add（Reader.GetString（“datesale”）

古德勒克！：）

Answer 2

最后解决它不知道错误实际是什么我只是更改了变量的名称和listview上的名称，它解决了它非常感谢回复和

用MySQL的DateTimePicker显示日期

2 个答案: