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

前端之家收集整理的这篇文章主要介绍了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

原文链接:https://www.f2er.com/vb/259985.html

猜你在找的VB相关文章