嗯,祝大家圣诞快乐!
在编写聊天室程序时,我遇到了以下问题。我正在向列表视图添加一个项目,但是当我尝试向最后一个子项目添加文本时,我收到错误 InvalidArgument=Value of '5' is not valid for 'index'。
我做了以下事情:
msgbox(listview1.subitems.count())
并且返回 5,所以我假设这意味着我总共有 6 列(计数从 0 - 5 开始,而不是 1 - 5。
可能是什么问题呢?其余的代码是:
Sub AddClient(ByVal client As connection, ByVal strings() As String)
Dim l As New ListViewItem(strings)
l.ImageIndex = GetFlag(strings(1).ToLower)
l.Tag = client
numcon1.Text += 1
l.SubItems(5).Text = "test phrase"
l.SubItems(4).Text = strings(7)
addtoconsole(strings(3) & " ~ " & strings(1) & " Has Connected.")
ListView1.Items.Add(l)
If audiocon = "True" Then
My.Computer.Audio.Play("newuser.wav", AudioPlayMode.Background)
Else
End If
If notifcon = "True" Then
NotifyIcon1.ShowBalloonTip(3000, "A friend is online!", strings(3) & " ~ " & strings(1), ToolTipIcon.Info)
End If
End Sub
非常感谢!