Memanggil RUN dengan VB.NET

Script di bawah ini berfungsi untuk memanggil Aplikasi RUN

Asset : 1 Button

    Private Declare Function SHRunDialog Lib "Shell32" Alias "#61" (ByVal hOwner As Long, ByVal hIcon As Long, ByVal sDir As Long, ByVal szTitle As String, ByVal szPrompt As String, ByVal uFlags As Long) As Long

    Private mhOwner As Long

    Private mDialogPrompt As String

    Private mDialogTitle As String

    Private mCancelError As Boolean

    Private mhIcon As Long

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim uFlag As Long

        SHRunDialog(mhOwner, mhIcon, 0, mDialogTitle, mDialogPrompt, uFlag)

    End Sub