對口升學計算機專業(yè)試題.doc_第1頁
對口升學計算機專業(yè)試題.doc_第2頁
對口升學計算機專業(yè)試題.doc_第3頁
對口升學計算機專業(yè)試題.doc_第4頁
對口升學計算機專業(yè)試題.doc_第5頁
已閱讀5頁,還剩10頁未讀, 繼續(xù)免費閱讀

下載本文檔

版權說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權,請進行舉報或認領

文檔簡介

裝 訂 線 內(nèi) 不 要 答 題計算機專業(yè)理論試題(A)注意事項:1本試卷共八道大題??偡?40分。2第I卷“一、選擇題”、第II卷“二、判斷題”的答案填涂在機讀卡上,其余各題答案寫在答題紙上,答在試卷上不得分。用藍黑鋼筆、碳素筆或圓珠筆答題。3答題前將密封線內(nèi)項目填寫清楚。第卷(選擇題 共100分)一、選擇題(本大題共50小題,每小題2分,共100分。在每小題所給出的四個選項中,只有一個符合題目要求,將正確選項填涂在機讀卡上計算機專業(yè)理論試題A 第15頁 共 13頁 1計算機處理數(shù)據(jù)過程中,是將存儲介質(zhì)上的數(shù)據(jù)調(diào)入到下列哪種硬件中進行數(shù)據(jù)處理.(A) A內(nèi)存 B硬盤 C光盤 D軟盤 2按照電子器件更新劃分,大規(guī)模集成電路計算機是第幾代. .(D ) A一 B二 C三 D四 3關于計算機軟件描述錯誤的是.(D ) AWindows 98是操作系統(tǒng),屬于系統(tǒng)軟件 B. Office2003是辦公軟件,屬于應用軟件 C圖像處理軟件是處理圖像工具,屬于應用軟件 D. DOS是操作系統(tǒng),屬于應用軟件4二進制數(shù)小數(shù)0.1B轉(zhuǎn)換成十六進制數(shù)的結(jié)果是.(D ) A0.1 B0.4 C0.6 D0.85下列關于計算機病毒防治敘述錯誤的是.(D ) A計算機要經(jīng)常更新殺毒軟件病毒庫并定期查殺 B計算機要安裝軟件防火墻,防止病毒侵入 C來歷不明的郵件文件不要打開,防止郵件中攜帶病毒 D計算機鼠標、鍵盤要定期清洗,防止計算機病毒侵入6計算機最早應用于彈道運算屬于.(A ) A科學計算 B輔助技術 C數(shù)據(jù)處理 D人工智能7A文件長度為512KB,B文件長度是2MB,B文件長度是A文件多少倍.(D ) A8 B2 C.3 D48同一臺計算機能夠安裝不同位數(shù)的操作系統(tǒng),通常情況下,數(shù)據(jù)處理速度最慢的操作系統(tǒng)是.(D )A64位 B16位 C8位 D32位9在Windows XP中,當用鼠標左鍵在不同驅(qū)動器之間拖動文件時,系統(tǒng)默認的操作是.(C ) A移動 B. 創(chuàng)建快捷方式 C.復制 D.無任何操作10在Windows XP中,利用“搜索”窗口查找文件時,不能用于文件查找的選項是. (D ) A文件名 B文件修改日期 C文件大小 D文件讀寫的權限屬性11在Windows XP的“控制面板”中不能設置的項目是. ( D) A日期和時間 B.添加或刪除程序 C輸入法 D.Outlook電子郵件賬戶12在Word2003編輯狀態(tài)下,編輯化學反應方程式Fe+2HClFeCl2+H2,必須使用的命令是.(B )A編輯-查找 B字體-下標 C插入-圖示 D格式-段落13在Word2003中,哪個命令不會出現(xiàn)在“表格”菜單里. .(C )A公式 B排序 C插入 D自動套用格式14在Word2003文檔中,選中“使用通配符”,在“多”與“體”之間只有一個字符,將所有“多”與“體”之間字符都替換為“媒”,最優(yōu)的方法是.(A )A查找“多?體”,替換成“多媒體”B查找“多體”,替換成“多媒體” C分別查找中間字符,替換成“媒”D查找“多*體”,替換成“多媒體”15在Excel2003文檔中,對分數(shù)進行高級篩選,如果條件是“語文、數(shù)學、外語僅一門不及格”,則下述條件區(qū)域表示正確的是.( D)語文數(shù)學外語6060A B語文數(shù)學外語606060 C D 語文數(shù)學外語606060語文數(shù)學外語=60=60=60=60=60=60 C. D. -30下列關于Visual FoxPro中報表的敘述,正確的是.( D )A在報表設計器中每個帶區(qū)的大小是不可以改變的B報表數(shù)據(jù)源只能是數(shù)據(jù)庫表C如果報表需要按照某一字段值的大小順序輸出,則相應的表或視圖必須按該關鍵字段索引D. 報表的“頁標頭”帶區(qū)的內(nèi)容每條記錄打印一次 31在Visual FoxPro中,以下關于視圖的描述中正確的是.( A )A. 視圖和查詢的最大區(qū)別在于視圖可以對源表中的數(shù)據(jù)進行更新B. 視圖文件的擴展名為 .pqrC. 視圖只能從一個表派生出來D. 視圖不能檢查更新的合法性32在Visual FoxPro中,項目文件的默認擴展名為.(B )A. .SCR B. .PJX C. .MPR D. .MNX33在Visual FoxPro中,關于查詢的敘述錯誤的是.( B )A. 在查詢設計器中的“雜項”選項卡中可以指定是否包含重復記錄以及列在前面的記錄個數(shù)或百分比B. 查詢結(jié)果保存在數(shù)據(jù)庫中C. 在查詢?nèi)ハ蛑?,臨時表是將查詢結(jié)果保存在一個臨時表中,關閉表時自動清除D. 查詢設計器中,“篩選”選項卡的作用是指定查詢記錄的條件34在Visual FoxPro中,建立索引的INDEX命令的參數(shù)中,表示建立唯一索 引的是.( D )ACANDIDATE B. ASCENDING C. DISTINCT D. UNIQUE35在Visual FoxPro中,下列表達式中運算結(jié)果為“good”的是.( D )ASUBSTR(mygoodfriend,AT(good,mygoodfriend)B. SUBSTR(mygoodfriend,2,4)C. RIGHT(LEFT(mygoodfriend,6),4)D. LEFT(RIGHT(mygoodfriend,AT(good,mygoodfriend),4)36以下各項中哪個是數(shù)據(jù)通訊系統(tǒng)的主要技術指標.(C ) A. 壓縮率 B. 分辨率 C. 傳輸速率 D. 時鐘主頻37下列計算機網(wǎng)絡拓撲結(jié)構(gòu)中,一般不在局域網(wǎng)中使用的是. (D ) A. 總線型結(jié)構(gòu) B. 星型結(jié)構(gòu) C. 環(huán)型結(jié)構(gòu) D. 分布式結(jié)構(gòu)38在通信系統(tǒng)中,把來自許多信號源的信號組合起來,再通過一條傳輸線路同時發(fā)送的技術稱為. . (B ) A. 多路分解 B. 多路復用 C. 并行通信 D. 同步傳輸39在TCP/IP傳輸層的協(xié)議數(shù)據(jù)首部,依據(jù)下列哪個字段來確定通信雙方主機內(nèi)發(fā)送或接收數(shù)據(jù)的應用進程. . . (D ) A. 序號 B. 確認號 C. IP地址 D. 端口號40OSI參考模型中,數(shù)據(jù)鏈路層處理的協(xié)議數(shù)據(jù)單元為. . ( D) A. 數(shù)據(jù)段 B. 比特 C. 報文 D. 數(shù)據(jù)幀41下列關于TCP/IP協(xié)議描述錯誤的是.(D ) A. 起源于ARPANET B. 是目前Internet事實上的國際標準和工業(yè)標準 C. TCP/IP協(xié)議的發(fā)展是先定義完整理論框架,再實現(xiàn)相應協(xié)議 D. 網(wǎng)際層只提供無連接的數(shù)據(jù)報服務42下面關于TCP協(xié)議的特性描述錯誤的是. (D) A. 面向連接 B. 提供數(shù)據(jù)傳輸?shù)目煽啃员WC C. 具有差錯檢驗和流量控制功能 D. 提供數(shù)據(jù)格式轉(zhuǎn)換功能43在電子郵件服務中,郵件服務器之間轉(zhuǎn)發(fā)郵件使用的協(xié)議是.(B ) AHTTP BSMTP CPOP3 DIMAP44網(wǎng)絡操作系統(tǒng)的基本任務是.(D ) A. 屏蔽本地資源與網(wǎng)絡資源之間的差異 B. 管理網(wǎng)絡系統(tǒng)的共享資源 C. 為用戶提供基本的網(wǎng)絡服務功能 D. 以上全是45. 在以太網(wǎng)中,設備之間使用非屏蔽雙絞線進行連接,則設備的硬件接口是 .(B ) A. RJ-11接口 B. RJ-45接口 C. BNC接口 D. AUI接口46. 以下網(wǎng)絡設備中,在OSI參考模型工作層次和網(wǎng)橋相同的是. (A ) A. 交換機 B. 路由器 C. 集線器 D. 中繼器47. WWW服務器的域名為,文件file1.rar放置在服務器的根目 錄下,服務器的主目錄為D:dir,則使用Internet Explorer瀏覽器訪問該文件 使用的URL為.(B) A/dir/file1.rar B/file1.rar C/file1.rar D/dir/file1.rar48“非對稱數(shù)字用戶線路”的簡稱是.(B ) AISBN BADSL CDDN DATM49校園網(wǎng)內(nèi)的一臺計算機訪問外部網(wǎng)絡的服務器時,使用域名訪問失敗,而使用IP 地址訪問成功,造成這種故障的原因可能是.( C ) A該計算機的網(wǎng)絡斷開 B被訪問的外部服務器網(wǎng)絡斷開 C該計算機的DNS服務器設置有誤 D該計算機與DNS服務器不在同一子網(wǎng)50當前Internet流行的P2P(peer-to-peer,對等網(wǎng)絡)模式的網(wǎng)絡應用淡化了計 算機網(wǎng)絡服務提供者與服務使用者的界限。和傳統(tǒng)的C/S模式的網(wǎng)絡應用不同,P2P 模式以“非中心化”的方式使得更多的用戶計算機同時身兼客戶機與服務器的雙重 身份,將互聯(lián)網(wǎng)推向了一個新的階段。使用P2P模式進行通信的網(wǎng)絡主機節(jié)點之間 使用對等的方式,通過直接交換信息來共享計算機資源。以下網(wǎng)絡應用使用P2P模 式的是.(C ) ADNS BWeb CBitTorrent DFTP第卷(非選擇題 共140分)二、判斷題(本大題14小題,每小題1分,共14分。將答案填涂在機讀卡上,正確的填涂“”格,錯誤的填涂“”格)1一般情況下,光盤比硬盤讀取速度慢。 ( T )2計算機處理數(shù)據(jù)快慢和CPU主頻無關。 ( F )3在Windows XP中,如果希望某個文件不能被刪除,可將它的屬性設置為“只讀”。 ( T )4在Windows XP中,鼠標右鍵單擊不同的對象,彈出的快捷菜單都是相同的。 ( F )5在Word2003編輯狀態(tài)下,可以對文字進行動態(tài)效果設置。 ( T )6在Word2003打印對話框中,打印“8頁至18頁與25頁”,在頁碼范圍輸入“8-18;25”。 ( F )7在Excel2003文檔中,工作表刪除后能夠通過“撤銷”操作恢復工作表。( F )8在Excel2003工作表中,不可以對沒有合并過的單元格進行拆分。 ( F ) 9在Visual Basic中,不同模塊中的變量可以重名。 ( T )10在Visual FoxPro中,使用PACK命令將刪除當前表中全部記錄。 ( F )11全雙工通信方式中,信息可以向兩個相反方向傳送,但是不能同時進行。 ( F )12計算機網(wǎng)絡中,通信雙方的對等層必須使用相同的協(xié)議。 ( F )13決定局域網(wǎng)性能的三要素是:網(wǎng)絡拓撲、傳輸介質(zhì)和介質(zhì)訪問控制方法。 ( T )14在數(shù)據(jù)通信中,將數(shù)字信號變換為模擬信號的過程稱為解調(diào)。 ( F )三、填空題(本大題共13小題,每小題2分,共26分。請將答案填寫在答題紙上)1按照計算機所處理的信號進行分類,可以分為模擬式計算機和 數(shù)字 式計算機。2中央處理器(CPU)包括運算器和 控制 器。3把二進制數(shù)10100100101B轉(zhuǎn)換成十六進制為 525 H。 4如果需要設置Windows XP中窗口的色彩方案、字體大小等屬性,可用鼠標右鍵單擊桌面空白處,在快捷菜單中選擇“屬性”選項打開“顯示 屬性”對話框后,點擊 外觀 標簽進行設置。5在Word2003中,如果對表格中的數(shù)值進行計算,則需要點擊“表格”下 的 排序 。 6在Excel2003表格中,A1=2,B1=3,C1=4,D1=5,E1=6,A2=7,B2=8,C2=9,D2=10, E2=11,A3=2,B3=3,C3=4,D3=5,E3=6,則sum(A1:D2,B2:E3)結(jié)果為 。7在Visual Basic中,當設置文本框的PasswordChar屬性為*,程序運行后在 文本框中輸入123,則用Print輸出文本框的內(nèi)容時顯示的是 123 。(填寫結(jié)果時不要加雙引號)8Visual Basic表達式(10 8) Or (5 4) And (-3 6,1,-1) 的輸出是 -1 。 11計算機網(wǎng)絡協(xié)議的三要素中,用于定義每部分控制信息和數(shù)據(jù)所代表含義的 是 語義 。 12標準的B類IP地址的網(wǎng)絡地址部分為 16 位二進制值。 13用戶使用Windows XP接入Internet,需要配置的TCPIP主要參數(shù)是IP地 址、 子網(wǎng)掩碼 、默認網(wǎng)關和DNS。四、根據(jù)已知的環(huán)境與題意,寫出相應的Visual FoxPro操作命令或SQL語句,要求每小題用一條命令或語句完成(本大題共5小題,每小題4分,共20分,請?zhí)顚懺诖痤}紙上)?,F(xiàn)有數(shù)據(jù)庫BOOKGL.DBC,其中包含表“books.dbf”,“books.dbf”結(jié)構(gòu)為:圖書編號(C,4)、書名(C,30)、出版社(C,20)、出版日期(D)、價格(N,8,2)、作者(C,10),頁數(shù)(N,4)。在相應數(shù)據(jù)庫和表已打開的前提下,寫出完成下述功能的命令。1邏輯刪除所有出版社為“清華大學出版社”、價格大于35的記錄。(用Visual FoxPro命令) 2. 以“圖書編號”為關鍵字建立降序的候選索引,索引名為BH。(用Visual FoxPro命令) 3將“books.dbf”中所有“頁數(shù)”大于300的圖書“價格”增加10。(用SQL語句) 4在數(shù)據(jù)庫BOOKGL.DBC中建立表AUTHORS.DBF(作者編號(C,4),作者姓名(C,10),所在城市(C,20),聯(lián)系電話(C,15),作者性別(C,2)),設置“作者編號”字段為主索引,并對“作者性別”字段的輸入值限制為只能是“男”或“女”,否則提示“性別輸入錯誤!”(用SQL語句) 5查詢books.dbf表中 “價格”大于28的記錄,包括“書名”、“出版社”,“價格” 字段內(nèi)容,按“價格”字段降序排列,結(jié)果保存到文本文件GAO.txt中(用SQL語句) 五、程序分析(本大題共2小題,每小題5分,共10分,讀程序并分析結(jié)果,請?zhí)顚懺诖痤}紙上)1運行下面的Visual Basic程序,輸出結(jié)果中有幾個偶數(shù)_6_Private Sub Command1_Click()Dim a(10) As IntegerDim i As IntegerDim j As IntegerDim num As IntegerFor i = 0 To 10 num = 10 + Int(11 * Rnd) For j = 0 To i If num = a(j) Then Exit For Next j If j i Then a(i) = num Else i = i - 1Next iFor i = 0 To 10 Print a(i);Next i End Sub2有Visual ForPro程序如下:程序的功能是計算用數(shù)學表達式描述 CLEARSS=0AA=0BB=0FOR I=1 TO 10 FL=0 J=2 DO WHILE J=SQRT(I) AND FL=0 IF I % J=0 FL=1 ELSE J=J+1 ENDIF ENDDO IF FL=0 DO MM WITH AA,I SS=SS-1/AA ELSE DO MM WITH AA,I DO MM WITH BB,I-1 SS=SS+BB/AA ENDIFENDFOR?SSPROCEDURE MM PARAMETERS S,N X=1 P=1 DO WHILE X=N P=P*X X=X+1 ENDDO S=P RETURNENDPROC六、寫出下列程序的運行結(jié)果(本大題共5小題,每小題5分,共25分,請?zhí)顚懺诖痤}紙上)1分析下面Visual Basic程序段。窗體中有一命令按鈕(名稱為C6_1)。(5分)Private Sub C6_1_Click()Dim i As IntegerDim j As IntegerDim w As Integera = Array(1, 2, 3, 4)b = Array(5, 6, 7, 8)For i = 0 To 3w = w + fu(a(i), b(i)w = w + a(i)Next iPrint wEnd SubPrivate Function fu(ByVal x As Integer, ByVal y As Integer)Static k As Integerk = k + 1x = x + yy = x - yx = x - yfu = kEnd Function窗體啟動后單擊命令按鈕,輸出w的值為 20 。2下面Visual Basic程序段,是對順序文件進行操作。(5分)Open c6_2.txt For Output As #1Print #1, k1; k2; k3Print #1, 12; 34; 56Print #1, p1; p2; p3Print #1, 88; 99; 77Close #1Open c6_2.txt For Input As #1Seek #1, 10Line Input #1, scorePrint scoreClose #1程序運行后,Print score輸出結(jié)果是 23456 。3在Visual FoxPro的表單上添加兩個文本框,一個Name屬性為:Text1,另一個Name屬性為:Text2,添加一個命令按鈕,其Name屬性為:Command1,Caption屬性為:確定。Command1的Click事件代碼如下:xa=VAL(TRIM(ThisForm.Text1.value)n=LEN(TRIM(ThisForm.Text1.value)DIMENSION aa(n)DIMENSION bb(n)FOR i=n TO 1 step -1 aa(i)=xa % 10 xa=INT(xa/10)ENDFORnm=0FOR i=1 TO n IF aa(i) % 20 nm=nm+1 bb(nm)=aa(i) ENDIFENDFOR FOR i=1 TO nm bb(i)=bb(i)+5 bb(i)=bb(i) % 10ENDFORFOR i=1 TO INT(nm/2) t=bb(i) bb(i)=bb(nm-i+1) bb(nm-i+1)=tENDFORt=0FOR i=1 TO nm t=t*10+bb(i)ENDFORThisForm.Text2.value=STR(t)運行上面的表單,在Text1文本框中輸入:23456789,單擊“確定“按鈕,在Text2文本框中顯示的是 4208 。第4、5題使用下面的數(shù)據(jù)庫設有數(shù)據(jù)庫文件BGGL.DBC,包含3個表,分別是KEFANG、RUZHU、KEHU。其中KEFANG的結(jié)構(gòu)為:客房號(C,4)、類型(C,10)、價格(N,4,0),RUZHU的結(jié)構(gòu)為:客房號(C,4)、客戶號(C,4)、入住日期(D),退房日期(D),KEHU的結(jié)構(gòu)為:客戶號(C,4)、姓名(C,8)、性別(C,2)、工作單位(C,20);各表中數(shù)據(jù)如下:KEFANG.DBF記錄號客房號類型價格1 1101 普通客房 2802 1102 貴賓客房 5003 1201 總統(tǒng)套房 20004 1202 總統(tǒng)套房 15005 1301 普通客房 2806 1302 貴賓客房 600RUZHU.DBF記錄號客房號 客戶號 入住日期 退房日期1 1101 1001 03/25/05 03/28/052 1102 1002 03/27/05 03/29/053 1201 1003 03/28/05 04/05/054 1202 2001 03/27/05 03/31/055 1301 2002 03/23/05 04/01/05 KEHU.DBF記錄號客戶號 姓名 性別 工作單位1 1001 王林 男 AA商貿(mào)公司2 1002 劉月明 女 BB電子公司3 1003 姚曉敏 女 CC農(nóng)產(chǎn)品公司4 2001 肖敏 女 DD商貿(mào)公司5 2002 黃小兵 男 EE電子公司4. 有如下Visual FoxPro程序: OPEN DATABASE BGGLUSE KEHUACCEPT 請輸入客戶姓名: TO XMINDEX ON 姓名 TAG XMH OF XMSEEK XMKEHUH=客戶號SELECT 1USE RUZHUGO TOPDO WHILE NOT EOF() IF 客戶號=KEHUH KEFANGH=客房號 NM=退房日期-入住日期+1 SELECT 2 USE KEFANG DO WHILE NOT EOF() IF 客房號=KEFANGH S=價格*NM EXIT ENDIF SKIP ENDDO EXIT ENDIF SKIPENDDO?S運行上面的程序,輸入“姚曉敏”,顯示的結(jié)果是: 18000 。5. 有如下Visual FoxPro程序:(代碼中行末的分號為邏輯行連接符)OPEN DATABASE BGGLACCEPT 請輸入客房類型名: TO KFLXSELECT 客房號 FROM KEFANG WHERE 類型=KFLX INTO DBF KFALTER TABLE KF ADD XX C(8)ALTER TABLE KF ADD TH N(3,0)SELECT RUZHU.客房號 AS 客房號,KEHU.姓名 AS 姓名,(RUZHU.退房日期;-RUZHU.入住日期+1) AS 天數(shù) FROM RUZHU,KEHU WHERE RUZHU.客戶號=;KEHU.客戶號 INTO DBF KHUSE KHDO WHILE NOT EOF() KFH=客房號 XM=姓名 TSH=天數(shù) UPDATE KF SET XX=XM,TH=TSH WHERE 客房號=KFH SKIPENDDOSELECT KEFANG.類型,KEFANG.客房號,KF.XX,TH*KEFANG.價格 AS TJ;FROM KEFANG,KF WHERE KEFANG.客房號=KF.客房號 INTO DBF JGUSE JGDO WHILE NOT EOF() ?客房號,XX,TJ SKIPENDDO1101 王林 840運行上面的程序,輸入“普通客房”,顯示的結(jié)果是: 1301 黃小兵 2520 。 七、Visual Basic程序改錯(本大題共有兩個小題,每題5分,共10分,每個程序有兩個錯誤行,請在答題紙上寫出錯誤行和對應的正確行,改對一處得一處分,改錯不扣分) 1下面的程序是利用隨機函數(shù)產(chǎn)生10個10到100之間的隨機整數(shù),并按由小到大的順序放入數(shù)組a中。(提示:題目中的語句Goto x是轉(zhuǎn)移到標號x位置執(zhí)行)程序中有兩處錯誤,請將錯誤行和相應的正確行寫在答題紙橫線上。 Dim a(10) As IntegerDim num As IntegerDim i As IntegerDim j As IntegerDim k As IntegerFor i = 1 To 10 k = i num = 10 + Int(Rnd * 91) For j = 1 To i-1 If num a(j) Then GoTo 20 Next j a(i) = num10:Next iGoTo 3020:For m = k To j M=K TO J-1 STEP -1 a(m + 1) = a(m) A(M)=A(M-1)Next ma(j) = num GoTo 1030:For i = 1 To 10 Print a(i);Next iPrint 2窗體中(如圖所示)有一個定時器控件(名稱Timer1),有三個標簽(Caption屬性分別是滾動條、組合框、列表框),一個滾動條(名稱HS1,Min和Max的屬性初值分別為0和5,Value初值為0),一個組合框(名稱Combo1),一個列表框(名稱List1),組合框和列表框初始為空,一個框架,框架中有兩個復選框(名稱分別為Check1和Check2,Caption屬性如圖所示)。程序的功能是:窗體啟動后,定時器開始工作,工作時每隔3秒鐘觸發(fā)一次事件,Timer事件中完成4項工作:(1)滾動條的值加1;(2)往組合框中添加滾動條的Value值;(3)調(diào)用Combo1_Change過程;(4)當滾動條的值為5時定時器停止工作。在Combo1_Change過程中,要將滾動條當前值加上復選框中當時所有選中項的標題添加到列表框中,Combo1_Change過程中只給出了部分程序,省略的程序都是正確的。程序中有兩處錯誤, 請將錯誤行和相應的正確行寫在答題紙橫線上。 Private Sub Combo1_Change()List1.AddItem HS1.ValueIf Check1.Value = True Then 1List1.List(HS1.Value - 1) = List1.List(HS1.Value - 1) + Check1.CaptionEnd IfEnd SubPrivate Sub Timer1_Timer()HS1.Value = HS1.Value + 1Combo1.AddItem HS1.ValueCombo1_ChangeIf HS1.Value = 5 Then Timer1.Visible = False ENABLEEnd Sub八、程序填空(本大題共7個空,每空5分,共35分,按程序要求在答題紙上填入相應的內(nèi)容,使程序完整正確)1下面程序運行時輸入長度少于20個字符的字符串,以“#”結(jié)束,然后對字符串從左端進行處理。處理方式:把數(shù)字和非數(shù)字內(nèi)容分別放入兩個數(shù)組,數(shù)組a存放數(shù)字,數(shù)組b存放非數(shù)字,存放時把相鄰的數(shù)字或非數(shù)字內(nèi)容作為一個整體進行存放,如輸入的字符串為“12abc3d456ef#”,則12、3、456分別存放到數(shù)組a的前三個元素中,”abc”中,”abc”、”d”、”ef”分別存放到數(shù)組b的前三個元素中。請?zhí)羁铡?Visual Basic題)Dim a(20) As IntegerDim b(20) As StringDim c As StringDim i As IntegerDim j As IntegerDim w1 As StringDim w2 As StringDim m As IntegerDim n As Integerc = InputBox(請輸入c$=, 輸入數(shù)據(jù))c = Trim(c)w1 = Left(c, 1)c = Mid(c, 2)Do While w1 # If w1 = 0 And w1 = 0 And w2 = 9 And w2 # w1 = w1 * 10 + w2 w2 = Mid(c, 1, 1) c = Mid(c, 2) Loop a(i) = w1 i = i + 1 (1)_W1=W2_ w2 = Left(c, 1) c = Mid(c, 2) Do While Not (w2 = 0 And w2 = 9) And w2 # w1 = w1 + w2 w2 = Left(c, 1) c = Mid(c, 2) Loop b(j) = w1 j = j + 1 End If w1 = w2LoopIf w1 = 0 And w1 = 0 And w2 = 9)_ Then b(j) = w1 j = j + 1 En

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
  • 4. 未經(jīng)權益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負責。
  • 6. 下載文件中如有侵權或不適當內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論