使用文本框中的文件路徑使用按鈕打開「.exe」

我有一個名爲TextBox1的文本框，其中填充了一個按鈕，該按鈕使用OpenFileDialog獲取文件路徑。我想要一個按鈕（Button3）以2小時的間隔先後開始多個進程，然後關閉它並打開下一個進程。使用文本框中的文件路徑使用按鈕打開「.exe」

總共我有4個不同的文本框（TextBox1，TextBox2，TextBox3和TextBox4）和4個不同的文件路徑，我想用前面提到的間隔使用相同的按鈕打開。

Public Class Form1 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
     OpenFileDialog1.Title = "Please Select a File" 
     OpenFileDialog1.InitialDirectory = "C:temp" 
     OpenFileDialog1.ShowDialog() 
    End Sub 

    Private Sub OpenFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog1.FileOk 
     Dim strm As System.IO.Stream 
     strm = OpenFileDialog1.OpenFile() 
     TextBox1.Text = OpenFileDialog1.FileName.ToString() 
     If Not (strm Is Nothing) Then 

      'insert code to read the file data 

      strm.Close() 
     End If 
    End Sub 

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 
     OpenFileDialog2.Title = "Please Select a File" 
     OpenFileDialog2.InitialDirectory = "C:temp" 
     OpenFileDialog2.ShowDialog() 
    End Sub 

    Private Sub OpenFileDialog2_FileOk(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog2.FileOk 
     Dim strm As System.IO.Stream 
     strm = OpenFileDialog2.OpenFile() 
     TextBox3.Text = OpenFileDialog2.FileName.ToString() 
     If Not (strm Is Nothing) Then 

      'insert code to read the file data 

      strm.Close() 
     End If 
    End Sub 

    Private Sub TextBox3_TextChanged(sender As Object, e As EventArgs) Handles TextBox3.TextChanged 
    End Sub 

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click 
    End Sub 
End Class

來源

2016-08-20 Alan Carlos Lopez

你真的使用VBA是？ –

我正在使用studio，併爲Windows項目打開一個Visual Basic應用程序。 –

然後你使用VB.NET，這是與VBA不同的語言。如果您修復了您的代碼，您更有可能獲得幫助。 –

要啓動一個新的流程使用：

dim myProcess = Process.start(filename)

你不」需要的是執行以下操作的代碼：

Dim strm As System.IO.Stream 
    strm = OpenFileDialog2.OpenFile() 
    If Not (strm Is Nothing) Then 
     strm.Close() 
    End If

這是打開的exe文件，就好像它試圖從中讀取數據。

，而不是僅僅使用

dim process = Process.Start(OpenFileDialogX.Filename)

注意：您最初的目錄似乎是C：溫度不C：\ TEMP，因爲它可能應該

來源

2016-08-21 12:38:52 FloatingKiwi

使用文本框中的文件路徑使用按鈕打開「.exe」

回答

相關問題