



全文預(yù)覽已結(jié)束
下載本文檔
版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡介
基礎(chǔ)題(1)【考點(diǎn)分析】本題考點(diǎn)有:組合框的Name、Width、Style、List屬性和窗體的MaxButton、MinButton屬性?!窘忸}思路】通過將MaxButton、MinButton屬性值設(shè)置為False使窗體標(biāo)題欄上不顯示最大化和最小化按鈕?!静僮鞑襟E】步驟1:建立界面,添加控件并設(shè)置控件的屬性。程序中用到的控件及屬性見表3.159。步驟2:調(diào)試并運(yùn)行程序,關(guān)閉程序后按題目要求存盤?;A(chǔ)題(2)【考點(diǎn)分析】本題考點(diǎn)有:文本框的Name屬性和SetFocus方法,命令按鈕的Name和Caption屬性?!窘忸}思路】文本框的名稱由其Name屬性設(shè)置;命令按鈕的名稱和標(biāo)題由其Name和Caption屬性設(shè)置。要將光標(biāo)置于所需要的文本框可用獲得焦點(diǎn)的SetFocus方法?!静僮鞑襟E】步驟1:建立界面,添加并設(shè)置控件的屬性。程序中用到的控件及屬性見表3.160。步驟2:編寫程序代碼。參考答案Private Sub Command1_Click() Text1.SetFocusEnd SubPrivate Sub Command2_Click() Text2.SetFocusEnd Sub步驟3:調(diào)試并運(yùn)行程序,關(guān)閉程序后按題目要求存盤。簡單題(1)【考點(diǎn)分析】本題考點(diǎn)有:單選按鈕的Caption、Value屬性,單選按鈕數(shù)組,If判斷語句和For循環(huán)語句?!窘忸}思路】單選按鈕的標(biāo)題由其Caption屬性設(shè)定;在窗體上添加一個(gè)單選按鈕控件,通過對(duì)單選按鈕控件的復(fù)制產(chǎn)生單選按鈕控件數(shù)組,其Index不同。單選按鈕的Value屬性值為False或True決定該單選按鈕是否被選中?!静僮鞑襟E】步驟1:打開本題工程文件,在窗體上添加一個(gè)單選按鈕控件組Option1,程序中用到的控件及屬性見表3.161。 表3.161控件單選按鈕組單選按鈕1單選按鈕2單選按鈕3單選按鈕4屬性NameCaptionIndexValueCaptionIndexCaptionIndexCaptionIndex設(shè)置值Option1選項(xiàng)10True選項(xiàng)21選項(xiàng)32選項(xiàng)43步驟2:分析并編寫程序代碼。程序提供代碼Private Sub Command1_Click() For k = 0 To 3 If Option1(k).Value Then n = k End If Next k Option1(n).Value = False n = n + 1 If n = 4 Then n = 0 End If Option1(n).Value = TrueEnd Sub程序結(jié)束步驟3:調(diào)試并運(yùn)行程序,關(guān)閉程序后按題目要求存盤。簡單題(2)【考點(diǎn)分析】本題考點(diǎn)有:組合框的List、ListIndex屬性,命令按鈕的Caption屬性,Left( )函數(shù),Right( )函數(shù),Mid( )函數(shù),Select Case語句?!窘忸}思路】用Select Case語句來表示選擇列表框不同的值。Left( )函數(shù)表示取字符串左邊的n個(gè)字符;Right( )函數(shù)表示取字符串右邊的n個(gè)字符; Mid( )函數(shù)的語法為:Mid( 字符串,p,n),表示從位置p開始取字符串的n個(gè)字符?!静僮鞑襟E】步驟1:打開本題工程文件步驟2:分析并編寫程序代碼。程序提供代碼Dim is_num As BooleanPrivate Sub Command1_Click() Dim tmpStr As String * 50 Select Case Combo1.ListIndex Case 0 tmpStr = Left(Trim(Text1.Text), 3) Case 1 tmpStr = Right(Trim(Text1.Text), 3) Case 2 tmpStr = Mid(Trim(Text1.Text), 3, 4) End Select Text2.Text = tmpStr End Sub程序結(jié)束步驟3:調(diào)試并運(yùn)行程序,關(guān)閉程序后按題目要求存盤。綜合題【考點(diǎn)分析】本題考點(diǎn)有:文件操作,數(shù)據(jù)類型和數(shù)組,Val( )函數(shù),F(xiàn)or循環(huán)語句,文本框的Text屬性以及命令按鈕的Click事件。【解題思路】在Command1_Click事件過程中,用循環(huán)、變量代換和數(shù)組來計(jì)算一個(gè)數(shù)是前兩個(gè)數(shù)之和的數(shù)列的第40項(xiàng)?!静僮鞑襟E】步驟1:打開本題工程文件。步驟2:分析并編寫程序代碼。程序提供代碼Dim a(50) As LongPrivate Sub Command1_Click()需要考生編寫的程序End SubPrivate Sub Command2_Click() Open App.Path & out5.txt For Output As #1 Print #1, Text2.Text Close #1End Sub程序結(jié)束參考答案 Dim f As Long a(1) = 1 a(2) = 1 Fo
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 2020年全國生物學(xué)聯(lián)賽加試答案
- 河南省許平汝名校2025屆高三下學(xué)期二模試題 物理 含解析
- 品牌代理運(yùn)營合同協(xié)議
- 榆次二手房買賣合同協(xié)議
- 2025借款合同優(yōu)于租賃合同
- 2025中型建筑承包合同范本
- 哈密供熱合同協(xié)議
- 品牌規(guī)劃咨詢合同協(xié)議
- 四川省南充市2025屆高三下學(xué)期4月三診試題 政治 含解析
- 2025版全面單價(jià)合同范本
- 小兒雜?。ㄖ嗅t(yī)兒科學(xué)課件)
- GB/T 19228.1-2003不銹鋼卡壓式管件
- 職業(yè)體驗(yàn)活動(dòng)記錄表
- 衛(wèi)生統(tǒng)計(jì)學(xué)-回歸與相關(guān)
- 德國政治制度簡介課件
- 古詩《江上漁者》講課稿課件
- 高標(biāo)準(zhǔn)基本農(nóng)田建設(shè)項(xiàng)目監(jiān)理月報(bào)1期
- 水質(zhì)自動(dòng)在線監(jiān)測系統(tǒng)技術(shù)協(xié)議1010審計(jì)
- DBJ04∕T 258-2016 建筑地基基礎(chǔ)勘察設(shè)計(jì)規(guī)范
- 七年級(jí)地理下雙向細(xì)目表
- 企業(yè)風(fēng)險(xiǎn)評(píng)估報(bào)告模板
評(píng)論
0/150
提交評(píng)論