当前位置:编程学习 > VB >>

VB生成EXE文件后,运行EXE文件时想在EXE命令后面添加参数,COMMAND如何编写

VB编程后生成EXE文件。
在运行EXE文件时如何设置COMMAND来实现指定参数!求例子!
譬如:A.EXE D:\B(COMMAND如何实现此功能)
实现:执行A.EXE后将文件存入D:\B这个指定文件夹内! --------------------编程问答--------------------
已经生成就不行了。

你要写控制台程序,看相应的文档。
--------------------编程问答-------------------- Command 函数
      

返回命令行的参数部分,该命令行用于装入 Microsoft Visual Basic 或 Visual Basic 开发的可执行程序。

语法

Command

说明

当从命令行装入 Visual Basic 时,/cmd 之后的命令行的任何部分作为命令行的参数传递给程序。下面的示例中,cmdlineargs 代表 Command 函数返回的参数信息。

VB /cmd cmdlineargs

对于使用 Visual Basic 开发并编译为 .exe 文件的应用程序,Command 返回出现在命令行中应用程序名之后的任何参数。例如:

MyApp cmdlineargs

想知道如何在正在使用的应用程序的用户界面中改变命令行参数,请搜寻关于“命令行参数”的帮助。
Command 函数示例
本示例在某个函数中用 Command 函数获得命令行参数,并将命令行参数以 Variant 类型之数组返回。

Function GetCommandLine(Optional MaxArgs)
   '声明变量。
   Dim C, CmdLine, CmdLnLen, InArg, I, NumArgs
   '检查是否提供了 MaxArgs 参数。
   If IsMissing(MaxArgs) Then MaxArgs = 10
   ' 使数组的大小合适。
   ReDim ArgArray(MaxArgs)
   NumArgs = 0: InArg = False
   '取得命令行参数。
   CmdLine = Command()
   CmdLnLen = Len(CmdLine)
   '以一次一个字符的方式取出命令行参数。
   For I = 1 To CmdLnLen
      C = Mid(CmdLine, I, 1)
      '检测是否为 space 或 tab。
      If (C <> " " And C <> vbTab) Then
         '若既不是 space 键,也不是 tab 键,
         '则检测是否为参数内含之字符。
         If Not InArg Then
         '新的参数。
         '检测参数是否过多。
            If NumArgs = MaxArgs Then Exit For
               NumArgs = NumArgs + 1
InArg = True
            End If
         '将字符连接到当前参数中。
         ArgArray(NumArgs) = ArgArray(NumArgs) & C
      Else
         '找到 space 或 tab。
         '将 InArg 标志设置成 False。
         InArg = False
      End If
   Next I
   '调整数组大小使其刚好符合参数个数。
   ReDim Preserve ArgArray(NumArgs)
   '将数组返回。
   GetCommandLine = ArgArray()
End Function
补充:VB ,  基础类
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,