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

listBox

一. 在窗体上的ListBox添加

form1.listname.additem 字符串

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

例如：

像这个地址E:\KwDownload\song\可惜不是你.MP3

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

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

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

text1.text=E:\KwDownload\song\可惜不是你.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