您的位置：程序门 -> vb -> 基础类

超级简单的问题！

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

超级简单的问题！

发表于：2007-02-21 23:06:15 楼主

小弟才学vb没多久！
所以有很多问题
一个窗体上有三个按钮，第一个按钮的作用是调用同级目录中的a.exe，第二个按钮的作用是调用同级abc文件夹中的b.exe，第三个按钮的作用是关闭窗体。请问，这三个按钮事件怎么写啊~？
我用的是microsoft visual basic6.0中文版

发表于：2007-02-21 23:22:261楼得分:0

private sub command1_click（)
shell "a.exe "
end sub

private sub command2_click（)
shell "abc\a.exe "
end sub

private sub command3_click（)
unload me
end sub

发表于：2007-02-21 23:22:332楼得分:0

在三个按钮的click事件中分别输入以下代码

shell app.path+ "\a.exe "

shell app.path+ "\b.exe "

unload me

发表于：2007-02-21 23:39:073楼得分:0

第三个用 end好些如果你有 on unload 的处理的话就不要用了

private sub command3_click（)
end
end sub

发表于：2007-02-23 16:40:574楼得分:0

private sub command1_click（)
shell "a.exe "
end sub

private sub command2_click（)
shell "abc\a.exe "
end sub

private sub command3_click（)
end
end sub

发表于：2007-02-23 16:51:195楼得分:0

private sub command1_click（)
dim op
op = shell（app.path & "\a.exe ", 1)
end sub

private sub command2_click（)
dim op
op = shell（app.path & "\abc\b.exe ", 1)
end sub

private sub command3_click（)
end
end sub

其他资讯