我创建了两种形式: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