0

我正在使用visual basic。如何让所有 .exe 文件在我的主窗体的面板中显示为按钮?我目前正在使用一种静态方法,该方法仅允许我在单击带有应用程序图标的按钮时启动应用程序。代码中的所有按钮和功能都设置为该方法,如该代码所示。

    Public Class AppSelectorMain

    Private Sub MRDButton_Click(sender As Object, e As EventArgs) Handles MRDButton.Click
        Try
            Shell("D:\projects\VisualBasicAFMRD\AFMRD\bin\Debug\AFMRD.exe", vbNormalFocus)

        Catch ex As Exception

            msgbox("app not available")

        End Try
    End Sub
    Private Sub AoFurutusButton_Click(sender As Object, e As EventArgs) Handles AoFurutusButton.Click
        Try
            Shell("D:\projects\VisualBasic\project1\project1\bin\Debug\project1.exe", vbNormalFocus)
        Catch ex As Exception
            msgbox("app not available")

        End Try
    End Sub
End Class

这种方法在某些场合非常有用,您可以制作一个非常漂亮的应用选择面板。

我希望能够让所有 .exe 文件在启动过程中出现在我的表单中,类似于 windows 任务栏。所以我猜我必须为每个应用程序创建一个快捷方式 .exe 文件,并将它们全部放在 1 个主文件夹中。快捷方式 exe 文件由用户在安装应用程序期间创建,并自动放置在主文件夹中。主文件夹是在用户的第一个应用程序的设置过程中创建的,该应用程序以我的商标名称“Alternate Futue”生产,一旦设置好所有以下备用未来应用程序,将在主文件夹中找到并填充其应用程序的 exe 文件。

我现在如何让这些 exe 文件显示为可以启动应用程序的按钮?有任何想法吗 ?

4

1 回答 1

1

我在这里假设 WinForms,所以只需添加一个ToolStrip控件并将其停靠到表单的底部。

添加一些ToolStripButtons,将Image属性设置为有意义的东西。

然后在单击每个 ToolStripButton 时执行一些操作:

Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
    Shell("D:\projects\VisualBasicAFMRD\AFMRD\bin\Debug\AFMRD.exe", vbNormalFocus)
End Sub

如果您想在运行时动态添加项目。看看这个 SO 问题:Adding Items to ToolStrip at RunTime

于 2013-05-29T08:56:39.447 回答