如何根据ListView中的数据打开某个TabPage？

Posted 2021-03-27

我创建了两种形式：Form1和Form2。 Form1包含我的TabControl，有5个TabPages。有5个TabPages：“特殊事件录入”，“意外事件录入”，“一般事件录入”，“伤害事件录入”和“工作场所暴力事件录入”。

我的Form2包含ListView。我创建了一个名为“Entry Type”的列标题。现在有5种条目类型：“特殊事件录入”，“事故事件录入”，“一般事件录入”，“伤害事件录入”和“工作场所暴力事件录入”。我想要完成的是：

当用户双击ListView中的任何项目时，根据该项目的“条目类型”列下的内容，将打开包含表单控件的相应TabPage。

我已经尝试了Form1.TabControl1.SelectedIndex = 1并用索引1打开TabPage。如何在ListView上从Form2获得'Entry Type'输入然后在TabPage上打开相应的Form1？我已经将测试数据添加到我的ListView中以试图找出它。

答案

使用双击事件并在适当的SubItem中获取值。然后在Select Case中使用该值来选择正确的选项卡。

Private Sub ListView1_DoubleClick(sender As Object, e As EventArgs) Handles ListView1.DoubleClick
        'Use whatever SubItem index is the appropriate column
        Dim strTabName As String = ListView1.SelectedItems(0).SubItems(0).Text
        Select Case strTabName
            Case "Special Incident Entry"
                Form1.TabControl1.SelectedIndex = 0
            Case "Accident Incident Entry"
                Form1.TabControl1.SelectedIndex = 1
            Case "General Incident Entry"
                Form1.TabControl1.SelectedIndex = 2
            Case "Injury Incident Entry"
                Form1.TabControl1.SelectedIndex = 3
            Case "Workplace Violent Incident Entry"
                Form1.TabControl1.SelectedIndex = 4
            Case Else
                MessageBox.Show("Please try double clicking again.")
        End Select
    End Sub