我正在尝试创建一个消息传递系统,例如,我在一个名为tbluser的MySQL数据库中有一个表,它为每个用户保存数据。一个记录是一个用户,它的字段为“StatusMessage”。该字段可以有可以写入多行的值,但在如何使用ListBox将该字段包含的文本分隔为多行时,我遇到了困难。
Private Sub lstMessages_VisibleChanged(sender As Object, e As EventArgs) Handles lstMessages.VisibleChanged
Dim Query As String = "SELECT StatusMessage FROM tbluser WHERE UserID=@userID"
Using Conn As New MySqlConnection(MySQL.ConnectionDetails)
Using Comm As New MySqlCommand()
With Comm
.Connection = Conn
.CommandText = Query
.CommandType = CommandType.Text
.Parameters.AddWithValue("@userID", CInt(cboSelectUser.SelectedItem.ToString))
End With
Try
Conn.Open()
Dim Reader As MySqlDataReader = Comm.ExecuteReader
lstMessages.Items.Clear()
While Reader.Read OrElse (Reader.NextResult And Reader.Read)
lstMessages.Items.Add(Reader.GetString(0))
End While
Catch ex As MySqlException
End Try
End Using
End Using
End Sub此刻,所有的文字都出现在一行上。
此外,另一个问题是,如何将文本插入多行数据库。
发布于 2015-12-09 22:19:18
为了解决这个问题,我最后所做的就是将使用的组件更改为RichTextBox。此外,我将字符串"\n“的每个实例(这是MySQL中的一个新行)更改为Environment.NewLine()。
要将新消息插入到字段中,我必须选择字段中的所有文本,然后添加到该文本中,因此我使用了select查询和UPDATE查询以及Environment.NewLine()的组合,以便可以写入新行。
https://stackoverflow.com/questions/34108015
复制相似问题