我最近做了一个简单的聊天室
我希望我的聊天输出像this
我正在使用vBCrLf或Chr(13)& Chr(10)或vbNewLine不是那样但是像This
这是我的代码
Private Sub Command1_Click()
'sending text1 client to server
Me.Winsock1.SendData Me.Text1.Text
DoEvents
'filling text2 with text1
Me.Text2.Text = Me.Text2.Text & vbCrLf & Label1.Caption & Me.Text1.Text
Me.Text1.Text = ""
我错了吗?
答案 0 :(得分:2)
将Text2的Multiline属性设置为true