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

           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