1[簡答題](1)在Form1的窗體上繪制一個圖片框,其名稱為Picture1。編寫適當的事件過程,使程序運行后,若單擊窗體,則從圖片框的(300,600)位置處開始顯示"Visual Basic"。程序運行情況如圖16-1所示。
注意:程序中不得使用任何變量。文件必須存放在考生文件夾中,工程文件名為sj1.vbp,窗體文件名為sj1.frm。
(2)在Form1的窗體上繪制一個文本框,名稱為Text1;繪制一個命令按鈕,名稱為Command1,標題為"顯示",TabIndex屬性設為0。請為Command1設置適當的屬性,使得當焦點在Command1時,按Esc鍵就調用Command1的Click事件,該事件過程的作用是在文本框中顯示"VisualBasic程序設計",程序運行結果如圖16-2所示。
注意:程序中不得使用任何變量;文件必須存放在考生文件夾中,工程文件名為sj2.vbp,窗體文件名為sj2.frm。
參考解析:
(1)本題主要考查圖片框控件的畫法和屬性設置,以及簡單的窗體事件的編寫。根據題意,新建"標準EXE"工程,在窗體上添加一個名稱為Picture1的圖片框,設計完成后,進入代碼窗口編寫如下代碼:
(2)命令按鈕的Cancel屬性返回或設置一個值,用來指示窗體中命令按鈕是否為取消按鈕,它有兩種取值:True和False。值為True時,命令按鈕不是窗體的取消按鈕,按Esc鍵與單擊該命令按鈕的作用相同;值為False時,命令按鈕是窗體的取消按鈕。
根據題意,新建"標準EXE"工程,在窗體上添加一個文本框,其名稱為"Text1",一個命令按鈕,其名稱為Com-mand1、Caption屬性為"顯示"、Cancel屬性為"True",TabIndex屬性為0。設置完成后雙擊Command1命令按鈕,編寫如下代碼:
2[單選題] 當一個復選框被選中時,它的Value屬性的值是( )。
A.3B.2C.1D.0
參考答案:C
參考解析:復選框的Value屬性可以設置為3種:0-Uncheeked,表示沒有選擇該復選框;1-Checked,表示選中該復選框;2-Grayed,表示該復選框被禁用(灰色)。
3[簡答題](1)在名為Form1的窗體上建立兩個主菜單,其標題分別為"文件"和"幫助",名稱分別為vbFile和vbHelp,在"文件"菜單下有3個菜單項,分別為"新建"、"打開"和"保存"(其名稱分別為vbNew、vbOpen和vbSave)。要求程序運行后,如果選中"文件"下的某個菜單項,則將該菜單項的標題通過MsgBox對話框顯示出來,如圖50-3所示。
注意:文件必須存放在考生文件夾中,窗體文件名為sj3.frm,工程文件名為sj3.vbp。
(2)在名為Form1的窗體上建立一個文本框,名為Text1;再建立一個命令按鈕,名為Cmd1,標題為"計算",如圖50-4所示。
要求程序運行后,單擊命令按鈕,則計算出100~200所有素數之和,并在文本框中顯示結果,同時把結果存入文件out48.txt中(在考生文件夾中有標準模塊mode.bas,其中的PutData過程可以把結果存入文件;而isprime函數可以判斷整數X是否為素數,如果是素數,則函數返回True,否則返回False;考生可以把該模塊文件添加到自己的工程中)。
注意:文件必須存放在考生文件夾中,窗體文件名為sj4.frm,工程文件名為sj4.vbp。
參考解析:
(1)①新建一個名為Form1的窗體。
、趫(zhí)行"工具"菜單中的"菜單編輯器"命令,打開菜單編輯器;在"標題"欄中輸入"文件",在"名稱"欄中輸入"vbFile";單擊"下一個"按鈕,再單擊編輯區(qū)的右箭頭按鈕,在"標題"欄中輸入"新建",在"名稱"欄中輸入"vbNew";單擊"下一個"按鈕,在"標題"欄中輸入"打開",在"名稱"欄中輸入"vbOpen";單擊"下一個"按鈕,在"標題"欄中輸入"保存",在"名稱"欄中輸入"vbSave";單擊下"標題"欄中輸入"幫助",在"名稱"欄中輸入"vbHelp";
③打開代碼窗口輸入如下代碼:
、馨匆蟊4嫖募赐瓿杀绢}。
(2)①新建一個名為Form1的窗體。
②單擊工具箱中的TextBox控件圖標,在窗體上拖拉出一個文本框,在屬性窗口設置該文本框名稱為Text1。
③單擊工具箱中的CommandButton控件圖標,在窗體上拖拉出一個命令按鈕,在屬性窗口設置該命令按鈕名稱為Cmd1,Caption屬性為"計算"。
、艽蜷_代碼窗口,輸入如下代碼:
、莅匆蟊4嫖募赐瓿杀绢}。
4[簡答題](1)在考生文件夾下有工程文件sj3.vbp及窗體文件sj3.frm,該程序是不完整的。在名稱為Form1的窗體上有3個Text控件及5個命令按鈕,功能為:開始啟動工程時,界面上除“讀取數據”及“關閉”按鈕有效之外,其他按鈕均不可用(灰色顯示);單擊“讀取數據”按鈕之后,利用InputBox讓用戶連續(xù)且必須輸入8個數。若錄入為非數字符號,則給出提示“輸人數據無效,請重新輸入:”;輸入完畢后,“讀取數據”變灰,其他變?yōu)榭捎脿顟B(tài);按相應的按鈕可分別求出所輸人數據的升序排列及平均值,并在右側對應的文本框中顯示(注意用A(8)存放最大數,A(1)存放最小數);單擊“清空”按鈕將所有文本框清空。如圖70-3所示。
注意:請在有“?”的地方填入正確內容,然后刪除“?”及代碼前的所有注釋符“'”,但不能修改其他部分。存盤時不得改變文件名和文件夾。
(2)在考生文件夾下有工程文件sj4.vbp及窗體文件sj4.frm,該程序是不完整的。在名稱為Form1,窗體上有3個Label控件、2個Text控件和2個命令按鈕。該程序的主要功能是求從1到Text1中用戶輸入的任意自然數n的累加和。剛啟動工程時,可以在輸人框內輸入任意自然數(n值太大時,運算時間將很長,建議不超過4位)。當輸人為非數值時,累加結果為0;單擊“開始”可以在Text2中顯示累加和,同時“開始”變?yōu)椤巴瓿伞辈⒆兓?單擊“關閉”按鈕結束程序的運行。如圖70-4所示。
注意:請在有“?”的地方填入正確內容,然后刪除“?”及代碼前的所有注釋符“'”,但不能修改其他部分。存盤時不得改變文件名和文件夾。
參考解析:
(1)用數組str(8)來接收InputBox輸入的8個數,In-putBox的格式為:InputBox(提示[,標題][,默認][,X坐標位置][,Y坐標位置]);Enabled屬性可設置控件是否可用,當該值為True時可用,為False時不可用(灰色);Val( )函數將字符轉換成數值。
根據題意,將5個命令按鈕和3個文本框控件添加到窗體中,命令按鈕的名稱分別為Command1、Command2.Command3、Command4和Command5,Caption屬性分別為“讀取數據”、“升序顯示”、“平均值”、“清空”和“關閉”,文本框的名稱分別為Text1、Text2和Text3,Text屬性都為空。
雙擊Command1進入代碼窗口,補充后的代碼如下:
(2)要計算累加和通常利用for循環(huán)來完成。文本框中的內容(包括數字)默認都是當做字符串來處理的,如果要參與數據運算則需先用Val( )函數將其轉化為數字。
根據題意,將3個標簽、2個命令按鈕和2個文本框控件添加到窗體中,標簽的Caption屬性分別為“要求:程序能得到結果total,total=l+2+3+…+n”、“輸入n(0
5[簡答題]在名稱為Form1的窗體上匭一個文本框,名稱為Text1,MuhiLine屬性為True,ScrollBars屬性為2;兩個命令按鈕,名稱分別為Cmd1和Cmd2,標題分別為“讀人數據”和“計算保存”,如圖63-6所示。要求程序運行后,如果單擊“讀人數據”按鈕,則讀入in.txt文件中的100個整數,放入一個數組中(數組下界為1),同時在文本框中顯示出來;如果單擊“計算保存”按鈕,則計算數組中大于或等于400并且小于800的所有數之和,并將結果在文本框Text1中顯示出來,同時把結果存入考生文件夾的result.txt文件中(在prog.bas中的PutData過程可以把結果存入result.txt文件)。
注意:文件必須存放在考生文件夾下,窗體文件名為sj5.frm,工程文件名為sj5.vbp,計算結果存入result.txt文件中,否則沒有成績。
參考解析:文本框顯示的內容通過Text屬性設置;按鈕的標題通過Caption屬性設置,單擊命令按鈕觸發(fā)Click事件。本題涉及文件的操作,讀入順序文件以順序的方式打開,用“Input#”語句讀取數據。另外需要注意的是,對文件操作結束后,一定要關閉文件。
、俳⒔缑娌⒃O置控件屬性。程序中用到的控件及其屬性如下表所示:
、诖蜷_工程資源管理器,在其空白處右鍵添加模塊prog.bas(此文件已在考生文件夾里),模塊代碼如下:
、鄞蜷_工程資源管理器,右擊窗體,選擇查看代碼項,在彈出的代碼窗口輸入代碼如下:
相關推薦:
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內蒙古 |