Question

VB6.0中怎么设置弹出对话框？

就是在主程序页面按下一个按钮会弹出对话框，显示“你确定要启动吗？”
按下“是”则启动“D:/1.TXT”并关闭本程序
按下“否”则返回主页面

这个程序要怎么写？

Answer 1

用Msgbox函数就可以了：
i=Msgbox("你确定要启用吗？",vbYesNo,是否)
if i=Yes then
j=shell("D:/1.TXT ",1)
else
end
end if