For i = 1 To A
If MID(Text1.Text,A - i,1) = "\" Then Exit For
Next i
form1.Listname.AddItem MID(Text1.Text,A - i + 1,i - 4) 这样取得的就是“可惜不是你” 则在List上显示的就是可惜不是你 二、删除List上选中的字符串 For X = Listname.ListCount - 1 To 0 Step -1 If Listname.Selected(X) Then Listname.RemoveItem X End If Next 总结
以上是内存溢出为你收集整理的vb中利用listbox添加合适长度的字符串全部内容,希望文章能够帮你解决vb中利用listbox添加合适长度的字符串所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)