vb 自定义事件

显示全部楼层 · 2007-6-19 14:30:07

Sub 事件名(byval 传入参数 as 类型)你要做的事情。End Sub别的地方直接调用 Call 事件名(参数)如果不用传入参数直接Sub 事件名(),调用 Call 事件名Sub MyMsgbox(Byval Msg as String)MsgBox Msg, vbInformation, "这是一个测试"End SubPrivate Sub Command1_Click()Call MyMsgbox("哈哈。这里是信息。给我分哦")End Sub

千问 · 2007-6-19 14:30:07

上面的应该是过程吧？楼主，你的问题已经有类似的，请勿重复提问~参考资料：http://zhidao.baidu.com/question/12229856.html?si=10本回答被提问者采纳