1、精選優(yōu)質(zhì)文檔-傾情為你奉上河北省中等職業(yè)學校對口升學考試全真模擬沖刺卷計算機試題（二）一、單項選擇題（本大題共50小題，每小題1分，共100分。在每個小題所給出的四個選項中，只有一個符合題目要求，將正確答案寫在題后的括號中，不選、多選、錯選均不得分）1關(guān)于微型計算機硬件系統(tǒng)下列說法正確的是( )A.微處理器由控制器運算器和內(nèi)存儲器組成 B.內(nèi)存儲器是計算機運行過程中主要使用的存儲器C.微機的主機就是機箱里的那些硬件 D.一般硬盤容量越大微機性能越優(yōu)2微型計算機使用的鍵盤上的ALT鍵稱為( ) A.控制鍵 B.換檔鍵 C. 轉(zhuǎn)換鍵 D.退格鍵3關(guān)于存儲器下列說法不正確的是( )A.只讀存儲器中的

2、信息由制造廠商寫入，一般不能改寫，且只能被CPU讀取，斷電后不丟失B.高速緩沖存儲器位于CPU和RAM之間 ，用戶不能直接訪問，容量小但速度最快C.光盤的讀寫速度比硬盤稍快，按讀寫功能分為CD-ROM、CD-R、E-R/W三種類型D.目前常用的外存主要有硬盤、光盤、移動磁盤等 4按計算機的應用領(lǐng)域分類，氣象預報系統(tǒng)屬于( )A數(shù)據(jù)處理 B科學計算 C輔助設計 D人工智能 5（ ）決定計算機的運算精度A. 內(nèi)存容量 B.字長 C. 主頻 D.硬盤容量6CMOS的作用是( )A.計算機啟動時執(zhí)行該程序并由它引導整個系統(tǒng) B. 存放計算機軟件和硬件的有關(guān)信息C.管理計算機整個系統(tǒng)的運行 D.存放電腦

3、硬件設置的一些參數(shù)7.下列計算機知識不正確的是( )A.電腦工作時一般不要搬動主機箱，電腦周圍也要嚴禁磁場B.以前的臺式機多是陰極射線管顯示器（CRT）,現(xiàn)在人們買臺式機也多選用液晶顯示器（LED）C.通用的多媒體動態(tài)圖像壓縮標準是MPEG D.我們通常說的微型機小型機巨型機等是按計算機的規(guī)模大小進行分類8關(guān)于計算機病毒的描述正確的是（ ）A殺毒軟件可以清除任何類型的病毒B如果長時間不關(guān)閉計算機就會感染病毒C清除病毒一個有效的方法是格式化硬盤，格式化后計算機將不會重新感染病毒D常用殺毒方法主要有人工處理和使用反病毒軟件，如瑞星諾頓都是常用殺毒軟件9在Windows XP中，雙擊窗口左上角的“控

4、制圖標”可以（ ）A放大窗口B關(guān)閉窗口C縮小窗口D彈出快捷菜單元10在Windows XP中下列不正確的是( )A沒有列入“開始”菜單中的程序可以在“運行”對話框中執(zhí)行B使用PRINT SCREEN鍵可以將當前屏幕拷貝到“剪貼板”中C可以把網(wǎng)上鄰居中的項目直接拖到“回收站”中D“資源管理器”是Windows XP的一個文件管理實用程序11.下列關(guān)于Windows XP控制面板不正確的敘述是( )A.控制面板是一組系統(tǒng)管理程序 B.可以安裝或刪除系統(tǒng)的軟件、硬件C.控制面板窗口中項目的多少與系統(tǒng)軟硬件配置有關(guān) D.可以安裝和卸載應用程序12在Word2003中關(guān)于表格不正確的是（ ）A.可以用T

5、ab鍵和Shift+Tab鍵在單元格中移動光標B改變單元格的大小可以用“表格屬性”對話框也可以通過拖動鼠標來完成C表格對齊方式的設置只能通過“表格屬性”對話框來完成D利用“表格自動套用格式”功能可以設置整個表格的樣式13Word2003中，下列設置頁邊距的方法中，錯誤的是（ ）A在頁面視圖中，利用標尺可以快速地設置頁邊距B在打印預覽狀態(tài)下，可以利用標尺快速設置頁邊距C可以通過對每行字符數(shù)的調(diào)整改變原有的頁邊距D利用“頁面設置”菜單命令，可以進行頁邊距的設置14.在Word2003文檔中，要想插入分頁符，應使用“插入”菜單中的( )A.分頁符 B.頁碼 C.分隔符 D.對象15在Excel200

