VB ListView1

怎么修改自己选中的那行?

当前选中如果你没有设置为多选就是用鼠标按住左键拖动就可以选择的时候
lv1.selecteditem就是当前选中的
'判断是否有选中的行 ,如果没有就是Nothing
if (not lv1.selecteditem is nothing ) then
msgbox lv1.selecteditem.text
end if

你也可以MouseDown这里得到这个对像
dim Ltm as ListItem

set Ltm=lv1.HitTest(x,y)

if (not ltm is nothing )
msgbox ltm.text
end if

修改很简单
.text为最左边的文本
.SubItems(x)是从第二列(歌曲)这里开始从1递增

我主要是告诉你如何得到当前选中的对像,
我想如何设置值,你应该会了。

有什么不懂的可以加我QQ ,我会详细告诉你。

2,5,4,1,8,6,9,1,7
温馨提示:内容为网友见解,仅供参考
无其他回答

VB关于listview1的使用
在VB中使用ListView控件时,首先需要将其添加到窗体中。这可以通过设计视图中的工具箱完成,或者通过代码动态创建。一旦ListView控件被添加到窗体中,你就可以开始向其添加项目。每个项目都可以通过ListViewItem对象表示,你可以设置其Text属性来显示文本,还可以通过ImageIndex或ImageKey属性来显示图像。ListView控...

VB 编程中 ListView1.View = 3 这句是什么意思呢 ?求高人指点~
View 属性(ListView 控件)返回或设置 ListView 控件中 ListItem 对象的外观。语法 object.View [= value]View 属性的语法包含下面部分:部分 描述 object 对象表达式,其值是 ListView 控件。value 指定控件外观的整数或常数,如“设置值”中所描述。设置值 value 的设置值为:常数 值 描述 lvwIcon 0...

vb listview 第一列能够编辑的问题,如何禁用!!!
右击窗体上的listview控件,选择属性,将标签编辑的下拉框设为1 或者在vb右侧属性窗口将listview的LabelEdit属性设为1 或者在窗体的加载过程里写一句listview1.LabelEdit = 1 以上三种方法任选其一即可

VB ListView1
当前选中如果你没有设置为多选就是用鼠标按住左键拖动就可以选择的时候 lv1.selecteditem就是当前选中的 '判断是否有选中的行 ,如果没有就是Nothing if (not lv1.selecteditem is nothing ) then msgbox lv1.selecteditem.text end if 你也可以MouseDown这里得到这个对像 dim Ltm as ListItem set ...

VB,怎么让ListView分成多列?
首先得设置ListView1.View属性为lvwReport 即ListView1.View = lvwReport 这样就可以显示多列了。显示几列,可以定义几列的标头,例如 ListView1.ColumnHeaders.Add 1, "xh", "序号"ListView1.ColumnHeaders.Add 2, "hm", "号码"这样listview就分成多列了,然后就可以用ListView1.ListItems.Add 命令...

vb 里怎么往listview控件的第一行中添加多列数据,谢谢
Dim itm As ListItem Set itm = ListView1.ListItems.Add(, , ListView1.ListItems.Count + 1) '序号 itm.SubItems(1) = namestr itm.SubItems(2) = sexstr

VB的listview使用问题
ListView1.ListItems.Item(1).ListSubItems(1).Text ="新标签"点右键的操作 Private Sub ListView1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)Dim thisitem As ListItem If Button = MouseButtonConstants.vbRightButton Then If ListView1.HitTest(x, y) Is ...

VB6.0源码 ListView1每一列的第二行里面的时间到了,并自动播放歌曲...
假设Listview的Name为lstView,WMP的Name为WMPlayer 代码如下:Private Sub timPlay_Timer() Dim i as Integer For i = 1 To lstView.ListItems.Count If lstView.ListItems(i).SubItems(2) = Format(Time,"hh:mm:ss") Then WMPlayer.controls.Stop WMPlayer.URL = lstView.List...

vb中关于listview的布局问题
Set clm = ListView1.ColumnHeaders.Add(, , "性别", 600, 2)Set clm = ListView1.ColumnHeaders.Add(, , "年龄", 600, 2)Set clm = ListView1.ColumnHeaders.Add(, , "身份证号", 2000, 2)Set clm = ListView1.ColumnHeaders.Add(, , "联系方式", 1200, 2)Set clm = ListView1...

vb中控件listview的详细使用
1、首先,点击文件->新建->项目,打开项目创建视窗,切换到Visual Basic,选择Windows窗体应用程序,新建一个。2、在左侧工具箱中找到ListView控件,单击并在右侧窗体中创建一个。3、点击ListView控件右上角的小按钮,展开ListView任务面板,点击编辑项,打开ListViewItem集合编辑器。4、新建一个按钮,在按钮的...

相似回答
大家正在搜