如何了解无帮助程序的调用参数

'vb6 代码

Option Explicit
Public Declare Sub OutputDebugString Lib "kernel32" Alias "OutputDebugStringA" (ByVal lpOutputString As String)

Const helpmsg As String = "本程序用于将目标程序的调用参数显示到“调试信息监视器中”中。用法：请将本程序改名为目标程序而目标程序名加括号。例：(app).exe"

Sub Main() If Command = "/?" Then If MsgBox(helpmsg & vbCrLf & "要应用 ‘/?’ 参数调用目标程序吗？",vbYesNo,"帮助 - 参数观察程序") = vbNo Then Exit Sub End If OutputDebugString ("cmd>" & VB.App.EXEName & ".exe " & Command & vbCrLf & vbCrLf) Shell "(" & VB.App.EXEName & ").exe " & CommandEnd Sub

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!