- 3
- 0
- 约1.1万字
- 约 25页
- 2018-03-11 发布于河南
- 举报
VB二级入门六
第六章:常用控件
设计一个窗体分为三步:
添加控件,设置属性和书写代码
设置对象的属性:
对象名.属性名=值
调用对象的方法:
对象名.方法名
常用的方法有:show,hide,setfocus
常用的控件及其属性
(1)窗体(Form)
caption:标题栏上的文字.(即标题)
maxbutton:指定窗口是否有最大化按钮(即最大化按钮是否可用)
minbutton:指定窗口是否有最小化按钮(即最小化按钮是否可用)
borderstyle:边框的样式.默认的连框是可以调动大小的.如果希望不能改变窗口的大小,则需要将borderstyle改为1或3(即固定对话框)
icon:指定窗口的图标,(可以设置为一些扩展名为.ico的图标文件)
(2)标签(Label)
caption:标签中的显示的文字.
font属性:用于设置标签中的字体大小.
在属性框中设置与字体有关的属性,是直接设置font,而在代码中设置属性,则必须设置如下属性:
fontsize:字体的大小(如9号)
fontname:字体的样式(如隶书)
fontbold:字体是否以粗体显示
fontitalic:字体是否是斜体
fontunderline:字体是否有下划线
forecolor:字体的颜色
例:新建一个如图所示的窗口,要求在运行时,单击改变字体,则将你好设置为20号字,粗体,下划线,字的颜色为红色.
在改变字体中写代码:
Label1.FontSize = 20
Label1.FontBold = True
Label1.FontUnderline = True
Label1.ForeColor = RGB(255, 0, 0) 也可以将rgb()改写为vbred
(3)文本框(Text)
text:框中的内容
passwordchar:指定文本框中显示的字符(一般为占位符)通常用于保密设置,习惯上设置为*号
例:新建一个如图所示的窗口,要求:
当在文本框中输入时,文本框2中自动显示相同的内容,当单击明码时,则显示原样的文字,而单击密码时,则在text2中显示若干个*号,单击清除时,将文本框1的内容清除,同时光标定位在第一个文本框中.
Private Sub Command1_Click() 在按钮Command中的Click中写代码.(只需要写中间这句就可以
Text2.PasswordChar =
End Sub
Private Sub Command2_Click()
Text2.PasswordChar = *
End Sub
Private Sub Command3_Click()
Text1.Text =
Text1.SetFocus
End Sub
Private Sub Text1_Change()
Text2.Text = Text1.Text
End Sub
空两面
(4)命令按钮(Command)
caption:按钮的文字,即标题
default属性:指定按钮是否可以响应Enter键(回车键),即按下回车键相当于去单击此按钮.
cancel:指定按钮是否可以响应Esc键,即按下ESc,等同于单击此按钮.
如何为一个按钮设置访问键(即热键)?? 在按钮的caption的后面加上字母,该字母就是热键.
例:设计一个如图所示的窗口,要求单击确定时,则将窗口的标题设置为abcd,要求按回车键也可以实现此功能.单击取消时,结束程序.要求按Esc键也可以实现此功能
在确定按钮中书写代码:
form1.caption=abcd
在取消中写代码:
end
为了实现按Esc和enter键等同于单击按钮,需要将确定的default属性设置为true,取消的cancel属性设置为true
(5)复选框(checkbox)--方框打勾
caption:复选框旁边的文字.
value:复选框是否被选中(即打上勾),0--未选中,1--选中,2--不确定.
例:新建一个如图所示的窗口,要求武汉大学会随着相应的选择而改变.(即当选择粗体时,武汉大学会加粗)
在粗体复选框(即check1中写代码)
If Check1.Value = 1 Then
Label1.FontBold = True
Else
Label1.FontBold = False
End If
斜体(check2)和下划线(CHeck3)中代码和粗体相似,只需要将check1改为che
您可能关注的文档
最近下载
- 贵州省事业单位考试职业能力倾向测验(综合管理类A类)2026年备考策略精析.docx VIP
- 混凝土结构设计标准 GB_T 50010(最新修订版).docx VIP
- 江苏省重点高中2026届高三3月九校联考英语试卷(含答案解析)原卷.pdf
- 《数学(拓展模块一)上下册》中职数学课程全套教学课件.pptx
- 电磁阀课件PPT教学课件.pptx VIP
- 西安交大《大学物理(上册)》教学课件-NO5.ppt VIP
- 统编版 一年级下册道德与法治 第3课《错了就要改》(第二课时)教学课件.pptx
- 事故应急处置及应急知识培训.pptx VIP
- 2025年安徽警官职业学院单招职业适应性测试题库(历年真题).docx VIP
- 高额业绩承诺下的医药企业审计风险研究--以亚太药业为例.pdf
原创力文档

文档评论(0)