Vb6 如何在双击另一表单中的项目时以一种表单显示数据';s列表视图

Vb6 如何在双击另一表单中的项目时以一种表单显示数据';s列表视图,vb6,Vb6,我有两张表格(两个窗口)。在第一个窗口中,我有一个树视图(子对象是数据库中的表)。单击任意子级后,列表视图(表中的数据)将显示在树状视图的右侧 双击列表视图中的任何行时,将打开另一个表单。当前的要求是在双击单个记录时打开的表单2中的列表视图中显示数据 Private Sub LV_DblClick() Dim a As New Form2 Display_Temp_DATA a.Show vbModal End Sub LV_DblClick()位于表单1中,它将打开

我有两张表格(两个窗口)。在第一个窗口中,我有一个树视图(子对象是数据库中的表)。单击任意子级后,列表视图(表中的数据)将显示在树状视图的右侧

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

Private Sub LV_DblClick()
    Dim a As New Form2
    Display_Temp_DATA

    a.Show vbModal
End Sub
LV_DblClick()
位于表单1中,它将打开表单2。现在,
Display\u Temp\u 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列表视图中显示数据很困难。关于如何解决这个问题有什么想法吗?

您可以向其中添加模块和变量,并将值分配给该变量,然后在目标窗体上访问它。 不确定,但也可以对表单上的静态变量使用FormName.VariableName