用MSGBOX函数设计版权信息。
MsgBox函数可用来设计简易的版权信息,它只能显示文本,如果要求不高的话可采用它,优点是非常方便,比如在菜单ABOUT项中显示版权信息。
MsgBox函数的用法如下:MsgBox msg [, [type][, title] ]
msg —需要显示的文字信息,如版权信息。
type—按钮显示选择项。
如 0 只显示 OK按钮(确省选择),4 显示 Yes 和 No 按钮
title—标题文字信息。
MSGBOX最多能显示1024个字符, 超出的将被截去;它可自动换行,如果你想强制换行的话需要在换行处加入换行符CHR(10)。
例子:
Sub Form_Click ()
Msg1 = ” Copyright (c) 1996” & Chr(10) & Ver
1.0 ” ’分两行显示
MsgBox Msg1, 0, ”Copyright demo” ’只显示一个OK按钮
End Sub