『壹』 vb 在名称为Form1的窗体上,画1个名称为Label1的标签,其标题为"等级考试",能根据标题内容自动调整标签的
你在窗体上加一个名为TEXT1的文本框,然后向文本框输入字符看看
Private Sub Form_Load()
Label1.Alignment = 2 '注意这行版,可以在设计权时完成
Label1.AutoSize = True '注意这行,可以在设计时完成
End Sub
Private Sub Text1_Change()
Label1 = Text1.Text '给你测试的
End Sub
『贰』 要使from1窗体的标题栏显示“欢迎使用vb程序设计的正确语句是”
form1.caption=“欢迎使用vb程序设计的正确语句是"
『叁』 VB6想让提示框的标题是Text1
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
『肆』 请教VB中一个窗体标题的问题
你是说label控件的caption吗。在Private
Sub
Form_Resize()过程中写:Label1.Left
=
(Form1.Width
-
Label1.Width)
/
2
其它控件类似。
『伍』 vb在窗体上画一个文本框和一个命令按钮(命令按钮的标题设置为"显示信息"),运行
(制1)
PrivateSubCommand1_Click()
Print"AAAAAAA"
Text1.Text="BBBBBB"
EndSub
(2)
PrivateSubCommand1_Click()
Text1.Move0,0
Text1.Text="欢迎使用"
EndSub
(3)
PrivateSubForm_Load()
Me.Move1000,2000,6000,3000
EndSub
『陆』 VB程序如何隐藏标题栏,请仔细看补充说明
应该可以的,你可以新建个工程,单独测试这个功能, 如果不能正常的话,问题就在VB本身了, 如果新建工程能, 说明你设计的程序,有些地方影响了这个..具体要看窗体属性设置,以及代码部分了.
补充:
Private Sub Form_Load()
Me.BorderStyle = 0
Me.Caption = ""
End Sub
如果是有菜单的窗体,可以参考VB吧里CBM666老师的方法,将菜单放到另个窗体中,在本窗体调用,这样你这个窗体才能不显示标题栏的.
参考内容:http://post..com/f?ct=335675392&tn=PostBrowser&sc=2021429919&z=214393323&pn=0&rn=50&lm=0&word=vb#2021429919
『柒』 关于VB的一个小问题,标签名称.Caption = "欲显示的文本"
比如你要显示 text1的内回容答
Private Sub Form_Load()
Label1.Caption = Text1.Text
End Sub
Private Sub Text1_Change()
Label1.Caption = Text1.Text
End Sub
『捌』 有关vb标题程序代码的设置
Private Sub Form_Load()
Form1.Caption = "窗体"
End Sub
是可以的
『玖』 vb: 如何控制msgbox的文本内容和标题
msgbox直接使用时制不加括号
如果作为“a = msgbox(“”)”时必加括号
表达式估计就是指“a = ”的部分
具体名字是什么我忘记了,反正带返回值的就要加括号,不带返回值就直接用。
举个例子就是:
MsgBox "此方程不是一元二次方程。" ,,"输入错误" ‘最后两个是帮助部分,可以同时缺省a = MsgBox("此方程不是一元二次方程。" ,,"输入错误",,) ‘这里不用空格 ’默认产生的消息框[只显示确定按钮][第一个按钮为默认按钮][用户必须响应消息框才能继续在当前应用程序中工作]
区别就在这里,使用时注意下。
『拾』 设计一个窗体,窗体的标题为“VB程序设计”,运行程序时单击窗体在窗体上输出“VB程序设计”
Dim x As Integer
Private Sub Form_Click()
If x = 0 Then
x = x + 1
Me.Caption = "欢迎你的到来"
Me.Width = 4700
Me.Height = 3500
Label1.Caption = "VB程序设计内容"
Else
x = 0
Call Form_Load
End If
End Sub
Private Sub Form_Load()
Me.Caption = "VB程序设计"
Me.Width = 4800
Me.Height = 3600
Label1.Caption = ""
End Sub