运行下面的代码,我的程序将无法通过这个子程序中的'connection.Open()‘行。以前我也遇到过类似的问题,在不需要数据存储器的时候,我就使用它,但是在这个子部分中,我没有做任何类似的事情,只是打开到数据库的连接。我不知道我在这里做错了什么,尤其是在没有错误或任何事情的情况下。
Using connection As New OleDbConnection(connectionstring)
connection.Open()
Dim Command As New OleDbCommand("SELECT SUM(Price) FROM ItemsSold", conection)
Dim Command2 As New OleDbCommand("SELECT SUM(TotalCost) FROM Inventory", connection)
Dim Turnover As Double = Convert.ToDouble(Command.ExecuteScalar())
Dim Cost As Double = Convert.ToDouble(Command2.ExecuteScalar())
lblProfit.Text = "Profit: £" & (Turnover - Cost)
connection.Close()
End Using发布于 2015-03-14 05:08:29
啊,我用一个新的文件替换了app.config文件,这个程序现在又完全正常了。谢谢你的帮忙!
https://stackoverflow.com/questions/29045540
复制相似问题