我写过这样的一段代码
Private Sub Form_Load()
msgbox command$
sub end
功能是显示程序运行时附带的参数。
如果我在exefile的注册表项关联我的程序,
x.exe %1
这样的话,每一个可执行程序在运行的时候,都会弹出它的路径,
我的问题是:在一个文件夹下用右键进行winrar压缩时,却只弹出winrar的路径,却不能显示这个文件夹的路径(winrar的参数)。
我想得到全部的参数...
vb 接收参数
答案:2 悬赏:80 手机版
解决时间 2021-03-18 19:37
- 提问者网友:欲望失宠
- 2021-03-17 22:48
最佳答案
- 五星知识达人网友:想偏头吻你
- 2021-03-18 00:26
加一个判断试一试 ,为了直观,变量我用中文了
if 获得路径=截取路径,右端为.exe then
查找注册表信息,判断截取字符
msgbox command¥
end sub
大概思路如此
if 获得路径=截取路径,右端为.exe then
查找注册表信息,判断截取字符
msgbox command¥
end sub
大概思路如此
全部回答
- 1楼网友:行雁书
- 2021-03-18 00:35
在你的sub main 中处理 command$ 这个全局的字符变量 if command$ = "/x" then msgbox "执行x "
例如
sub main() dim s as string dim a s="" a=split(command," ") '以空格分割命令行参数 for i=lbound(a) to ubound(a) s= s & "第" & i & "个参数:" & a(i) & vbcrlf next msgbox s end sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