VB LISTVIEW分行截取字符串的问题

来源：百度知道 编辑：UC知道 时间：2024/05/10 22:31:49
用服务端操作数据库然后把结果通过WINSOCK发到客户端怎样能把服务端发过来的字串按条在LISTVIEW分行显示
我用VB做了一个服务端一个客户端，客户端上有一个LISTVIEW控件，怎样才能让LISTVIEW控件自动截取服务器发送来的字符串，然后分行显示呢？谢谢。

'在窗体上添加一个ListView控件，并增加一个列首，添加以下代码
Private Sub Form_Load()
Dim RevData As String 'WinSock接收到的字符串
Dim SplitData() As String '定义一个动态数组用来存取分割以后的数据
Dim i As Integer

'这里假设一下接收到的字符串内容
RevData = "字段一,字段二,字段三"

'将接收到的字符串按照逗号分割成三个部分,得到的结果会是： SplitData(0)="字段一"；SplitData(1)="字段二"；SplitData(2)="字段三"
SplitData = Split(RevData, ",")

'将数据添加到ListView里面去
For i = 0 To UBound(SplitData)
ListView1.ListItems.Add i + 1, , SplitData(i)
Next

'使用完以后释放数组内存
Erase SplitData
End Sub