6、3中以下關(guān)于使用填充柄說法正確的是( )A.當首單元格為數(shù)字格式時，直接拖動，生成步長為1的等差序列B.當首單元格為公式時，直接拖動可自動填充與首單元格相應的公式C.當首單元格為日期格式時，直接拖動，數(shù)據(jù)不變D. 當首單元格為字符格式時，直接拖動，數(shù)據(jù)不變16在Excel2003中設工作表區(qū)域A1：A12各單元格從上向下順序存儲有某商店1-12月的銷售額。為了在區(qū)域B1：B12各單元格從上向下順序得到從1月到各月的平均銷售額，其操作過程如下：先在B1單元格中輸入公式（ ），然后將其中的公式向下復制到區(qū)域B1：B12中A= AVEARGE（A1：A$1） B. =AVERAGE（A1：$A1）C

7、. = AVEARGE（A1：$A1） D. =AVERAGE（A1：A$1）17在Excel2003中，關(guān)于“篩選”的不正確敘述是（ ）A自動篩選只能原表篩選高級篩選可以將結(jié)果篩選至另外的區(qū)域中B自動篩選和高級篩選的條件都可以是多個C不同字段之間進行“或”運算必須使用高級篩選D如果所選條件出現(xiàn)在多列中，并且條件間有“與”的關(guān)系，必須使用高級篩選18下列不正確的是（）A網(wǎng)橋包含中繼器的功能和特性，不僅可以連接多種介質(zhì)，還能連接不同物理分支B路由器比網(wǎng)橋快，可以在多個網(wǎng)絡和介質(zhì)間提供網(wǎng)間服務C在星形局域網(wǎng)中，連接文件服務器與工作站的設備一般是集線器D中繼器可以用來連接不同的物理介質(zhì)，但它沒有隔離

8、和過濾功能易造成廣播風暴19當電子郵件在發(fā)送過程中有誤時，則( )A電子郵件將自動把有誤的郵件刪除 B郵件將丟失 C電子郵件會將原郵件退回，并給出不能寄達的原因 D電子郵件會將原郵件退回，但不給出不能寄達的原因20在計算機網(wǎng)絡中，通常把提供并管理共享資源的計算機稱為（）A.工作站B.服務器C.交換機D.網(wǎng)關(guān)21下列說法中不正確的是（ ）AOutlook可以閱讀郵件和新聞BFlashGet是一款免費的國產(chǎn)專業(yè)下載軟件CMIME也是郵件接收協(xié)議 DMSN也是人們經(jīng)常使用的一種網(wǎng)絡即時通信軟件22網(wǎng)卡主要功能不包括（ ）A網(wǎng)絡互連 B進行電信號匹配 C實現(xiàn)數(shù)據(jù)傳輸 D將計算機接入到傳輸介質(zhì)上23我國

9、第一個開通的商業(yè)網(wǎng)是（ ）A.CHINANET B.CERNET C.CHINAGBN D.CSTNET24將我們的校園網(wǎng)接入CERNET應使用的互聯(lián)設備是（）A網(wǎng)卡 B網(wǎng)關(guān)C網(wǎng)橋 D路由器25在IE瀏覽器中要保存一網(wǎng)站須使用（ ）功能A.歷史 B.搜索 C. 主頁 D.收藏26以下有關(guān)網(wǎng)頁制作的描述中，錯誤的是（ ）A.記事本里無法實現(xiàn)HTML語言的編輯 B.FrontPage 2000是用來制作網(wǎng)頁的一種工具軟件C.Homepage 是采用超文本標記語言來編寫的文本 D.word2000也可以進行超文本標記語言的編輯27假如某計算機的網(wǎng)絡配置的IP地址是5，子網(wǎng)掩碼是25

10、，以下說法錯誤的是（ ）A按ISO組織的網(wǎng)絡地址分類標準，該地址屬于A類地址 B該計算機所處網(wǎng)絡的地址是C該網(wǎng)絡地址的主機地址是56.85 D該計算機所在的子網(wǎng)為B類子網(wǎng)28計算機網(wǎng)絡中節(jié)點之間的通信( )A.是通過雙絞線實現(xiàn)的 B. 是通過交換網(wǎng)實現(xiàn)的C.是通過局域網(wǎng)實現(xiàn)的 D. 是通過網(wǎng)絡協(xié)議實現(xiàn)的29下列說法正確的是( )A.ARP協(xié)議用來將MAC地址翻譯成IP地址 B.OSI和TCP/IP協(xié)議都是國際標準 C.OSI為用戶提供了實現(xiàn)其功能的協(xié)議 D.支付網(wǎng)關(guān)是連接銀行專用網(wǎng)絡與Internet的一組服務器30下列屬于URL的是（ ）A.WWW.163.

