freepeople性欧美熟妇, 色戒完整版无删减158分钟hd, 无码精品国产vα在线观看DVD, 丰满少妇伦精品无码专区在线观看,艾栗栗与纹身男宾馆3p50分钟,国产AV片在线观看,黑人与美女高潮,18岁女RAPPERDISSSUBS,国产手机在机看影片

正文內容

visualbasic6(計算機實驗)(編輯修改稿)

2025-09-17 13:21 本頁面
 

【文章內容簡介】 開始的,即第一個控件的TabIndex為0,第二個為1;如果使某個控件不能接受Tab鍵的跳轉,需設置TabStop屬性為“False”(默認為True)要使某個命令按鈕具有一定的功能,需響應它的Click事件使某個控件獲取輸入焦點要調用該控件的SetFocus方法,即:,參考代碼實驗二、單選按鈕一、參考下圖設計一個應用程序,三個單選按鈕的標題分別為“9”、“11”和“14”,通過單擊這些按鈕可以控制文本框中文字字體的大小 提示用屬性窗口先設置文本框的Text屬性,內容可參考上圖文本框的字體大小屬性為“FontSize”,單選按鈕的“Value”屬性決定了它的選中狀態(tài),True表示選中,F(xiàn)alse表示未選中要實現(xiàn)要求的功能,需響應單選按鈕的“Click”事件,判斷該單選按鈕的Value屬性,如果選中則設置文本框的字體大小為相應的值,參考代碼If Then = 9(另外兩個單選按鈕與其相似)實驗三、復選框一、參考下圖修改“實驗二”的程序,添加兩個復選框,標題分別為“粗體”和“斜體”,它們可以控制文本框中文字字體的粗體和斜體 提示文本框的“粗體”屬性為“FontBold”、“斜體”屬性為“FontItalic”,復選框的“Value”屬性決定了復選框的選中狀態(tài),“1”表示選中,“0”表示未選中要實現(xiàn)要求的功能,需響應復選框的“Click”事件,判斷該復選框的Value屬性,如果選中則設置文本框的字體的粗體和斜體屬性為真,參考代碼 = IIf( = 1, True, False)和 = IIf( = 1, True, False)實驗四、框架一、參考下圖修改“實驗三”的程序,添加一個框架,標題為“字體”,添加兩個單選按鈕,標題分別為“宋體”和“黑體”,用于控制文本框中文字的字體 提示文本框的字體屬性為“FontName”,框架的標題屬性為“Caption”要將控件添加到框架中,不能直接使用雙擊添加控件的方法,而要先選擇框架,然后選擇控件,最后通過鼠標拖放添加控件參考代碼If Then = amp。quot。宋體amp。quot。和If Then = amp。quot。黑體amp。quot。實驗五、計時器一、新建一個工程,在窗體上添加一個”標簽”和一個“計時器”,編寫程序,在標簽上可以顯示系統(tǒng)時間(每秒刷新一次)提示要求每秒刷新一次,需設置計時器控件的“Interval”屬性為“1000”計時器每到達指定的時間間隔就會觸發(fā)“Timer”時間,因此需響應Timer時間,利用“Time”函數(shù)獲取當前系統(tǒng)時間,然后賦值給標簽的“Caption”屬性,參考代碼 = Time 二、修改上面的程序,要求添加一個計時器,用該計時器控制標簽的前景顏色,“紅色”和“藍色”提示需設置第二個計時器的“Interval”屬性為“1500”,需響應它的“Timer”屬性標簽的前景顏色是“ForeColor”屬性,運行期間用“RGB(紅色分量,綠色分量,藍色分量)”函數(shù)賦值(三個顏色的分量最大值為255,最小值為0,比如紅色為:RGB(255,0,0),藍色為:RGB(0,0,255)),紅色參考代碼: = RGB(255,0,0)要求交替變換顏色,因此需用If語句判斷原來的顏色,然后相應的改變,參考代碼 If = RGB(255,0,0) Then = RGB(0,0,255)Else = RGB(255,0,0) End If實驗六、圖片框和圖像一、下載“”和“”圖片(下載方法:在超級鏈結上單擊鼠標右鍵,然后選擇“目標另存為”),保存在D:\下,在新建一個工程,在窗體中添加一個圖片框和一個圖像,圖片框的大小為20001800,顯示“”,圖像的大小為20001000,顯示“”,圖像能夠按照控件的比例顯示圖片提示控件的大小屬性是由“Width”(寬度)屬性和“Height”(高度)屬性控制的圖片框(Picture1)的圖片屬性為“Picture”,通過打開對話框可以打開圖片圖像(Image1)的圖片屬性為“Picture”,通過打開對話框可以打開圖片想要圖像能夠按照控件的比例顯示圖片,需將圖像控件的“Stretch”屬性設置為“True”補充實驗:嘗試在圖片框和圖像中顯示其他圖片,圖片可以到C:\Windows目錄中尋找 實驗七、控件的綜合實驗(一)一、創(chuàng)建一個工程,參考下圖設計窗體和控件 要求如下可以在三個文本框中輸入“語文”、“數(shù)學”、“英語”成績單擊“開始計算”可以計算“總分”三個復選框可以控制總分中是否包含其指定的成績提示計算總成績時需聲明一個總分變量,例如“Sum”通過判斷相應的復選框是否選中(Value屬性是否等于1)決定是否將相應的文本框的Text屬性的值累加到Sum中計算結束后將變量Sum的值賦值給總分文本框開始計算按鈕的單擊事件的處理程序可參考如下代碼:Dim Sum As IntegerIf = 1 Then Sum = Sum + If = 1 Then Sum = Sum + If = 1 Then Sum = Sum + = Sum練習八、列表框一、新建一個工程,如下圖擺放文本框、命令按鈕和列表框,要求如下:在文本框中輸入文字后,單擊“添加”可以向列表框中添加輸入的文本在列表框中選擇某個項目后單擊“刪除當前”可以刪除選中的項目單擊“全部清除”按鈕可以清除列表框中的所有項目 提示向列表框中添加文本需調用列表框的“AddItem”方法(語法為: 文本),將文本框中的文字添加到列表框中可參考如下代碼: 列表框的ListIndex屬性返回被選中項目的編號,刪除列表框中選中的文本需調用列表框的“RemoveItem”方法,該方法的語法為: 項目編號,可以參考下列代碼: 刪除列表框中所有項目需調用列表框的“Clear”方法練習九、組合框一、新建一個工程,如下圖,在窗體中添加兩個標簽和一個組合框(樣式為:下拉列表框),其中上面的標簽的字體為“宋體 三號”,組合框中有如下項目“紅色、綠色、藍色、黑色”,當用戶在下拉列表框中選擇一個顏色時,可以將標簽的前景色作相應的更改 提示標簽的前景色屬性為“ForeColor”,用“RGB()”函數(shù)賦值用戶在組合框中選擇項目時觸發(fā)組合框的“Click”事件,因此需響應組合框的Click事件,判斷用戶當前選擇的顏色名稱,然后將標簽的前景色更改成相應的顏色,即: if =amp。quot。紅色amp。quot。 then =RGB(255,0,0)if =amp。quot。綠色amp。quot。 then =RGB(0,255,0)if =amp。quot。藍色amp。quot。 then =RGB(0,0,255)if =amp。quot。黑色amp。quot。 then =RGB(0,0,0) 第四章 語句與控制結構練習一、交互函數(shù)目的熟悉VB交互函數(shù)及語句(過程)的用法掌握InputBox函數(shù)的用法,學會利用InputBox函數(shù)從用戶獲取信息掌握MsgBox函數(shù)和語句的用法,學會利用MsgBox語句提示信息,用MsgBox函數(shù)提示信息并獲取用戶的響應 一、新建一個工程,用“第四章練習一(1)”命名工程和窗體,保存在自己的目錄中,在其窗體上添加一個命令按鈕,要求用戶單擊該命令按鈕時提示用戶輸入其姓名,然后在窗體上打印該姓名提示InputBox函數(shù)的語法如下返回值=InputBox(amp。quot。提示信息amp。quot。[,amp。quot。對話框標題amp。quot。][,默認值])其中“返回值”、“提示信息”和“對話框標題”均為字符串類型,如果用戶單擊對話框的“確定”按鈕,則“返回值”等于用戶在對話框的文本框中輸入的文字,如果單擊“取消”則“返回值”等于空值(amp。quot。amp。quot。)該程序需響應命令按鈕的單擊(Click)事件,參考代碼如下Dim s As Strings = InputBox(amp。quot。請輸入您的姓名amp。quot。,amp。quot。輸入姓
點擊復制文檔內容
物理相關推薦
文庫吧 www.dybbs8.com
備案圖片鄂ICP備17016276號-1