VB語言中form窗體和控件怎么用

這篇文章主要介紹VB語言中form窗體和控件怎么用，文中介紹的非常詳細，具有一定的參考價值，感興趣的小伙伴們一定要看完！

一、有關考試的幾個問題

首先，提問：考試最重要的是什么？

答案其實很簡單：得分！！！！！

想要得分，就要做到基本的保存。

保存哪些文件呢？

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窗體和控件怎么用”這篇文章的所有內容，感謝各位的閱讀！希望分享的內容對大家有幫助，更多相關知識，歡迎關注億速云行業資訊頻道！