ListView在 lvwReport状态下,怎样设置指定列 编辑或不可编辑???
解决方案 »
- 代码框 光标问题
- VB制作的ActiveX控件EXE安装包!!
- 寻求OCR合作
- 我不会编程,老总让我编一个程,请教各位大侠
- 感觉VB6中自带的Data Report纯粹是垃圾,各位是不是从来不用它而都改为用水晶报表?
- 高分求救:一个关于select...into的数据导出的问题
- 用ADO与SQL SERVER连接时发生的问题,向高手求救!!!
- 画实时数据曲线
- 再请问vb里面要用asp对象,如request,response等,要引用哪个东东啊???
- 通过设置什么属性可以让 ListView 的列宽不可便
- 关于操作COM和LPT口,高手快救救我呀!先谢谢了!
- 来答问题者给分~~~少了再补给你~~~!解决者再补分给!!!
ListView1.SetFocus
ListView1.ListItems.Item(1).Selected = True '选择第一个 为编辑对象
ListView1.StartLabelEdit
End Sub
我想编辑第二列
可是我实在没办法
不知道怎么做
你好人做到底啊我知道在VC里很容易实现
可VB我实在没办法
Private Sub Command1_Click()
ListView1.SetFocus
ListView1.ListItems.Item(2).Selected = True '选择第2个 为编辑对象
ListView1.StartLabelEdit
End Sub
下面可以访问 第二行第二列listview1.ListItems(2).ListSubItems(1).text第三列:
listview1.ListItems(2).ListSubItems(2).text
ListView1.SetFocus
ListView1.ListItems.Item(ListView1.SelectedItem.Index).Selected = True '选择第一个 为编辑对象
ListView1.StartLabelEditEnd SubPrivate Sub Form_Load()
Dim I As Integer
Dim Nodx As ListItem
For I = 1 To 5
Set Nodx = ListView1.ListItems.Add(, "S" & I, "myh" & I)
Nodx.SubItems(5) = "第六列"
Nodx.SubItems(1) = "第二列"
Nodx.SubItems(2) = "第三列"
Nodx.SubItems(3) = "第四列"
Nodx.SubItems(4) = "第五列"
Next IEnd Sub只能编辑ListItem的Text属性列,不能修改其它列