阿玛迪斯战记 灰屏:怎么在VB的按钮中加些代码使他弹对话框?

来源:百度文库 编辑:神马品牌网 时间:2024/04/19 14:59:09
加什么代码"?
也就是说.一个按钮 你按了它 它就弹个窗口说你设置的话

双击哪个按纽

然后在代码哪里写

msgbox "这里就放话"

是的,就那么写!

如果是提示框的话很简单:
msgbox"你想说的话"
如果是另外一个窗体就麻烦了,你需要建立一个窗体,在里面用label输上你设置的话,假如窗体名为frmmsg,那么就在按钮的代码区域打上:
frmmsg.show
第一种比较简单,第二种虽然复杂但能显示更多内容。

sub buttonName_onClick(参数不太记得了)
msgBox "参数不太记得了",0+1+16(定义对话框的样式)
end sub

vbMsgBoxResult = Msgbox(Prompt[,Buttons][,Title][,HelpFile,Contex])
Buttons:
vbOKOnly
vbOKCancel
vbAbortRetryIgnore
vbYesNoCancel
……