11、COM B. FTP：//800 C.D:WWW.123.COMINDEX.HTML D. HTTP：/WWW.163.COMA9931關(guān)于寬帶接入技術(shù)下列正確的是( )A. 超級一線通稱之為ISDN B. ADSL是非對稱式用戶線路C. 小區(qū)寬帶接入設備之間以雙絞線相連，小區(qū)內(nèi)采用綜合布線 D. DDN即綜合業(yè)務數(shù)字網(wǎng)32關(guān)于拓撲結(jié)構(gòu)下列不正確的是( )A.樹型網(wǎng)絡又稱為分時多用戶集中式網(wǎng)絡，是一個在分級管理基礎上的集中式網(wǎng)絡B.星型結(jié)構(gòu)主要用于分級的主從式網(wǎng)絡，采用集中控制C.相對來說，采用環(huán)型結(jié)構(gòu)的網(wǎng)絡比較節(jié)省通信線路和通信設備D 分布式結(jié)構(gòu)主要用于廣域網(wǎng)，資源共享方

12、便33在Visual FoxPro中，下列（ ）函數(shù)的輸出結(jié)果是數(shù)值型ASTR(3.45,3,1)                            BYEAR(DATE()CDTOC(1980-10-10)          

13、;            DMAX(“A”,“B”) 34在Visual FoxPro中，當前數(shù)據(jù)表有8條記錄,當前記錄號5,執(zhí)行命令LIST NEXT 5之后,當前記錄號為（ ）A5       B8      C10       D935Visual FoxPro中有如下程序段： CLOSE TABLES ALL USE XS SELE 3 U

14、SE JS USE KC IN 0 BROW 上述程序執(zhí)行后，瀏覽窗口中顯示的表及當前工作區(qū)號分別是（ ） AKC 、 2 B KC 、 3 CJS 、 3 DJS 、 2 36Visual FoxPro中，下列關(guān)于視圖與表及查詢的比較，（ ）是錯誤的A視圖、表均可作為查詢及其他視圖的數(shù)據(jù)源B視圖與查詢均可從數(shù)據(jù)源中查找滿足一定條件的記錄C查詢可以更新數(shù)據(jù)源表，但視圖不能D視圖與表的不同點之一是視圖不保存數(shù)據(jù)，是虛擬表37在Visual FoxPro中，將當前索引文件中的“姓名”設置為當前索引，應輸入的命令是（ ）ASET ORDER 姓名 BSET 姓名 CSET ORDER TO TAG

15、姓名 DSET ORDER ON 姓名38Visual FoxPro中，對于許多控件來說，可以通過 ControlSource 屬性與數(shù)據(jù)綁定。在下列對象中，無 ControlSource 屬性的是（ ） ALabel BCheck COptionGroup DList 39Visual FoxPro中，數(shù)據(jù)綁定型控件是指其（顯示的）內(nèi)容與表、視圖或查詢中的字段（或內(nèi)存變量）相關(guān)聯(lián)的控件。若某個控件被綁定到一個表的字段，移動該表的記錄指針后，如果該字段的值發(fā)生變化，則該控件的（ ）屬性值也隨之發(fā)生變化AName BControlSource CValue DCaption40在Visual F

16、oxPro中，PasswordChar 屬性僅適用于（ ） A文本框 B組合框 C列表框 D復選框41. Visual Basic表達式x Mod yz>5 And A+B+C>=36中最先被執(zhí)行的運算是（ ）A+ BAnd CMod D42Visual Basic語句"DIM A（10）"中A表示（ ）A.變量名 B.下標變量名 C.數(shù)組名 D.數(shù)組元素名43在Visual Basic中，Ucase("43dcAB12")的值是（ ）A.1234 B.abcd C.43DCAB12 D.43dcab12 44Visual Basic欲使某命

17、令按鈕失效,應修改命令按鈕的（ ）屬性A.Visible B.Caption C. Enable D.Enabled45Visual Basic要使標簽能透出窗體的背景，必須設置（ ）屬性A.Backstyle B.Borderstyle C.Appearance D.Backcolor46下列四個選項，是Visual Basic數(shù)值常量的是（ ）A. 1E6 B. 1*E6 C. 1*E-6 D. 1*E+647Visual Basic組合框的類型由Style屬性決定,簡單組合框的Style屬性值應為( )A.0 B.1 C.2 D.348Visual Basic下面哪些控件不會影響到界面設

18、計效果.( )A.定時器 B.文本框 C.標簽 D.Line控件49在Visual Basic中窗體上含有一個文本框，一個水平滾動條控件。程序代碼如下：Private sub form_load( ) Hscroll1.min=0Hscroll1.max=100End subprivate sub hscroll1_change()text1.text=hscroll1.valueend sub則運行時將水平滾動條滑塊移至最右端時，文本框顯示的是（ ）A.0 B.100 C.50D.不確定50Visual Basic中將CommonDialog通用對話框的類型設置為字體對話框,可設置該控件的(

19、 )屬性.A.font B.filter C.flags D.Action二、填空題（本大題共13小題，每空2分，共26分，請將正確的答案填寫在題中的橫線上，不填少填錯填均不得分）1已知一漢字內(nèi)碼為AEDCH，則區(qū)位碼為_。2與八進制數(shù)113.54Q等值的十進制數(shù)是_。3單倍光驅(qū)的數(shù)據(jù)傳輸速率是_。4在Windows XP中可以用回收站恢復_上被誤刪除的文件。5在Word2003中插入一個來自于文件的圖片或剪貼畫，如果要設置該圖片位置“相對于頁邊距水平3厘米，垂直5厘米”，則應在“設置圖片格式”對話框的_選項卡中進行設置。 6在Excel2003中，C3單元格內(nèi)輸入公式=$A5+D$9后，在第

20、5行后插入一行再刪除B列后，原含有公式的單元格中的公式為_。7計算機網(wǎng)絡中ATM是指_。8網(wǎng)絡中表示國際組織的域名是_。9Outlook中，從接收服務器取回來的新郵件都保存在_。10在Visual FoxPro報表設計器中，劃分有多個帶區(qū)。其中打印每條記錄的帶區(qū)稱為_帶區(qū)。 11在Visual FoxPro中，ROUND（2167.785,-2）的返回值是_。12. 改寫成Visual Basic表達式是_。13Visual Basic中For Each Next 語句根據(jù)_決定循環(huán)的運行次數(shù)。三、判斷題（本大題共14小題，每小題1分，共14分，請在認為正確的小題前面的括號里打“”，錯誤的打“

21、×”，判斷失誤或不判斷者，不得分）（ ）1微型計算機中，打印機是標準輸出設備。（ ）2硬盤的容量單位是MB。（ ）3Windows XP中寫字板和記事本均允許設置字體的顏色。（ ）4Windows XP快捷方式文件的圖標右下角有一個小箭頭。（ ）5Word2003中也可以對頁眉中的文字分兩欄。（ ）6Word2003打開“查找與替換”對話框的快捷鍵是CTRL+F。（ ）7在Excel2003中，對Book1.xls文件中Sheet2中的第2行第5列的絕對引用是$E$2。（ ）8在Excel2003中鼠標拖動選定區(qū)域時，在名稱框顯示選定的單元格代碼，若選定10個單元格，則其代碼為2R&

22、#215;5C。（ ）9最早出現(xiàn)的計算機網(wǎng)絡是ARPANET，發(fā)展到現(xiàn)在是Internet。（ ）10無屏蔽雙絞線英文簡寫為STP。（ ）11域名就是用來表示IP地址的,兩者的功能是一樣的。（ ）12網(wǎng)關(guān)具有路由器的全部功能，它也可以工作在網(wǎng)絡層。（ ）13在Visual FoxPro中，一個表只能創(chuàng)建一個結(jié)構(gòu)化復合索引文件。（ ）14在Visual Basic中，某一過程中的靜態(tài)變量在過程結(jié)束后，靜態(tài)變量及其值可以在其它過程中使用。四、根據(jù)已知的環(huán)境與題意，寫出相應的Visual FoxPro操作命令或SQL語句，要求每小題用一條命令或語句完成（本大題共5小題，每小題4分，共20分。）金牌榜

23、.DBF（國家代碼 C(3),金牌數(shù) I，銀牌數(shù) I，銅牌數(shù) I）獲獎牌情況.DBF（國家代碼 C(3),運動員名稱 C(20),項目名稱 C(3),名次 I）國家.DBF（國家代碼 C(3),國家名稱 C(20)）“金牌榜”表中一個國家一條記錄；“獲獎牌情況”表中每個項目中的各個名次都有一條記錄，名次只取前3名，例如：國家代碼 運動員名稱 項目名稱 名次001 劉翔 男子110米欄 1001 李小鵬 男子雙杠 3002 費爾普斯 游泳男子200米自由泳 3002 費爾普斯 游泳男子400米個人混合泳 1001 郭晶晶 女子三米板跳板 1001 李婷/孫甜甜 網(wǎng)球女子雙打 11) 使用“獲獎牌

