InvalidArgument=“0”的值对于“index”无效。

PrivateSub图片按钮4_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)Handles图片按钮... Private Sub 图片按钮4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 图片按钮4.Click
Dim I
For I = ListView1.SelectedItems(0).Index To ListView1.Items.Count - 2
Pass(I) = Pass(I + 1)
YinS(I) = YinS(I + 1)
Next
ListView1.SelectedItems(0).Remove()
WriteQQData()
End Sub
展开
 我来答
fujie724
推荐于2018-03-13 · TA获得超过1187个赞
知道小有建树答主
回答量:154
采纳率:100%
帮助的人:272万
展开全部
点击这个按钮的之前,请先确保你有选中ListView1中的任何一项。
或者在你的函数第一行插入以下代码:
If ListView1.SelectedItems.Count = 0 Then
Return
End If
帕剌斯
2024-10-29 广告
德国Palas 成立于1983年,总部位于德国巴登符腾堡州的卡尔斯鲁厄。作为气溶胶技术专家, Palas 致力于为用户提供气溶胶颗粒物的产生、处理、测量与分析解决方案,是该领域内全球先进的开发商和制造商。基于自身技术的独特优势,Palas ... 点击进入详情页
本回答由帕剌斯提供
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式