vb中利用listbox添加合适长度的字符串

vb中每个控件都有它的作用，而且只要好好研究它，你会发现它的作用真的不小！

listbox

一. 在窗体上的Listbox添加

form1.listname.additem 字符串

在字符串可以取你需要的长度和字符

例如：

像这个地址E:KwDownloadsong可惜不是你.MP3

你只需在上listname上显示可惜不是你，可能平常都会用直接取其名字，但这样有时会带来影响，这样的话影响效果。

这时就可以用到一个函数mid(s,n,m)

s:代表字符串，n:代表从第几个位置取，m:代表取的个数

text1.text=E:KwDownloadsong可惜不是你.MP3

A = Len(text1.text)

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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!