exe接受運行時參數

Question

如何編寫除運行時參數以外的vb代碼

ex。我的exe文件的「readfile.exe」如果我想給文件名ROM命令行中執行將是命令

readfile.exe名

應採取的文件名參數和執行的操作

Answer 1

你可以做這樣的事情：

Sub Main() 
    Dim a_strArgs() As String 
    Dim blnDebug As Boolean 
    Dim strFilename As String 

    Dim i As Integer 

    a_strArgs = Split(Command$, " ") 
    For i = LBound(a_strArgs) To UBound(a_strArgs) 
     Select Case LCase(a_strArgs(i)) 
     Case "-d", "/d" 
     ' debug mode 
     blnDebug = True 
     Case "-f", "/f" 
     ' filename specified 
     If i = UBound(a_strArgs) Then 
      MsgBox "Filename not specified." 
     Else 
      i = i + 1 
     End If 
     If Left(a_strArgs(i), 1) = "-" Or Left(a_strArgs(i), 1) = "/" Then 
      MsgBox "Invalid filename." 
     Else 
      strFilename = a_strArgs(i) 
     End If 
     Case Else 
     MsgBox "Invalid argument: " & a_strArgs(i) 
     End Select 

    Next i 
    MsgBox "Debug mode: " & blnDebug 
    MsgBox "Filename: " & strFilename 
End Sub 

Answer 2

看那Command功能，這應該給你獲得通過的所有參數

我無法在網上找到它的VB6文檔，但MSDN有VBA版本的文檔，這通常是相同的，所以我建議看看here瞭解更多信息。它甚至有一個完整的樣本here。