24、情況”和“國家”兩個表查詢“中國”所獲金牌（名次為1）的數(shù)量。（用SQL命令）2)為表“金牌榜”增加一個字段“獎牌總數(shù)”（整型），同時為該字段設置有效性規(guī)則：獎牌總數(shù)>=0。（用SQL命令）3) 將金牌榜.DBF中的新增加的字段“獎牌總數(shù)”設置為金牌數(shù)、銀牌數(shù)、銅牌數(shù)三項的和。（用SQL命令）4）邏輯刪除金牌榜表中獎牌總數(shù)少于30的記錄。（用Visual FoxPro命令）5）在“獲獎牌情況”表中按運動員名稱和名次設置索引，索引名為MC，存于JP.CDX。（用Visual FoxPro命令）五、程序分析（本大題共2小題，每小題5分，共10分。）1.閱讀下面的Visual Basic程序p

25、rivate sub form_click( ) dim k as integer,s as integer, j as integer form1.cls for k=1 to 5 s=0 for j=k to 5 s=s+1 next j next k print “s=”,s end sub 上述程序中語句S=S+1執(zhí)行性的次數(shù)是_,運行后s的值是_.2以下Visual FoxPro程序的功能是：_.SET SAFETY OFFSELE 1USE 學生 ALIAS XSINDEX ON 學號 TAG XHSELE 2USE 選課SET RELATION TO 學號 INTO XSDO W

26、HIEL .T.ACCEPT “請輸入學生的學號：” TO XHIF LEN(ALLTRIM(XH)=0 EXITENDIFSCAN FOR 學號=XH? XS.姓名，XS.班級，課程號，成績ENDSCANENDDOCLOSE ALLRETURN六、寫出下列程序的運行結(jié)果（本大題共5小題，每小題5分，共25分。）1.Private sub form_click()X=int(rnd(5*5)+5)A=wu(wu(x-1)+3)Print A End subFunction wu(x as integer) Wu=x+1End function寫出Visual Basic程序運行時單擊窗體后，在

27、Form1上的輸出結(jié)果。結(jié)果為：_2Private Sub Command1_Click() m = 65: a$ = "A" Print Tab(10); a$ For i = 1 To 3 m = m + 1 a$ = Chr$(m) + a$ + Chr$(m) Print Tab(10 - i); a$ Next iEnd Sub寫出Visual Basic程序運行時單擊按鈕后，在Form1上的輸出結(jié)果。結(jié)果為：_3以下Visual FoxPro程序的輸出結(jié)果是_ CLEAR ST=“AB CD12” N=LEN(ST) DO WHILE N1 IF SUBSTR(

28、ST,N,1)=SPACE(1) EXIT ELSE ? SUBSTR(ST,N,1) N=N-1 ENDIF ENDDO RETURN4現(xiàn)有一數(shù)據(jù)表DA.DBF，其記錄內(nèi)容如下：   記錄號姓名 性別   總分   1   黃英宇  女  450   2  吳用    男 560   3  張明英  女 650   4  王海英 女 560  

29、5   李英  男 640   clear   Select * From DA Where 姓名 Like “%英%” Into DBFDD   Use DD  P=1  Do While P<3     ? 姓名     P=P+1     skip     Enddo 

30、; Use return   已知姓名字段寬度為6，則程序運行后,屏幕顯示為：_  5有如下Visual FoxPro程序：i=5s=0do while i>0j=1?str(6-i,1)+space(3)do while j<=i?str(i*j,2)+space(2)j=j+1enddos=s+ji=i-1enddoretu該程序的運行結(jié)果是_七、程序改錯(本大題共2小題，每題5分，共10分。每個程序有兩處錯誤，請在答題紙上寫出錯誤行代碼和修改后的正確代碼，改錯不扣分。) 1、本Visual Basic程序的功能是隨機產(chǎn)生的10個兩位正整

31、數(shù)，并進行遞增排序。 Private Sub Command1_Click() Dim I As Integer Dim N As Integer Dim X(10) As Integer Dim J As Integer N = 10 Print "數(shù)據(jù)：" For I = 1 To N X(I) = Int(Rnd() * 90) + 10 Print X(I); Next I Print Print "排序：" For I = 0 To N - 1 For J = I + 1 To N If X(I) < X(J) Then Temp = X

32、(I) X(I) = X(J) X(J) = Temp End If Next J Print X(I); Next I Print X（I）End Sub2. Visual Basic窗體上有兩個按鈕，單擊“讀數(shù)據(jù)”按鈕，從C盤int3.dat文件中讀取100個數(shù)據(jù)到數(shù)組A中。單擊“計算”按鈕，則找出這100個整數(shù)中的所有水仙花數(shù)，并將它們的最大值與最小值分別顯示在文本框Text1,TEXT2中。（注：當一個數(shù)的值等于該數(shù)中的各位數(shù)字的立方和時，此數(shù)被稱為水仙花數(shù)，如153=13+53+33）Dim a(100) As IntegerPrivate Sub Command1_Click()D

33、im k As IntegerOpen “c:in3.dat” For Input As #1For k = 1 To 100Write #1, a(k)Next kClose #1END sub End SubPrivate Sub Command2_Click()Dim max As Integer, min As Integer, flag As Boolean max = -1 min = 1000 For i = 1 To 100 x = Fix(a(i) / 100)y = Fix(a(i) x mod 100) / 10)z = a(i) - x * 100 - y * 10If

34、 a(i) = x 3 + y 3 + z 3 Then flag = TrueElse flag = FalseEnd If If flag Then If max <= a(i) Then max = a(i) If min >= a(i) Then min = a(i) End If Next i Text1 = max Text2 = minEnd Sub八、程序填空（本大題共7個空，每空5分，共35分。按程序要求在答題紙上填入相應的內(nèi)容，使程序完整正確。）1. Visual Basic窗體中有兩個圖片框，名稱分別為P1,P2，其中圖片內(nèi)容分別是一架航天飛機和一朵云彩，一個

35、命令按鈕名稱為C1，標題為“發(fā)射”，還有一個計時器，名稱為TIMER1。要求，程序運行時單擊“發(fā)射”按鈕，則航天飛機每隔0.1秒向上加速移動1次，當達到P2的下方時，停止移動。如圖所示Private Sub C1_Click()Terval=100Timer1.Enabled =trueEnd SubPrivate Sub Timer1_Timer()_ a%a = a +1If P1.Top > _ ThenP1.Move P1.Left, P1.Top - 5 - a, P1.Width, P1.HeightElse Timer1.Enabled=falseEnd

36、IfEnd Sub2. 有Visual Basic程序，10個數(shù)以遞減次序排好放在數(shù)組中，由鍵盤輸入一個數(shù)，以二分法查找此數(shù)是否在該數(shù)組中，如果是輸出“YES”，不是輸出“NO”。Option Base 1Private Sub Form_Activate()Dim a, x As Integera = Array(95, 86, 78, 70, 63, 57, 48, 39, 20, 10)X1 = 1: X2 = 10x = InputBox("INPUT X=")Do While X2 >= X1 P = _If x = a(P) Then Print &quo

37、t;YES": Exit DoIf _ ThenX1 = P + 1ElseX2 = P-1 End IfLoopIf X1 > X2 Then Print "No"End Sub3Visual FoxPro中有售書數(shù)據(jù)表BOOK.DBF，BOOK.DBF中的記錄如下：書號 單價 數(shù)量 總計B0168 19.8 3B6915 12.6 36B9023 40.0 100B4682 18.0 40B6329 28.0 56B8127 2.0 20現(xiàn)需要調(diào)整一些書的單價,然后用調(diào)整后的“單價*數(shù)量”的值填入“總計”字段，下邊程序的功能是根據(jù)用戶輸入的書號查找到記錄,并由用戶決定是否對該記錄進行修改，請?zhí)羁眨篣SE BOOKINDEX ON 書號 TO BOOKI_CLEARDISP ALL FIELDS 書號_SEEK BNOI