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 = 60Label1.FontBold = TrueLabel1.FontItalic = TrueLabel1.FontUnderline = TrueLabel1.FontStrikethru = TrueEnd Sub
Private Sub Timer1_Timer()
If Label1.Caption = "0" Then    Timer1.Enabled = False    Form2.Show    Form1.HideElse    Label1.Caption = Val(Label1.Caption) - 1End If
End Sub

form2界面设计：

form2

form2源代码：

Private Sub Command1_Click()For i = 1 To 5 Step 1    List1.AddItem Text1.Text & iNext i
End Sub
Private Sub Command2_Click()If List1.ListIndex = -1 Then    MsgBox "请选择项目"Else    List1.RemoveItem List1.ListIndex
End IfEnd Sub
Private Sub Command3_Click()MsgBox List1.List(1)End Sub

以上是“VB语言中form窗体和控件怎么用”这篇文章的所有内容，感谢各位的阅读！希望分享的内容对大家有帮助，更多相关知识，欢迎关注创新互联行业资讯频道！