VB语言中form窗体和控件怎么用
这篇文章主要介绍VB语言中form窗体和控件怎么用,文中介绍的非常详细,具有一定的参考价值,感兴趣的小伙伴们一定要看完!
创新互联公司主要从事成都网站制作、成都网站建设、外贸营销网站建设、网页设计、企业做网站、公司建网站等业务。立足成都服务灵川,10多年网站建设经验,价格优惠、服务专业,欢迎来电咨询建站服务:028-86922220
一、有关考试的几个问题
首先,提问:考试最重要的是什么?
答案其实很简单:得分!!!!!
想要得分,就要做到基本的保存。
保存哪些文件呢?
1.窗体代码的文件frm扩展名的文件
2.工程文件vbp扩展名
3.应用程序文件exe扩展名
如何查看文件扩展名?
组织----文件夹和搜索选项-----查看-----去掉“隐藏已知类型的扩展名”这个勾
对于报错的心态?
把握正确的处理心态,把报错看成是一种引导提示,帮助我们解决问题。
timer时钟要启动必须要有两个要点:
1.配置时间间隔internal单位为毫秒,1秒=1000毫秒
2.配置是否可用熟悉enabled为true才能运行。如果为false那么是不能运行的。
二、基本复习知识点
form窗体初始化加载的事件:Form_Load
如何通过代码设置label标签的字体?
有关字体的配置:
FontName 设置字体类型
FontSize 设置字体大小
FontBold 设置字体加粗
FontItalic 设置字体倾斜
FontUnderline 设置字体加上下划线
FontStrikethru 设置字体的删除线
使用方法:
Label1.FontName = "华文行楷"
Label1.FontSize = 60
Label1.FontBold = True
Label1.FontItalic = True
Label1.FontUnderline = True
Label1.FontStrikethru = True
三、新学一个控件
listbox列表框
listbox所在控件列表位置
在listbox中,加入的内容是一项一项的,我们可以将列表框中的内容单独取出或者加入。
提问:如何在录入属性的时候连续录入呢?
每一个项目的内容录入在list属性中
需要按住快捷键ctrl+enter进行下一项录入。
但是,实际上,往往在项目中,更多的是在代码中往listbox中添加项目。
代码添加一项,通过AddItem方法进行添加。
使用方法:
list控件对象.AddItem 字符串类型
获取listbox控件中的项目
通过list属性进行获取,注意这个list属性是一个数组。
数组的索引默认情况下是从0开始的。
所以第一项的索引是0
第二项的索引就是1
使用方法:
List1.List(这里填写索引项目)
从listbox中删除一个项目,使用函数RemoveItem
使用方法:
List1.RemoveItem 这里填写要删除的索引。
ListIndex代表当前listbox中被选中的这一行的索引。
当listindex的值为-1时代表listbox中的项目没有被选中。
所以,我们可以通过这个值的判断进行友情提示,防止报错!
判断代码:
If List1.ListIndex = -1 Then
MsgBox "请选择项目"
Else
List1.RemoveItem List1.ListIndex
End If
提问:如果一个专业有五个班,我们如果在添加的时候一次添加5个班级?
例如:专业为“18软件”,点击“添加”按钮后,在listbox中要立即出现18软件1、18软件2、18软件3、18软件4、18软件5
通过for循环来实现。
For i = 1 To 5 Step 1
List1.AddItem Text1.Text & i
Next i
本节教程相关源代码:
工程文件列表:
form1窗体设计:
form1
form1源代码:
Private Sub Form_Load()
Label1.FontName = "华文行楷"
Label1.FontSize = 60
Label1.FontBold = True
Label1.FontItalic = True
Label1.FontUnderline = True
Label1.FontStrikethru = True
End Sub
Private Sub Timer1_Timer()
If Label1.Caption = "0" Then
Timer1.Enabled = False
Form2.Show
Form1.Hide
Else
Label1.Caption = Val(Label1.Caption) - 1
End If
End Sub
form2界面设计:
form2
form2源代码:
Private Sub Command1_Click()
For i = 1 To 5 Step 1
List1.AddItem Text1.Text & i
Next i
End Sub
Private Sub Command2_Click()
If List1.ListIndex = -1 Then
MsgBox "请选择项目"
Else
List1.RemoveItem List1.ListIndex
End If
End Sub
Private Sub Command3_Click()
MsgBox List1.List(1)
End Sub
以上是“VB语言中form窗体和控件怎么用”这篇文章的所有内容,感谢各位的阅读!希望分享的内容对大家有帮助,更多相关知识,欢迎关注创新互联行业资讯频道!
标题名称:VB语言中form窗体和控件怎么用
分享网址:http://hbruida.cn/article/jpcpge.html