Question

我有一个包含完整路径的ListBox和一个ToolStripMenu来选择打开文件或在文件夹中显示文件。

问题是：我需要在右键单击之前左键单击ListBoxItem以选择我需要在文件夹中显示的文件。
如果我不这样做，我会得到NullReferenceException，因为没有选择任何项目。

如何选择右键单击项目？

这是我的代码：

Private Sub ShowInFolderToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShowInFolderToolStripMenuItem.Click
    Try
        If DirectCast(DirectCast(sender, ToolStripMenuItem).GetCurrentParent,  _
            ContextMenuStrip).SourceControl.GetType Is GetType(ListBox) Then

            Shell("explorer /select, " & DirectCast(DirectCast(DirectCast(sender,  _
                  ToolStripMenuItem).GetCurrentParent, ContextMenuStrip).SourceControl,  _
                  ListBox).SelectedItem.ToString, AppWinStyle.NormalFocus)
        End If
    Catch ex As Exception
        MsgBox(ex.ToString)
    End Try
End Sub

另一个问题...为什么下面的代码不起作用但没有给出错误并显示文档文件夹？

Process.Start("explorer.exe", "/select" & DirectCast(DirectCast(DirectCast(sender,  _
    ToolStripMenuItem).GetCurrentParent, ContextMenuStrip).SourceControl,  _
    ListBox).SelectedItem.ToString)

Answer 1

解决了添加MouseDown事件的问题：

Private Sub ListBox1_MouseDown(sender As Object, e As MouseEventArgs) Handles ListBox1.MouseDown
    Try
        DirectCast(sender, ListBox).SelectedIndex = DirectCast(sender, ListBox).IndexFromPoint(e.X, e.Y)
    Catch ex As Exception
    End Try
End Sub

右键单击ListBox打开ToolStripMenu但不选择任何项目

1 个答案: