..10/232023XX省一般高等學校對口招生考試計算機專業理論試題〔A一、選擇題502100要求,將正確選項填涂在機讀卡上以下關于計算機語言的描述不正確的選項是 〔程序設計語言通常分為機器語言、匯編語言和高級語言三類B．VisualBasic程序設計語言屬于構造化程序設計語言C．匯編語言編寫的程序必需編譯成機器語言才能執行D．常見的解釋型語言有C語言影響計算機運行速度的主要性能指標是 〔顯示器的區分率、打印機的性能B．硬盤的容量和內存的容量C．字長、內存容量和CPU的時鐘頻率D．計算機所配備的語言、操作系統、外部設備以下描述不正確的選項是 〔多媒體技術最主要的兩個特點是集成性和交互性B．8C．CPU主要包括運算器和把握器兩大部件D．各種高級語言的編譯系統都屬于系統軟件以下關于計算機數制的描述正確的選項是 〔八進制數有8個數碼,范圍是從1到8B．一般在數字后面加一個大寫字母B表示十六進制數C．計算機內部全部信息都是以二制數表示的D．十2以下4種不同數制表示的數中,數值最大的一個是 〔八進制數367B．十進制數258C．十六進制數F6D．10000001以下選項表達了馮·諾依曼計算機體系構造特點的是 〔引入了CPU的概念 B．ASCII編碼和指令系統C．程序存儲和程序把握 D．機器語言和十六進制以下關于病毒的描述,正確的選項是 〔只要不上網,就不會感染病毒B．不任憑翻開生疏、可疑郵件是預防病毒的一種手段C．只要安裝最好的殺毒軟件,就不會感染病毒D．全部的病毒都會導致計算機越來越慢,甚至可能使系統崩潰8．為了解決計算機中CPU與內存儲器之間速度不匹配問題,常使用的部件是 〔A．CacheB．EPROM C．ROM D．Flash在WindowsXP中,為避開文件內容被任意更改,可將其屬性設置為 〔系統

壓縮

存檔 D．只讀在WindowsXP中,關于文件快捷方式的描述正確的選項是 〔刪除文件快捷方式,即刪除該快捷方式所指向的文件B．對快捷方式重命名后,雙擊該快捷方式圖標,則不能翻開其指向的文件C．在桌面上創立文件的快捷方式,就是將相應的文件復制到桌面D．創立文件快捷方式,就是建立指向相應文件的鏈接在WindowsXP中,以下關于回收站的描述正確的選項是 〔放入回收站的內容,不占用硬盤的存儲空間B．U盤上被刪除的文件或文件夾,可以利用回收站的“復原“命令將其恢復C．執行回收站中的“清空回收站“命令,可以將回收站中的內容復原到原來位置D．放置在回收站中的文件或文件夾,在回收站被清空之前,可以恢復將光標置于此段中,單擊“格式“菜單中的“首字下沉“菜單項,選擇“下沉“為“2”,單擊“確定“將光標置于此段中,單擊“工具“菜單中的“首字下沉“菜單項,選擇“下沉“為“2”,單擊“確定“格式?！跋鲁列袛怠霸O置格式?！跋鲁列袛怠霸O置在Word將光標置于此段中,單擊“格式“菜單中的“首字下沉“菜單項,選擇“下沉“為“2”,單擊“確定“將光標置于此段中,單擊“工具“菜單中的“首字下沉“菜單項,選擇“下沉“為“2”,單擊“確定“格式。“下沉行數“設置格式?！跋鲁列袛怠霸O置C．選中相關文字,單擊“格式“菜單中的“字體“菜單項,將“效果“中“上標“前面的復選框選中,單擊“確定“D．將光標置于此段中,單擊“插入“菜單中的“首字下沉“菜單項,選擇“下沉“格式?！跋鲁列袛怠霸O置為“2”,單擊“確定“在Word202326列“廠家A“的“季度平均值“,需在“表格“菜單中翻開“公式“對話框,如以以下圖所示,應在“=“后面輸入正確的公式是 〔A．AVERAGE<B2:E2>B．AVERAGE<LEFT>C．AVERAGE<ABOVE>D．AVERAGE<B2:D2>在Word2023文檔的頁面設置中,不能進展的操作是 〔設置頁邊距 B．設置紙張大小C．設置紙張來源 D．設置分欄Excel2023獎金“列填充“有“,否則填充“無“。單元格H6中是“嘉獎標準“的值?，F要求在單元格F3中填入公式,推斷是否有獎金,并向下自動填充F列其他單元格；H9中填入公式計算嘉獎比例〔有獎金人數除以總人數。以下是F3和H9中分別填入的公式,其中完全正確的選項是 〔A．=IF<E3>=H6,“有“,“無“>；=COUNTIF<F3:F10,“有“>/COUNT<E3:E10>B．=IF<E3>=$H$6,“有“,“無“>；=COUNTIF<F3:F10,“有“>/COUNT<E3:E10>C．=IF<E3>=H$6,“有“,“無“>；=COUNTIF<F3:F10,F6>/COUNT<F3:F10>D．=IF<E3>=$H6,“有“,“無“>；=COUNTIF<F3:F10,F6>/COUNT<F3:F10>在Excel2023中,對數據進展分類匯總前,必需進展的操作是 〔查詢C．檢索

篩選D．排序在Excel2023工作表中,用“高級篩選“方式篩選數據時,在條件區同一行輸入的多個條件之間的關系是 〔“與“關系 B．“或“關系C．“非“關系 D．“異或“關系在VisualBasic中,要產生10到80之間〔含10和80的隨機整數,以下表達式中正確的選項是 〔A．Int<Rnd*80+10> B．Int<Rnd*71+10>C．Int<Rnd*71+70> D．Int<Rnd*10+80>在VisualBasic中,使用PictureBox控件裝載圖形,以下方法中不能實現此功能的選項是 〔在設計時使用對象的Picture屬性B．在設計時使用剪貼板把圖形從剪貼板粘貼到控件上C．在運行時使用剪貼板把圖形從剪貼板粘貼到控件上D．在運行時使用LoadPicture函數裝入指定的圖形文件,然后將函數返回值賦值給控件的Picture屬性在VisualBasic中,以下為雙精度類型的變量是 〔a$C．a%

a!D．a#在VisualBasic中,表達式String$<3,“abc“>的值是 〔“abcabcabc“C．“abc“

“aaa“D．“cba“在VisualBasic的窗體上有一個定時器控件Timer1和一個命令按鈕C1,假定定時器控件Timer1Interval500,Enabled屬性值為True；命令按鈕C1Left400,Width200。Timer1TimerPrivateSubTimer1_Timer<>C1.Left=C1.Left-100EndSub則程序開頭運行多少秒后,命令按鈕恰好完全從窗體的左邊移出 〔A．5 B．4C．3 D．2在VisualBasic中,以下控件沒有Caption屬性的是 〔列表框C．單項選擇按鈕

復選按鈕D．框架在VisualBasic的窗體中,知名稱為List1的列表框,程序運行時,假設選中了列表項號為5表框中最上面的列表項號為0,以下描述不成立的是〔A．List1.Selected<List1.ListIndex>的值為規律值TrueB．List1.Selected<5>的值為規律值TrueC．List1.List<5>的值為規律值TrueD．List1.Listindex5在VisualBasic中,以下程序運行后,單擊命令按鈕,則輸出結果為 〔PrivateSubCommand1_Click<>DimxAsInteger,yAsIntegerx=10y=15Callproc<x,y>Printx,yEndSubPublicSubproc<aAsInteger,ByValbAsInteger>a=a*bx=a+bb=b+100EndSubA．10 165C．165 15

B．150 15D．150 115在VisualBasic中,為了使一個復選框被禁用〔灰色顯示,應把它的Value屬性設置為 〔A．0 B．1C．2 D．False在VisualBasic中,有如下程序段程序運行后,單擊命令按鈕,在輸入對話框中依次輸入25,33,55,66,輸出結果是 〔PrivateSubCommand1_Click<>DimxAsInteger,yAsInteger,aAsIntegerx=100Fori=1To4y=InputBox<“請輸入一個整數“>IfyMod5=0Thena=a+yx=yElsea=a+xEndIfNextiPrintaEndSubA．160 B.100C．120 D．90在VisualFoxpro中,恢復系統菜單默認設置的命令是 〔A．SETDEFAULTSYSTEM B．SETMENUTODEFAULTC．SETSYSTEMTODEFAULT D．SETSYSMENUTODEFAULT在VisualFoxpro中,假設指定參照完整性的“刪除規章“為“級聯“,則當刪除父表中的記錄時 〔系統自動備份子表相關記錄到一個表中B．假設子表中有相關記錄,則制止刪除父表中記錄C．會自動刪除子表中全部相關記錄D．不作參照完整性檢查,刪除父表記錄與子表無關在VisualFoxproDOWHILE……ENDDO循環構造中LOOPA．轉移到DOWHILE終止循環,將把握轉移到本循環構造ENDDO后面的第一條語句連續執行該語句在DOWHILE……循環構造中不起任何作用序開頭處

退出循環,返回到程在VisualFoxpro中,以下表達式返回結果為.T.的是 〔A．AT<“計算機“,“電子計算機“> B．TYPE<“CTOD<”01/01/2023”>“>=“D“C．“計算機系統構造“$“計算機“ D．SUBSTR<STR<120>,3,1>=“0“在VisualFoxpro中,以下關于查詢的描述正確的選項是 〔不能將查詢結果保存在報表文件中查詢文件的擴展名為.pqrC．只能對數據庫表建立查詢D．查詢是從指定的表或視圖中提取滿足條件的記錄,可將結果定向輸出33．在VisualFoxpro中,用報表向導創立報表時,可設置的報表布局方式有 〔A．列數、方向、字段布局 B．列數、行數、字段布局C．行數、方向、字段布局 D．列數、行數、方向在VisualFoxpro中,關于過程調用的描述正確的選項是 〔當實參的數量多于形參的數量時,多余的實參被無視B．過程中必需包含RETURN語句,否則不能返回調用程序C．參數傳遞都是按引用傳遞D．上面的都不正確在VisualFoxpro中,以下程序段執行以后,顯示的結果為 〔CLEARA=10B=20SETUDFPARMSTOREFERENCESWA<<A>,B>?A,BPROCEDURESWAPARAMETERSX1,Y1TEMP=X1X1=Y1Y1=TEMPENDPROCA．1010B．10 20C．20 10D．20 20以下選項不屬于計算機網絡性能指標的是 〔速率C．主頻

帶寬D．時延在同一種網絡體系構造下,以下關于網絡協議與網絡效勞的描述中,正確的選項是〔A．網絡協議與網絡效勞同時存在,可以相互替代B．網絡協議與網絡效勞沒有聯系,可以獨立存在并獨立運行C．網絡協議是分層次的,而網絡效勞是不分層次的D．之間在互聯網中的兩臺計算機間傳遞文件時,組成該文件的數據被劃分為假設干個數據包進展傳送。以下關于數據傳送過程的描述中,不正確的選項是 〔受網絡協議把握,數據包可能需要重發送B．數據包的長度不愿定都是一樣的C．不同的數據包經過的傳送路徑是一樣的D．數據包不愿定按發送挨次到達目標計算機以下關于物理層通信的描述不正確的選項是 〔信號是數據的載體,可以通過物理層無過失傳遞B．基帶傳輸時,傳送的是數字信號；寬帶傳輸時,傳送的是模擬信號C．并行傳輸比串行傳輸效率高、信息吞吐量大D．全雙工通信的效率比半雙工通信、單工通信高在以下通信介質中,對抗電磁干擾最為抱負的是 〔同軸電纜C．衛星通信

光纖D．屏蔽雙絞線NIC〔網絡適配器,即網卡不具備以下哪個功能 〔透亮傳輸C．封裝成幀

擁塞把握D．過失檢測為了通過共享信道、最大限度提高信道利用率,在網絡通信中廣泛使用多路復用技術。以下關于多路復用技術的描述不正確的選項是 〔頻分復用是指在同一物理連接中使用不同的頻率來傳輸不同的信號B．時分復用是指在同一物理連接的不同時段來傳輸不同的信號C．碼分復用是指使用同一碼制攜帶多路信號D．波分復用是指將波長不同的光信號合成一束,沿著單根光纖進展傳輸以下關于以太網標準10BASE-T的描述不正確的選項是 〔“10”表示信號在電纜上的傳輸速率為10MB/sB．“T“表示連網介質為雙絞線C．“BASE“表示通過連網介質傳送的信號是基帶信號D．10BASE-T以下關于網絡設備的描述正確的選項是 〔網卡工作在數據鏈路層,可以進展路由選擇B．集線器與交換機都是工作在數據鏈路層的,但交換機性能優于集線器C．中繼器可以有效擴展網絡范圍,其工作在物理層D．路由器在傳輸層將不同網絡進展了互連以下關于網絡協議及拓樸的描述正確的選項是 〔使用不同協議的網絡,不能進展互連不同拓樸構造的網絡,可以進展互連拓樸構造與網絡協議有關,即一種網絡構造只能使用一種特定的網絡協議D．環形網中使用的硬件設備,可以直接應用到星形網絡中以下對CSMA/CD的描述正確的選項是 〔A．CSMA/CD通過令牌幀的傳遞把握結點數據的收、發過程B．CSMA/CD工作方式允很多個結點同時發送數據而不會產生信道沖突C．CSMA/CD指載波監聽多點接入/碰撞檢測,是一種公共介質競爭使用的把握方法D．CSMA/CD計算機網絡中主機的硬件地址是指 〔域名地址C．IP

端口地址D．MAC以下關于子網掩碼的描述不正確的選項是 〔子網掩碼由四個十進制數組成,這四個十進制數只能是0或255B．子網掩碼與IPC．子網掩碼可以用來屏蔽IP地址的一局部,以區分網絡標識和主機標識D．子網掩碼可以用于將一個大的IP有以下6個IP地址,以下關于IP地址分類的描述不正確的選項是 〔〔1〔353<2>和<5>是AC．<1>和<3>是B

〔7〔448<6>和<2>是DD．<4>和<6>是C以下關于ARP協議的描述正確的選項是 〔A．ARPARPB．ARPMACC．ARPIP地址到MACD．ARPMAC14114涂“ד格目前在生活和工作中普遍使用的計算機,主要電子元器件承受的是大規模和超大規模集成電路CPU操作系統的主要功能是對計算機全部資源進展統一把握和治理,為用戶使用計算機供給便利在WindowsXP在Word2023在Word2023在Excel2023在Excel2023中,假設要一次性在多個單元格中填入一樣內容,實行的步驟是：①選中多個單元格；②輸入內容；③按Ctrl+Enter在VisualBasicScroll在VisualFoxProDHCPIP網絡防火墻工作在網絡層,可以實現基于IP地址的數據包過濾能夠共享到網絡中的資源,只能是以文件、數據等形式供給的軟件資源,而不能是計算機硬件資源FTP三、填空題132261．字母aASCII<97>,則字母f的ASCII10 10在計算機中,供用戶自定義計算機外觀和功能,添加或刪除程序,設置網絡連接和用戶賬戶等的應用程序的集合是。在WindowsXP_鍵?！坝嬎銠C關心設計“的英文縮寫是。在Word2023在Excel20232/3,輸入方法為。在VisualBasicabVisualBasicabab

a的算術表達式 是。9.在VisualFoxProM=200,N=300,X=“M+N“,Y=“01/01/2023“,IIF<TYPE<“&Y“>$X,REPLICATE<“AAA“,2>,REPLICATE<“BBB“,2>>。在VisualFoxPro中,使用命令DECLAREMM<5,6>定義的數組,包含的數組元素的個數為。與IPv4,IPv6IP計算機網絡的OSI參考模型,其中文名稱為。VisualFoxProSQL完成5420VisualFoxProSQL完成5420Internet交換機商品類別<C,4>、商品單位<C,6>、商品單價<N,8,1>,庫存下限<N,8,0>,產地〔C,40,并建立了以“商品編號“為關鍵字的主索引。相應的數據庫和表已翻開,寫出實現下述功能的命令<留意：每個命令只能寫一條語句,多于一條不得分>。100,VisualFoxPro假設表“GOODS.DBF1“PROO.DBF3C“GOOD.F“中的數據添加到“PROINFO.DBF現有數據庫“JXC.DBC“,其中包含表“PROINFO.DBF“,器<C,6<C,40>、〔要求使用VisualFoxPro創立“SALLINFO.DBF“表〔商品編號〔C,6,售價〔N,8,1,并與“PROINFO.DBF“建立關聯,關聯字段為“商品SQL將“PROINFO.DBF“表全部“商品單位“為“聽“,商品類別為“0001”的商品“庫存下限“調整為200SQL按不同“商品類別“計算“PROINFO.DBFSQL語句五、程序分析〔本大題共2小題,每題5分,共10分,讀程序并分析結果,請填寫在答題紙上1．分析下面的VisualBasic程序,循環體中的語句s=s+1循環了 次。OptionBase1PrivateSubCommand1_Click<>DimiAsIntegerDimsAsIntegerDimkAsIntegeri=0:s=0a=Array<80,20,100,40,70,60,50,10,90,30>Fork=1To10Fori=a<k>To1Step-1Ifi>=45ThengotoLab1s=s+1NextiLab1:NextkPrintsEndSub2．分析下面的VisualFoxProVhayagawVgavIx,則輸入的字符串應為。CLEARACCEPT“請輸入字符串：“TOCHARINN=LEN<CHARIN>DIMEYCHAR<N>FORI=1TONIFI%2=0YCHAR<I>=SUBSTR<CHARIN,I,1>ELSEYCHAR<I>=UPPER<SUBSTR<CHARIN,I,1>>ENDIFENDFORFORI=1TON/2TEMP=YCHAR<I>YCHAR<I>=YCHAR<N-I+1>YCHAR<N-I+1>=TEMPENDFORDCHAR=““FORI=1TONIFASC<YCHAR<I>>>=ASC<“A“>ANDASC<YCHAR<I>><=ASC<“Z“>DCHAR=DCHAR+LOWER<CHR<ASC<“A“>+ASC<“Z“>-ASC<YCHAR<I>>>>ELSEIFASC<YCHAR<I>>>ASC<“a“>ANDASC<YCHAR<I>><=ASC<“z“>DCHAR=DCHAR+UPPER<CHR<ASC<“a“>+ASC<“z“>-ASC<YCHAR<I>>>>ELSEDCHAR=DCHAR+YCHAR<I>ENDIFENDIFENDFOR?DCHAR55251．分析下面VisualBasicCommand1。OptionBase1PrivateSubCommand1_Click<>DimiAsIntegerDimkAsIntegerDimmAsIntegera=Array<6,4,8,2,1,3,9,12,43,67,8>Fori=1To10Fork=i+1To11Ifa<i>>a<k>Thena<i>=a<i>+a<k>:a<k>=a<i>-a<k>:a<i>=a<i>-a<k>EndIfNextkIfa<i>>=10Thena<i>=Int<a<i>/10>NextiIfa<i>>=10Thena<i>=Int<a<i>/10>m=0Fori=1To11m=m+a<i>NextiPrintmEndSub窗體啟動后,單擊命令按鈕,窗體顯示的結果為 。分析下面VisualBasic程序。如以下圖,界面中有兩個文本框和一個命令按鈕,上面有字符的控件是文本框1〔名稱Text1,中間的控件是文本框2〔名稱Text2,最下面的控件是命令按鈕〔名稱Command1。PrivateSubCommand1_Click<>DimnumAsStringDimnum1AsStringDimnum2AsStringDimcAsStringDimiAsIntegerDimlengthAsIntegerDimlength1AsIntegerDimlength2AsIntegerlength1=0:length2=0num=Text1.Textlength=Len<num>Fori=1Tolengthc=Mid<num,i,1>Ifc<>“8“Thennum1=num1+clength1=length1+1ElseIflength1>length2Thenlength2=length1:num2=num1length1=0:num1=““Elselength1=0:num1=““EndIfEndIfNextiIflength1>length2Thennum2=num1EndIfText2.Text=num2EndSub窗體運行后,在文本框1中輸入圖中所示的字母和數字,單擊命令按鈕,則在文本框2顯示的內容是 。有如下VisualFoxPro程序：CLEARPUBLICC,DA=12345678B=10C=20D=30N=0DOSUB1WITHA,B?A,B,C,DPROCEDURESUB1PARAMETERSX,YPRIVATECY=0FLAG=.T.DOWHILEFLAGY=X%10+Y*10X=INT<X/10>N=N+1I=0E=Y%10DOWHILEI<=NE=E*10I=I+1ENDDOD=E+DIFX<100FLAG=.F.ENDIFENDDOC=STR<X>+STR<Y>RETURNENDPROC運行上面的程序,顯示的結果為現有表“CJB.DBF“,構造為：BJ_NAME<C,30>、XM<C,8>、YW<N,4,1>,表中數據如以以下圖所示：有如下VisualFoxProACCEPT“請輸入班級名：“TOBJMUSECJB.DBFINDEXONYWTAGYWSXDIMETEMP<10>K=0SAV=0N=0DOWHILENOTEOF<>IFTRIM<BJ_NAME>=TRIM<BJM>TEMP<K+1>=YWK=K+1ENDIFN=N+1SAV=SAV+YWSKIPENDDOFORM=1TO1ZH1=TEMP<M>ENDFORFORM=2TO2ZH2=TEMP<M>ENDFORFORM=3TO3IFK<3ZH3=ZH2ELSEZH3=TEMP<K>ENDIFENDFORP=ZH1*0.5+ZH2*0.35+ZH3*0.15-SAV/N?P運行上面的程序,輸入“高三〔1班“,顯示的結果是：。數據庫文件ZKSCORE.DBC包含1個表“CJB.DBF“,表構造為：準考證號<C,9>、姓名<C,8>、學校名稱<C,20>、班級名稱<C,20>、總分〔N,5,1。表數據如以以下圖所示：有如下VisualFoxProACCEPT“請輸入準考證號：“TOZKZOPENDATABASEZKSCOREALTERTABLECJBADDX2N<2,0>SELECT準考證號,姓名,學校名稱,班級名稱,總分,X2FROMCJBORDERBY;學校名稱,班級名稱,總分DESCINTOTABLECJTMPGOTOPX=1Y=XNX1=CJTMP.總分BJ=CJTMP.班級名稱XX=學校名稱DOWHILENOTEOF<>IFBJ=CJTMP.班級名稱ANDXX=CJTMP.學校名稱REPLACEX2WITHIIF<NX1=CJTMP.總分,Y,X>Y=CJTMP.X2X=X+1BJ=CJTMP.班級名稱XX=學校名稱NX1=CJTMP.總分ELSEX=1Y=XNX1=CJTMP.總分REPLACEX2WITHXX=X+1BJ=CJTMP.班級名稱XX=CJTMP.學校名稱ENDIFSKIPENDDOSELECT準考證號,姓名,X2WHERE準考證號=ZKZFROMCJTMPINTOTABLETMPJG?準考證號,姓名,X2運行上面的程序,輸入“801510114“,顯示的結果是：。七、VisualBasic程序改錯2510紙上寫出錯誤行代碼和對應的改正后代碼,錯誤行代碼和改正后代碼完全正確方可得分>下面的程序是利用InputBox20的、均由數字字符組成的字符串,依次存入到兩個字符串變量中,然后從兩個字符串的起始位置開頭依次取出一個字符進展操作,操作的規章是：〔1把取出的字符轉換成數字分別存入到數組ab9,則存入數組c〔2假設某個字符串中的字符已經取完,則把另一個未取完的字符串中的字符單個取出,轉換成數字后加上10c“123456789““96666666666c是:10,10,11,12,13,14,15,16,16。OptionBase1PrivateSubCommand1_Click<>Dima<20>AsIntegerDimb<20>AsIntegerDimc<20>AsIntegerDimiAsIntegerDimjAsIntegerDimlen1AsIntegerDimlen2AsIntegerDimstr1AsStringDimstr2AsStringstr1=InputBox<“請輸入第一個數字字符串：“>str2=InputBox<“請輸入其次個數字字符串：“>len1=Len<str1>len2=Len<str2>i=1:j=1DoWhilei<=len1Andi<=len2a<i>=Val<Mid<str1,i,1>>b<i>=Val<Mid<str2,i,1>>Ifa<i>+b<i>>9Thenc<j>=a<i>+b<i>:j=j+1i=i+1LoopIflen1>len2Thenstr1=Mid<str1,i>ElseStr2=Mid<str2,i>EndIflen1=Len<str1>i=1DoWhilei<=len1c<j>=Val<Mid<str1,i,1>>+10i=i+1:j=j+1LoopFori=1TojPrintc<i>;NextiEndSub下面程序的功能是：定義一個44141019、2029、3039、4049Inputbox14應行與列元素的和。如產生的數組是：10171819212425233532303841444742222210。OptionBase1PrivateSubCommand1_Click<>Dima<4,4>AsIntegerDimnumAsIntegerDimsAsIntegerDimiAsInteger,jAsIntegerFori=1To4Forj=1To4a<i,j>=10+Int<Rnd*10>Printa<i,j>;NextjPrintNextinum=InputBox<14s=a<num,num>Fori=1To4Forj=1To4Ifi=numOrj=numThens=s+a<num,num>EndIfNextjNextiPrintsEndSub八、程序填空7535正確<VisualBasic1050010的全部素數找出并存入到數組aOptionBase1PrivateSubCommand1_Click<>DimnumAsIntegerDima<100>AsIntegerDimnAsIntegerDimkAsIntegerDimiAsIntegerDimjAsIntegern=1num=InputBox<“請輸入一個數字：“>Fori=10Tonumk=Sqr<i>Forj=2TokIfiModj=0Then NextjIfj>kThen :n=n+1EndIfNextiIfn=1ThenPrint“一個也沒有“ElseFori=1Ton-1Printa<i>;NextiEndIfEndSub<VisualBasic12,滾動條,運11〔名稱為Text12List1,運算符右側是一組合框〔名稱為Combo1HS1最小值和最1050LargeChange10422〔名稱為Text21中局部數據、組合框中選定的運算符及列表框中數據進展某種運算產生。標題顯示“開頭“的是一命令按鈕〔名稱為Command1。有確定時器控件<名稱為Timer1>,初始設置Timer1.Enabled為False,Timer1.Interval=2023Timer1_Timer的變量a保存從Text1c保存從Combo1中選定的值,變量b保存List1及HS1算結果。這些變量按指定規章運算,結果顯示在Text2中。以以下圖是窗體啟動并單擊“開頭“按鈕后,滾動30PrivateSubForm_Load<>List1.AddItem“10“List1.AddItem“20“List1.AddItem“30“List1.AddItem“40“List1.AddItem“50“Combo1.AddItem“+“Combo1.AddItem“-“Combo1.AddItem“*“Combo1.AddItem“/“Text1.Text=“0123456789“EndSubPrivateSubCommand1_Click<>Timer1.Enabled=TrueText1.SelStart= Text1.SelLength=2EndSubPrivateSubTimer1_Timer<>DimaAsIntegerDimbAsIntegerDimsAsIntegerDimcAsStringStaticnAsIntegern=n+1HS1.Value=n*10a=Val<Text1.SelText>b=Val<List1.List<<HS1.Value/10>-1>>c= SelectCasecCase“+“s=a+bCase“-“s=a-bCase“*“s=a*bCase“/“s=a/bEndSelectText2.Text=sIfn=5Thenn=0EndSub<VisualFoxPro>有“KSSCORE.DBC“數據庫,其中包含表“CJB.DBF“,“CJB.DBF“表的構造為準考證號〔C,9、姓名〔C,8、學校名稱〔C,20、班級名稱〔C,101〔C,4,12〔C,4,1……科目9〔C,4,19設置控件屬性如下：有三個標簽,其Name屬性分別為Label1、Label2和Label3,CaptionName屬性為TextName屬性分別為Combo1和Name屬性為Command1,CaptionVisualFoxProCombo1Combo2Command1<Text1示該學校該班級9個科目優秀率的相關數據〔每個科目優秀的標準是相應科目>=90,優秀率=相應科目優秀的人數/該學校該班人數*100%。Command1〔“確定“按鈕的Click大事代碼如下,請在劃線位置填寫正確的內容規律行連接符OPENDATABASEKSSCORESELECT學校名稱,班級名稱,COUNT<準考證號>AS班級人數FROMCJBGROUPBY;學校名稱,班級名稱INTOTABLEYXLTJTMPSELECT*FROMCJB.DBFINTODBFBJYXLTJBZAPALTERTABLEBJYXLTJBDROPCOLUMNALTERTABLEBJYXLTJBDROPCOLUMNALTERTABLEBJYXLTJBADD班級人數N<4,0>FORK=1TO9FKMRS=“科目“+RTRIM<LTRIM<STR<K>>>ALTERTABLEBJYXLTJBALTER&FKMRSN<4,0>ENDFORFORI=1TO