欧美一区二区三区老妇人-欧美做爰猛烈大尺度电-99久久夜色精品国产亚洲a-亚洲福利视频一区二区

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

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

創(chuàng)新互聯(lián)公司主要從事成都網(wǎng)站制作、成都網(wǎng)站建設(shè)、外貿(mào)營(yíng)銷網(wǎng)站建設(shè)、網(wǎng)頁設(shè)計(jì)、企業(yè)做網(wǎng)站、公司建網(wǎng)站等業(yè)務(wù)。立足成都服務(wù)靈川,10多年網(wǎng)站建設(shè)經(jīng)驗(yàn),價(jià)格優(yōu)惠、服務(wù)專業(yè),歡迎來電咨詢建站服務(wù):028-86922220

一、有關(guān)考試的幾個(gè)問題

首先,提問:考試最重要的是什么?

答案其實(shí)很簡(jiǎn)單:得分!!!!!

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

保存哪些文件呢?

1.窗體代碼的文件frm擴(kuò)展名的文件

2.工程文件vbp擴(kuò)展名

3.應(yīng)用程序文件exe擴(kuò)展名

如何查看文件擴(kuò)展名?

組織----文件夾和搜索選項(xiàng)-----查看-----去掉“隱藏已知類型的擴(kuò)展名”這個(gè)勾

對(duì)于報(bào)錯(cuò)的心態(tài)?

把握正確的處理心態(tài),把報(bào)錯(cuò)看成是一種引導(dǎo)提示,幫助我們解決問題。

timer時(shí)鐘要啟動(dòng)必須要有兩個(gè)要點(diǎn):

1.配置時(shí)間間隔internal單位為毫秒,1秒=1000毫秒

2.配置是否可用熟悉enabled為true才能運(yùn)行。如果為false那么是不能運(yùn)行的。

二、基本復(fù)習(xí)知識(shí)點(diǎn)

form窗體初始化加載的事件:Form_Load

如何通過代碼設(shè)置label標(biāo)簽的字體?

有關(guān)字體的配置:

FontName  設(shè)置字體類型

FontSize  設(shè)置字體大小

FontBold  設(shè)置字體加粗

FontItalic 設(shè)置字體傾斜

FontUnderline 設(shè)置字體加上下劃線

FontStrikethru 設(shè)置字體的刪除線

使用方法:

Label1.FontName = "華文行楷"

Label1.FontSize = 60

Label1.FontBold = True

Label1.FontItalic = True

Label1.FontUnderline = True

Label1.FontStrikethru = True

三、新學(xué)一個(gè)控件

listbox列表框

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

listbox所在控件列表位置

在listbox中,加入的內(nèi)容是一項(xiàng)一項(xiàng)的,我們可以將列表框中的內(nèi)容單獨(dú)取出或者加入。

提問:如何在錄入屬性的時(shí)候連續(xù)錄入呢?

每一個(gè)項(xiàng)目的內(nèi)容錄入在list屬性中

需要按住快捷鍵ctrl+enter進(jìn)行下一項(xiàng)錄入。

但是,實(shí)際上,往往在項(xiàng)目中,更多的是在代碼中往listbox中添加項(xiàng)目。

代碼添加一項(xiàng),通過AddItem方法進(jìn)行添加。

使用方法:

list控件對(duì)象.AddItem 字符串類型

獲取listbox控件中的項(xiàng)目

通過list屬性進(jìn)行獲取,注意這個(gè)list屬性是一個(gè)數(shù)組。

數(shù)組的索引默認(rèn)情況下是從0開始的。

所以第一項(xiàng)的索引是0

第二項(xiàng)的索引就是1

使用方法:

List1.List(這里填寫索引項(xiàng)目)

從listbox中刪除一個(gè)項(xiàng)目,使用函數(shù)RemoveItem

使用方法:

List1.RemoveItem 這里填寫要?jiǎng)h除的索引。

ListIndex代表當(dāng)前l(fā)istbox中被選中的這一行的索引。

當(dāng)listindex的值為-1時(shí)代表listbox中的項(xiàng)目沒有被選中。

所以,我們可以通過這個(gè)值的判斷進(jìn)行友情提示,防止報(bào)錯(cuò)!

判斷代碼:

If List1.ListIndex = -1 Then

    MsgBox "請(qǐng)選擇項(xiàng)目"

Else

    List1.RemoveItem List1.ListIndex

End If

提問:如果一個(gè)專業(yè)有五個(gè)班,我們?nèi)绻谔砑拥臅r(shí)候一次添加5個(gè)班級(jí)?

例如:專業(yè)為“18軟件”,點(diǎn)擊“添加”按鈕后,在listbox中要立即出現(xiàn)18軟件1、18軟件2、18軟件3、18軟件4、18軟件5

通過for循環(huán)來實(shí)現(xiàn)。

For i = 1 To 5 Step 1

    List1.AddItem Text1.Text & i

Next i

本節(jié)教程相關(guān)源代碼:

工程文件列表:

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

form1窗體設(shè)計(jì):

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

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界面設(shè)計(jì):

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

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 "請(qǐng)選擇項(xiàng)目"Else    List1.RemoveItem List1.ListIndex
End IfEnd Sub
Private Sub Command3_Click()MsgBox List1.List(1)End Sub

以上是“VB語言中form窗體和控件怎么用”這篇文章的所有內(nèi)容,感謝各位的閱讀!希望分享的內(nèi)容對(duì)大家有幫助,更多相關(guān)知識(shí),歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道!

當(dāng)前題目:VB語言中form窗體和控件怎么用
URL標(biāo)題:http://chinadenli.net/article14/jpcpge.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供域名注冊(cè)自適應(yīng)網(wǎng)站小程序開發(fā)面包屑導(dǎo)航網(wǎng)頁設(shè)計(jì)公司網(wǎng)站設(shè)計(jì)公司

廣告

聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)

網(wǎng)站托管運(yùn)營(yíng)