Question

VB6.0 msgbox问题

msgbox提示的时候，头部默认的名称是“工程1”怎么改这里的值啊？谢谢

Answer 1

msgbox
不用这个
自己做个窗口,把这个窗口固顶就ok了
下面是窗口固顶的代码Form1换成你的窗口名就可以了
'FormTop
Form1.hwnd
'窗口固顶
'formtop
Form1.hwnd,false
'解除窗口固顶
'窗口固顶
Public
Declare
Function
SetWindowPos
Lib
"user32"
(ByVal
hwnd
As
Long,
ByVal
hWndInsertAfter
As
Long,
ByVal
x
As
Long,
ByVal
y
As
Long,
ByVal
cx
As
Long,
ByVal
cy
As
Long,
ByVal
wFlags
As
Long)
As
Long
Public
Sub
FormTop(ByVal
FormhWnd
As
Long,
Optional
ByVal
OnOff
As
Boolean
=
True)
'窗口固定
Dim
TopMost
As
Long,
SWP_NoSize
As
Long,
SWP_NoMove
As
Long
SWP_NoSize&
=
&H1
'
保持窗口大小
SWP_NoMove&
=
&H2
'
保持窗口位置
If
OnOff
Then
TopMost
=
-1
Else
TopMost
=
-2
End
If
SetWindowPos
FormhWnd,
TopMost,
0,
0,
0,
0,
SWP_NoMove
Or
SWP_NoSize
End
Sub

Answer 2

看MSDN的帮助
语法

MsgBox(prompt[, buttons] [, title] [, helpfile, context])

MsgBox 函数的语法具有以下几个命名参数：

Prompt 必需的。字符串表达式，作为显示在对话框中的消息。prompt 的最大长度大约为 1024 个字符，由所用字符的宽度决定。如果 prompt 的内容超过一行，则可以在每一行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或是回车与换行符的组合 (Chr(13) & Chr(10)) 将各行分隔开来。
Buttons 可选的。数值表达式是值的总和，指定显示按钮的数目及形式，使用的图标样式，缺省按钮是什么以及消息框的强制回应等。如果省略，则 buttons 的缺省值为 0。
Title 可选的。在对话框标题栏中显示的字符串表达式。如果省略 title，则将应用程序名放在标题栏中。
Helpfile 可选的。字符串表达式，识别用来向对话框提供上下文相关帮助的帮助文件。如果提供了 helpfile，则也必须提供 context。
Context 可选的。数值表达式，由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了 context，则也必须提供 helpfile。

Answer 3

MsgBox(prompt[, buttons][, title][, helpfile, context])

prompt是必须要设定的参数 就是msgbox提示的内容
[title]就是标题喽 改这个就好了

Answer 4

msgbox "内容",vbokcancel,"标题"