ListView1指定列提取字段求助

忘得快

各位大侠好！我想在ListView1指定列提取字段，请问如何修改代码实现？谢谢！

tspliu

改用全局变量保存设备名称字符串或者用一个单元格保存，赋完值清空。

忘得快

tspliu 发表于 2021-8-24 13:52
改用全局变量保存设备名称字符串或者用一个单元格保存，赋完值清空。

请问能提供代码吗？谢谢！

忘得快

tspliu 发表于 2021-8-24 13:52
改用全局变量保存设备名称字符串或者用一个单元格保存，赋完值清空。

请帮助提供修改的代码，谢谢！（数值请勿取自Excel工作表的内容）

vitrel

1. Private Sub CommandButton3_Click()
   
2.     Dim i%, sSet$
   
3.     For i = 1 To ListView1.ListItems.Count
   
4.         With ListView1.ListItems(i)
   
5.             If .Checked = True Then '如果该项被勾选
   
6.                 sSet = sSet & IIf(sSet = "", "", "，") & .SubItems(1)
   
7.             End If
   
8.         End With
   
9.     Next
   
10.     TextBox1 = sSet
    
11. End Sub

复制代码

忘得快

vitrel 发表于 2021-8-24 14:48

谢谢大侠帮助！

lss001

忘得快 发表于 2021-8-24 14:58
谢谢大侠帮助！

https://learn.microsoft.com/zh-cn/windows/win32/api/winuser/nf-winuser-getwindowlonga?redirectedfrom=MSDN