exe с принятием параметра времени выполнения

Question

Как написать код VB, который может, кроме параметра во время выполнения

ех. Мой exe-файл "readfile.exe", и если я хочу дать имя файла из командной строки, команда будет выполняться

readfile.exe имя файла

он должен принять параметр имени файла и выполнить действие

Answer 1

Посмотрите на функцию Command, которая должна дать вам все параметры, которые были переданы.

Я не могу найти документы VB6 для него в Интернете, но в MSDN есть документы для версии VBA, и обычно это то же самое, поэтому я бы посоветовал поискать здесь для получения дополнительной информации. И у него даже есть полный образец здесь .

Answer 2

Вы можете сделать что-то вроде этого:

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