在vb6 ListView创建Dblclick事件的问题

Question

如果双击列表视图中的某项，

我需要打开另一个表单(psa33)，查找双击产品的列值。

双击项的列值必须出现在新打开的表单中。

我怎样才能做到呢?

请帮帮我

Private Sub ListView1_DblClick()
PSA33.Show
End Sub

现在它只工作形式的变化，但我需要做更多。

我想我需要找到listview1的双击项目的列数据

并发送给psa33

但我不知道该怎么做

Answer 1

属性ListView1.SelectedItem保存对所选ListItem的引用。

一定要检查属性是否指向一个有效的项目，因为用户也可以在ListView的空白区域双击。

示例代码:

If ListView1.SelectedItem Is Nothing Then
MsgBox "No tem selected", vbOKOnly + vbExclamation, "Can't proceed"
Else
PSA33.<NewPropertyYouHaveToCreate> = ListView2.SelectedItem.Text
PSA33.Show
End If