Question

查看下面我到目前为止所做的事情，但不幸的是它没有用。

       Private BS as New BindingSource
       Dim ds As New DataSet
     ' Make the Connection
       Using con As New OleDb.OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source = Database1.mdb")
       con.Open()
       Dim Sql = "SELECT COUNT ([Eventname]) FROM Eventproposal"
       Dim da = New OleDb.OleDbDataAdapter(Sql, con)
       da.Fill(ds, "Eventproposal")
     ' Set the Binding Source
      bs.DataSource = ds.Tables("Eventproposal")
     con.Close()
 End Using
    TextBox1.DataBindings.Add("Text", bs, "")

Answer 1

一些事情，您应该使用;

结束所有SQL命令到MS Access

Dim Sql = "SELECT COUNT ([Eventname]) FROM Eventproposal;"

当您尝试按名称访问时，您没有为列命名，这会给您一个错误。

Dim Sql = "SELECT COUNT ([Eventname]) AS Eventname FROM Eventproposal;"

我相信它会给它一个名字但不是你的想法。最后，当您进行绑定时，您必须引用表中字段的名称。

TextBox1.DataBindings.Add("Text", bs, "Eventname")

OLEDB - 选择Count不工作

1 个答案: