OLEDB - 选择计数不起作用

在下面找到我到目前为止所做的工作，但不幸的是它无法正常工作。OLEDB - 选择计数不起作用

 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, "")

来源

2014-09-22 meili

您是否在执行时遇到任何错误？什么不工作？ – 2014-09-22 13:38:28

夫妇的事情，你应该停止所有的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")

来源

2014-09-22 14:16:26 Steve

我不认为分号是必要的，除非您需要专门终止该行。我知道我从来没有用它来处理任何OleDB查询，这从来都不是问题。 – LarsTech 2014-09-22 14:54:01

OLEDB - 选择计数不起作用

回答

相关问题