嘿伙计我从easyphpMyadmin连接到我的数据库时遇到问题 我收到此错误(我使用catch并尝试收集消息) -
提前致谢
导入MySql.Data 导入MySql.Data.MySqlClient
Public Class Form1
Dim dbCon As MySqlConnection
Dim strQuery As String = ""
Dim SQLCmd As MySqlCommand
Dim DR As MySqlDataReader
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
GetDBData()
End Sub
Private Sub GetDBData()
Try
'PREPARE CONNECTION AND QUERY
dbCon = New MySqlConnection("Server = localhost;Database = users; Uid=root; Pwd = password ")
strQuery = "SELECT users.name, users.surname " & _
"FROM users "
SQLCmd = New MySqlCommand(strQuery, dbCon)
' Pwd = password
' Open
dbCon.Open()
DR = SQLCmd.ExecuteReader
While DR.Read
txtData = txtData.Text & DR.Item("name") & Space(10) & DR.Item("surname") & vbCrLf
End While
'Close
DR.Close()
dbCon.Close()
Catch ex As Exception
MsgBox(" Failure to communicate " & vbCrLf & vbCrLf & ex.Message)
End Try
End Sub
结束班
答案 0 :(得分:0)
txtData
是一个TextBox。因此,要设置其内容,您需要使用属性Text
相反,您的代码会尝试将串联产生的字符串直接分配给显然无法分配给字符串的TextBox对象。
While DR.Read
txtData.Text = txtData.Text & _
DR.Item("name") & Space(10) & DR.Item("surname") & vbCrLf
End While
还要记住将Multiline
的{{1}}属性设置为true,并确保增加文本框的高度,否则在第一个文本框之后将看不到这些行。