VB是否可以编写用命令行执行的程序？

[laisiwei]

就像用
工程1.exe c:\1 c:\2 true
这种语句执行程序

请问，怎样知道后面的参数？

分不够可以加

[DragonFly_1976]

本示例在某个函数中用 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

[allan1031]

vb在纯命令行的情况下是不能做到的，因为它有和WINDOWS的frame但是可以做到相似，也就是模拟啦，具体方法上面说的很详细了：）up

[lihonggen0]

用vb.net最好实现

[yokel]

是啊，vb做屏保不就是用command取得各种命令参数，
不过好象没看到过vb的控制台程序，vb.net是可以的

[laisiwei]

这个函数怎么调用？