a=msgbox("Click yes for continue or no for exit!",vbYesNo,"information")
a=msgbox("Click yes for continue or no for exit!",vbOKOnly,"information")
a=msgbox("Click yes for continue or no for exit!",vbOKCancel,"information")
a=msgbox("迟没轮Click yes for continue or no for exit!",vbAbortRetryIgnore,"information")
a=msgbox("Click yes for continue or no for exit!",vbYesNoCancel,"information")
a=msgbox("Click yes for continue or no for exit!",vbRetryCancel,"information")
a=msgbox("Click yes for continue or no for exit!",4,"information")
a=msgbox("Click yes for continue or no for exit!",0,"information")
a=msgbox("Click yes for continue or no for exit!",1,"information")
a=msgbox("Click yes for continue or no for exit!",2,"information")
a=msgbox("Click yes for continue or no for exit!",3,"information")
a=msgbox("Click yes for continue or no for exit!",5,"information")
a=msgbox("Click yes for continue or no for exit!",16,"Critical")
a=msgbox("Click yes for continue or no for exit!",0,"Question")
a=msgbox("Click yes for continue or no for exit!",0,"Exclamation")
a=msgbox("Click yes for continue or no for exit!"码信,0,"information")
select case msgbox ("内容",4,"标题") '第一个框case 6'判拆磨断按钮枯铅“是”
msgbox "内容" '第二个框,按下“是旅败斗”d出
end select '结束
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)