如何双击另一种形式的列表视图中的项目时以一种形式显示数据

Question

我有2个表格（2个窗口）。在第一个窗口中，我有一个树视图（子级是DB中的表）。单击任何子项，列表视图（表中的数据）将显示在树形视图的右侧。

双击列表视图中的任何行，将打开另一个表格。当前要求是在双击单个记录时打开的form2列表视图中显示数据。

Private Sub LV_DblClick()
    Dim a As New Form2
    Display_Temp_DATA

    a.Show vbModal
End Sub

LV_DblClick()的格式为form1，它将打开form2。现在，Display_Temp_DATA具有SQL查询，该查询从表中获取记录，并应在form2的列表视图中显示。

Private Sub Display_Temp_DATA()
On Error GoTo errHandler

'Dim liItem As ListItem
'Set liItem = a.ListView1.ListItems.Add(, , "Abcd")
Display_List_Two_Data "Select  start, stop FROM tblsignal"
    Exit Sub
errHandler:
    MsgBox Err.Description
End Sub

我能够打开form2，但是我发现很难在form2列表视图中显示数据。关于如何解决此问题的任何想法？

Answer 1

您可以向其中添加模块和变量，并将值分配给该变量，并在目标表单上对其进行访问。不确定，但您也可以将FormName.VariableName用作表单上的静态变量。