《计算机vb试题及答案.docx》由会员分享，可在线阅读，更多相关《计算机vb试题及答案.docx（65页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、计算机vb试题及答案计算机vb试题及答案篇一1.以下程序是求最大公约数和最小公倍数的程序，在【】处填写合适的关系运 算符。Private Sub FormClickDim ml, nl, m, n, r As Integernl = InputBox（输入自然数n”, 输入数） ml = InputBox（输入自然数m,输入数”） n = nl m = mlIf mn p= then t = m: m = n: n = t End If r = m Mod nDo While r 0 m = nB. batC. vbgD. vbp15.以下叙述中错误的是(C)(单)A.打开一个工程文件时，系统
2、自动装入与该工程有关的窗体、标准模块等文件B.保存Visual Basic程序时，应分别保存窗体文件及工程文件C. Visual Basic应用程序只能以解释方式执行D.事件可以由用户引发16 .以下声明语句中错误的是(B)(单)A. Const varl=123B. Dim var2 = ABCC. Public a, b as integerD.Static a as single17 .设窗体上有一个列表框控件List 1,且其中含有若干列表项。则以下能表 示当前被选中的列表项内容的是(D)(单)A. Listl. ListB. Listl. ListindexD. Listl. Tex
3、t18 .程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是（C）（单）A. MouseDownB. MouseUpC. LoadD. Click19 .设a=10, b=5, c=l,执行语句Print a b c后，窗体上显示的是（单）A. TrueB. FalseC. 1D.出错信息20 .如果要改变窗体的标题，则需要设置窗体的（A）属性（单）A. CaptionB. NameC.BackColorD.BorderStyle计算机vb试题及答案篇二1 .以下程序段运行的结果为(B)(单)Private Sub FormClickMyDate = #7/21/1997#Print F
4、ormat(MyDate, m/d/yy)Print Format (MyDate, z，yyyy 年 m 月 dd 日)End SubA.7/21/97 1997年7 月 21 日2 .7-21-97 1997 年 7 月 21 日C.97/7/21 1997年 7 月 21 日D.7/21/97 97 年 7 月 21 日3 .以下程序段运行的结果为(B)(单)Private Sub Form_ClickMyTime = #9:21:30 PM#MyDate = #7/21/1997#Print Tab (2) ; Format (MyDate, “mminni-yy)Print Tab(
5、2); Format(MyTime, hh:mm:ss A/P)End SubA.July-97 9:21:30 PB.July-97 09:21:30 PC.07-97 9:21:30 PD.July-97 9:21:304 .以下程序段运行的结果为(C)(单)Private Sub FormClickMyDate = #7/21/1997#Print Format (MyDate, dddd, mmmm, dd, yyyy)End SubA. 21,07, 1997B. 21,07, 21, 1997C. Monday, July, 21, 1997D. Monday, 07, 21, 1
6、9974 .在窗体中建立一个文本框textl和一个命令按钮commandl,编写下面程 序：Private Sub TextlLostFocusIf Not IsNumeric(Textl) ThenMsgBox 帐号有非数字字符错误Textl. Text = Textl. SetFocuselseMsgBox 帐号正确End IfEnd Sub当在textl文本框中输入字符abc之后，单击命令按钮，结果为(B)(单)A.显示对话框，提示信息为帐号正确B.显示对话框，提示信息为帐号有非数字字符错误C.程序出错D.没有任何提示5 .在窗体中建立一个文本框textl和一个命令按钮commandl,
7、编写下面程 序：Private Sub Textl_LostFocusIf Not IsNumeric (Textl) ThenMsgBox 帐号有非数字字符错误Textl. SetFocuselseMsgBox 帐号正确End IfEnd Sub当在textl文本框中输入数字123456之后，单击命令按钮，结果为（A）（单）A.显示对话框，提示信息为帐号正确B.显示对话框，提示信息为帐号有非数字字符错误C.程序出错D.没有任何提示6 .在窗体中建立一个文本框textl和一个命令按钮commandl,编写下面程 序：Private Sub Command1_ClickDim I As Inte
8、gerIf Textl.Text Gong ThenI = MsgBox （密码错误，5 + vbExclamation, 输入密码）If I 4 ThenEndElseTextl. Text =Textl. SetFocusEnd IfElseMsgBox 密码帐号正确!End IfEnd Sub若在textl中输入字符串Gong，则程序运行结果为(A)(单)A.显示对话框，提示密码帐号正确！B.显示对话框，提示密码错误C.程序出错D.没有任何提示7 .在窗体中建立一个文本框textl和一个命令按钮command 1,编写下面程 序：Private Sub Commandl_ClickDim
9、 I As IntegerIf Textl.Text Gong ThenI 二 MsgBox（密码错误，5 + vbExclamation, 输入密码）If I 04 ThenEndElseTextl.Text 二Textl. SetFocusEnd IfElseMsgBox 密码帐号正确！End IfEnd Sub若在textl中输入字符串gong”,则程序运行结果为（B）（单）A.显示对话框，提示密码帐号正确！8 .显示对话框，提示密码错误C.程序出错D.没有任何提示9 .在窗体中建立一个文本框textl和一个命令按钮command 1,编写下面程序:Private Sub Command
10、1 ClickDim I As IntegerIf Textl. Text Gong ThenI = MsgBox（密码错误，VbRetryCancle + vbExclamation, 输入密码）If I 4 ThenEndElseTextl.Text = Textl. SetFocusEnd IfElseMsgBox 密码帐号正确！End IfEnd Sub若在textl中输入字符串123，显示密码错误对话框，关于此对话框描述 正确的是（A）（单）A.显示对话框中有“重试”按钮B.显示对话框中有“确定”按钮C.显示对话框中有“是按钮D.以上说法都不正确10 在窗体中建立三个文本框，名称分别
11、为textl、text2和text3,还有一个 名称为labell的标签，一个名称为commandl的命令按钮，编写如下代码：Private Sub Command1_Click Dim x, y, z, t! x = Textl y = Text2 z = Text3If x y Then t = x x 二 y y = t End IfIf y z Then t = y y 二 zLoopPrint 最大公约数=”，nPrint 最小公倍数二，ml * nl / nEnd Sub2 .下面是求100以内素数的程序。Private Sub Command1_ClickDim i As Int
12、eger, m As Integer, tag As BooleanFor m = 2 To 100tag = TrueFor i = 2 To m - 1If m Mod i = 0 Then tag = FalseNext iIf tag Then Print mNext mEnd Sub3 .下面是求100以内素数的程序，下面说法正确的是(A)(单)If x y Then x = y y = t End If End IfLabel 1. Caption 二 x & ， & y & ， & zEnd Sub当在文本框textl、text2和text3中分别输入5、3和8,则标签显示的结
13、果为(C)(单)A. 3, 5, 8B. 5, 3, 8 C. 8, 5, 3D. 3. 8. 510 .以下程序段：Private Sub Form LoadDim Nop As Integer, Op As String * 1Numl = 3Num2 = 2Nop = val (Inputbox (请输入1-4之间的整数)Select Case NopOp =+Result = Numl + Num2Case 1 c Op =-Result = Numl - Num2Op = XResult 二 Numl * Num2op = yResult = Numl / Num2End Selec
14、tLabel1= Numl & Op & Num2 & = & Result窗体运行后，输入1,则label 1的标题显示结果为（A）（单）A. 3+2=5B. 3-2=1C. 3X2=60.34-2=1.511 .以下程序段：Private Sub Form LoadDim Nop As Integer, Op As String * 1Numl = 3Num2 = 2Nop = val （Inputbox （“请输入1-4之间的整数”）Select Case NopOp = +Result = Numl + Num2Op 二Result = Numl - Num2Op = XResult
15、= Numl * Num2op = yResult 二 Numl / Num2End SelectLabel1= Numl & Op & Num2 & = & ResultEnd Sub窗体运行后，输入2,则labell的标题显示结果为(B)(单)A. 3+2=5B. 3-2=1C. 3X2=6D. 32=1. 512 .以下程序段：Private Sub Form LoadDim Nop As Integer, Op As String * 1Numl = 3Num2 = 2Nop = val (Inputbox (请输入 1-4 之间的整数)Select Case NopOp 二 +Res
16、ult = Numl + Num2Case 1 c Op =-Result 二 Numl - Num2Op = *Result = Numl * Num2Op = TResult = Numl / Num2End SelectLabel1= Numl & Op & Num2 & = & ResultEnd Sub窗体运行后，输入3,则labell的标题显示结果为(C)(单)A. 3+2=5B. 3-2=1C. 3X2=6D. 32=1. 513 .以下程序段：Private Sub Form LoadDim Nop As Integer, Op As String * 1Numl = 3Num
17、2 = 2Nop = val (Inputbox (请输入1-4之间的整数)Select Case NopResult = Numl + Num2c Op =-Result = Numl - Num2Op = XResult 二 Numl * Num2op = yResult = Numl / Num2End SelectLabel1= Numl & Op & Num2 & = & ResultEnd Sub窗体运行后，输入4,则label 1的标题显示结果为(D)(单)A. 3+2=5B. 3-2=1D. 34-2=1.514 .以下程序段的作用是(A)(单)Private Sub Pict
18、urel ClickDimasci As Integer,i As IntegerForasci = 32 To 126Picturel. Print Tab(7* i + 2); Chr(asci); =；asci;If i = 7 Then i =0:Picturel. PrintNext asciA.打印ASCH码表,一行7个表达式B.打印九九乘法表,一行7个表达式C.打印ASCH码表,一行8个表达式D.以上说法都不正确15 .我国现在人口有13亿，按人口增长0.8%计算，多少年后我国人口将超过26亿。Private Sub Command1_ClickDim x, nx = Vai(T
19、extl)n = 0Do While x 0.00001 e = e + t 1 = 1 + 1 n 二 n * I t = 1 / n LoopPrint 计算了 ； I; 项的和是；ePrivate Sub Command1 ClickDim i As Integer, m As Integer, tag As BooleanFor m = 2 To 100tag = TrueFor i = 2 To m - 1If m Mod i = 0 Then tag = FalseNext iIf tag=true Then Print mNext mEnd SubA. tag为true时，表示m
20、是素数B.tag为false时,表示m是素数C.语句m Mod i=0,说明m是素数D.以上说法都不正确4.百元买百鸡问题：假定小鸡每只5角，公鸡每只2元，母鸡每只3元。现在 有100元钱要求买100只鸡，以下程序列出了所有可能的购鸡方案。Private Sub Command2_ClickDim x%, y%, z%End Sub18.求自然数e的近似值，误差小于0.00001,近似公式为: e=l+l/l!+l/2!+l/3!+l/I! +以下程序用来求自然数e。Private Sub FormClickDim 1%, n&, t, e!E = 0 存放累加和结果I = 0，计数器n =
21、1 存放阶乘的值t = 1 级数第I项值Do While t0.00001 e=e+ t 1=1+1n=n*It=1/nLoopPrint 计算了 ； I; 项的和是；eEnd Sub19.求自然数e的近似值，误差小于0.00001,近似公式为:e=l+l/l!+l/2!+l/3!+l/I! +以下程序用来求自然数e。 Private Sub FormClick Dim 1%, n&, t, e!E = 0 存放累加和结果 1=0计数器 n = 1 存放阶乘的值 t = 1 级数第I项值 Do While t0.00001 e=e+t1=1+1n=n* It=1/nLoopPrint 计算了
22、； I; 项的和是；e End Sub20.以下程序是求最大公约数和最小公倍数的程序。Dim ml, nl, m, n, r As Integernl = InputBox（输入自然数n，输入数） ml = InputBox（输入自然数m”, 输入数”） n = nlm = mlIf m n Thent = m: m = n: n = tEnd Ifr = m Mod nDo While （r0）m = nn = rr = m Mod nLoopPrint 最大公约数=”，nPrint 最小公倍数二 ，ml * nl / n计算机vb试题及答案篇三20xx年9月计算机二级VB测试题及答案单选题
23、1) .在VisualFoxPro中，下列数组元素的使用正确的是A.PI(0, 1)B.PI(2, 0)C.PI(2, 3)D. PI(1, 2, 3)正确答案：c2) .当一个复选框被选中时，它的Value属性的值是A. 3B. 2C. 1D. 0正确答案：c3) .下列操作可以打开立即窗口的是A. Ctrl+DB. Ctrl+FC. Ctrl+GD. Ctrl+E正确答案：c4) .如果将一个数据表设置为“排除”状态后，那么系统连编后，该数据表将A.成为自由表B.包含在数据库中C.不能编辑修改D.可以随时编辑修改正确答案：D5) .在结构化设计方法中，生成的结构图(SC)中，带有箭头的.连
24、线表示A.模块之间的调用关系B.程序的组成成分C.控制程序的执行顺序D.数据的流向正确答案：A6) .程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是A. MouseDownB. MouseUpC. LoadD. Click正确答案：c7) .在软件开发中，需求分析阶段产生的主要文档是A.可行性分析报告B.软件需求规格说明书C.概要设计说明书D.集成测试计划正确答案：B答案解析：A错误，可行性分析阶段产生可行性分析报告。C错误，概要设计 说明书是总体设计阶段产生的文档。D错误，集成测试计划是在概要设计阶段编写 的文档。B正确，需求规格说明书是后续工作如设计、编码等需要的重要参考文 档。
25、8) .以下关于数组的叙述中，错误的是A. Variant类型的数组中各数组元素的类型可以不同B.各数组元素可以是不同类型的控件C.各数组元素通过下标进行区别D.各数组元素具有相同的名称正确答案：B答案解析：控件数组是由一组相同类型的控件组成。它们共用一个控件名，绝 大部分的属性也相同，但有一个属性不同，即Index属性的值不同。当建立控件数 组时，系统给每个元素赋一个唯一的索引号(Index),通过属性窗口的Index属 性，可以知道该控件的下标是多少，第1个元素下标是0。9) .以下定义数组或给数组元素赋值的语句中，正确的是A. Dim a As Varianta=Array (1, 2,
26、 3, 4, 5)B. Dim a(10) As Integera=Array (1, 2, 3, 4, 5)C. Dim a%(10)a(l) =ABCDED. Dim a3. , b3. As Integera(O) =0a(l) =la2. =2b=a正确答案：A10) .对建立良好的程序设计风格，下面描述正确的是A.程序应简单、清晰、可读性好B.符号名的命名只要符合语法C.充分考虑程序的执行效率D.程序的注释可有可无正确答案：A计算机Vb试题及答案篇四下面叙述正确的是(C)A.算法的执行效率与数据的存储结构无关B.算法的空间复杂度是指算法程序中指令(或语句)的条数C.算法的有穷性是指算
27、法必须能在执行有限个步骤之后终止D.以上三种描述都不对以下数据结构中不属于线性数据结构的是(C)A.队列B.线性表C.二叉树D.栈在一棵二叉树上第5层的结点数最多是(B)注：由公式2k-1得A. 8B. 16C. 32D. 15(4)下面描述中，符合结构化程序设计风格的是(A)A.使用顺序、选择和重复(循环)三种基本控制结构表示程序的控制逻辑B.模块只有一个入口，可以有多个出口C.注重提高程序的执行效率D.不使用goto语句下面概念中，不属于面向对象方法的是(D)A.对象B.继承C.类D.过程调用(6)在结构化方法中，用数据流程图(DFD)作为描述工具的软件开发阶段是(B)A.可行性分析B.需
28、求分析C.详细设计D.程序编码在软件开发中，下面任务不属于设计阶段的是(D)A.数据结构设计B.给出系统模块结构C.定义模块算法D.定义需求并建立系统模型数据库系统的核心是(B)A.数据模型B.数据库管理系统C.软件工具D.数据库(9)下列叙述中正确的是(C)A.数据库是一个独立的系统，不需要操作系统的支持B.数据库设计是指设计数据库管理系统C.数据库技术的根本目标是要解决数据共享的问题D.数据库系统中，数据的物理结构必须与逻辑结构一致(10)下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A)A.内模式B.外模式C.概念模式For x = 0 To 33For y = 0 To 5
29、0If3*x + 2*y + 0.5* (100 - x - y) = 100 ThenPicture2. Print x, y, 100-x-y, 10-y-xEnd IfNext yNext xEnd Sub5.百元买百鸡问题：假定小鸡每只5角，公鸡每只2元，母鸡每只3元。现在 有100元钱要求买100只鸡，以下程序列出了所有可能的购鸡方案。Private Sub Command1_ClickDim x%, y%, z%For x = 0 To 33For y = 0 To 50For z = 0 To 100If3*x+2*y+0.5*z= 100 And x+y+z=100 ThenP
30、icturel. Print x, y, zEnd IfD.逻辑模式(11)算法的时间复杂度是指(C)A.执行算法程序所需要的时间B.算法程序的长度C.算法执行过程中所需要的基本运算次数D.算法程序中的指令条数(12)算法的空间复杂度是指(D)A.算法程序的长度B.算法程序中的指令条数C.算法程序所占的存储空间D.算法执行过程中所需要的存储空间(13)设一棵完全二叉树共有699个结点，则在该二叉树中的叶子结点数为(B) 注：利用公式n=n0+nl+n2、n0=n2+l和完全二叉数的特点可求出A. 349B. 350C. 255D. 351(14)结构化程序设计主要强调的是(B)A.程序的规模B
31、.程序的易读性C.程序的执行效率D.程序的可移植性(15)在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功 能的阶段是注：即第一个阶段A.概要设计B.详细设计C.可行性分析D.需求分析(16)数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符 构成。下列图符名标识的图符不属于数据流图合法图符的是(A)A.控制流B.加工C.数据存储D.源和潭(17)软件需求分析阶段的工作，可以分为四个方面：需求获取、需求分析、编写需求规格说明书以及(B)注：P66A.阶段性报告B.需求评审C.总结D.都不正确(18)下述关于数据库系统的叙述中正确的是(A)A.数据库系统减少了数据冗
32、余B.数据库系统避免了一切冗余C.数据库系统中数据的一致性是指数据类型的一致D.数据库系统比文件系统能管理更多的数据(19)关系表中的每一横行称为一个(A)A.元组B.字段C.属性D.码(20)数据库设计包括两个方面的设计内容，它们是(A)A.概念设计和逻辑设计B.模式设计和内模式设计C.内模式设计和物理设计D.结构特性设计和行为特性设计(21)下列叙述中正确的是(A)A.线性表是线性结构B.栈与队列是非线性结构C.线性链表是非线性结构D.二叉树是线性结构(22)下列关于栈的叙述中正确的是(D)A.在栈中只能插入数据B.在栈中只能删除数据C.栈是先进先出的.线性表D.栈是先进后出的线性表(23
33、)下列关于队列的叙述中正确的是(C)A.在队列中只能插入数据B.在队列中只能删除数据C.队列是先进先出的线性表D.队列是先进后出的线性表(24)对建立良好的程序设计风格，下面描述正确的是(A)A.程序应简单、清晰、可读性好B.符号名的命名要符合语法C.充分考虑程序的执行效率D.程序的注释可有可无(25)下面对对象概念描述错误的是(A)A.任何对象都必须有继承性B.对象是属性和方法的封装体C.对象间的通讯靠消息传递D.操作是对象的动态性属性(26)下面不属于软件工程的3个要素的是(D)A.工具B.过程C.方法D.环境(27)程序流程图(PFD)中的箭头代表的是(B)A.数据流B.控制流C.调用关
34、系D.组成关系(28)在数据管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数 据库系统阶段。其中数据独立性最高的阶段是(A)A.数据库系统B.文件系统C.人工管理D.数据项管理(29)用树形结构来表示实体之间联系的模型称为(B)A.关系模型B.层次模型C.网状模型D.数据模型(30)关系数据库管理系统能实现的专门关系运算包括(B)A.排序、索引、统计B.选择、投影、连接C.关联、更新、排序D.显示、打印、制表计算机vb试题及答案篇五1 .在窗体上建立一个名称为Command 1的命令按钮，一个名称为Textl的文本 框，以及四个单选按钮：第一个名称为optionl用来设置文本框的字体
35、为宋体。第二个名称为option2用来设置文本框的字体为黑体，第三个名称为 options用来设置文本框的字体大小为8号，第四个名称为option4用来设置文本 框的字体大小为12号。程序如下：（程序运行刚开始时，四个单选按钮都没有选中）Private Sub Command1_ClickTextl. FontName = lif （Optionl. Value, 宋体，黑体）Textl. FontSize = lif （0ption3. Value, 8, 12）End Sub当程序运行时，先单击单选按钮option2,然后单击命令按钮command 1,则文 本框textl的变化效果是（B
36、）（单）A.字体设置为宋体B.字体设置为黑体C.字体大小设置为8号D.字体大小设置为12号2 .在窗体上建立一个名称为Commandl的命令按钮，一个名称为Textl的文本 框，以及四个单选按钮：第一个名称为optionl用来设置文本框的字体为宋体。第二个名称为option2用来设置文本框的字体为黑体，第三个名称为 options用来设置文本框的字体大小为8号，第四个名称为option4用来设置文本 框的字体大小为12号。程序如下：（程序运行刚开始时，四个单选按钮都没有选中）Private Sub Command1_ClickTextl. FontName = lif （Optionl. Va
37、lue, 宋体，黑体）Textl. FontSize = lif （0ption3. Value, 8, 12）End Sub当程序运行时，先单击单选按钮option3,然后单击命令按钮commandl,则文 本框textl的变化效果是（C）（单）A.字体设置为宋体B.字体设置为黑体C.字体大小设置为8号D.字体大小设置为12号3 .在窗体上建立一个名称为Commandl的命令按钮，一个名称为Textl的文本 框，以及四个单选按钮：第一个名称为。ptionl用来设置文本框的字体为宋体。第二个名称为option2用来设置文本框的字体为黑体，第三个名称为 option3用来设置文本框的字体大小为8
38、号，第四个名称为option4用来设置文本 框的字体大小为12号。程序如下：（程序运行刚开始时，四个单选按钮都没有选中）Private Sub Command1_ClickTextl. FontName = lif （Optionl. Value,宋体，黑体）Textl. FontSize = lif （0ption3. Value, 8, 12）End Sub当程序运行时，先单击单选按钮optionl,然后单击命令按钮commandl,则文 本框textl的变化效果是（A）（单）A.字体设置为宋体B.字体设置为黑体C.字体大小设置为8号D.字体大小设置为12号4 .在窗体上建立一个名称为Co
39、mmandl的命令按钮，一个名称为Textl的文本 框，以及四个单选按钮：第一个名称为。ptionl用来设置文本框的字体为宋体。第二个名称为option2用来设置文本框的字体为黑体，第三个名称为 option3用来设置文本框的字体大小为8号，第四个名称为option4用来设置文本 框的字体大小为12号。程序如下：（程序运行刚开始时，四个单选按钮都没有选中）Private Sub Command1_ClickTextl. FontName = lif （Optionl. Value, 宋体，黑体）Textl. FontSize = lif（0ption3. Value, 8, 12）End Su
40、b当程序运行时，先单击单选按钮option4,然后单击命令按钮command 1,则文 本框textl的变化效果是（D）（单）A.字体设置为宋体B.字体设置为黑体C.字体大小设置为8号D.字体大小设置为12号5 .在窗体中建立了一个名称为IstBooks的, 列表框，一个名称为txtltem的文 本框，四个名称分别为 cmdAdd、cmdDelete、cmdModify、cmdModify_Ok 的命令按 钮。如下程序：Sub FormLoadIstBooks. Additem 计算机文化基础IstBooks. Additem VB 程序设计教程Next zNext yNext xEnd Su
41、b6 .随机产生10个100200之间的数，求它们的最大值程序如下:Private Sub Command1_ClickMax = 100For i = 1 To 10x = Int(Rnd * 101 + 100)Print x;If x Max Then Next iPrintPrint 最大值二；MaxEnd Sub在此程序中，其中【】处应该填写的是(C)(单)A. Max = 100IstBooks. Additem 操作系统End SubSub cmdAddClickIstBooks. Addltem txtltemtxtitem = End Sub对该程序说法不正确的是(D)(单)
42、A.窗体启动时，在列表框中有三个列表项目，依次为：计算机文化基础、VB 程序设计教程、操作系统B.单击cmdAdd命令按钮后，把文本框中的信息添加到列表框中C.在列表框中添加列表项目的方法为additem方法D.以上说法都不正确6 .在窗体中建立了一个名称为LSTB00KS的列表框，一个名称为txtltem的文 本框，四个名称分别为 cmdAdd、cmdDelete、cmdModify、cmdModify_Ok 的命令按 钮。如下程序的功能是将修改后的项目送回列表框，替换原项目，实现修改：Sub cmdModify OkClick二 txtltemLSTBOOKS. List Lstbooks. Istindextxtltem =End Sub7 .对以下程序说法不正确的是(C)(单)Private Sub Combol_LostFocusflag = FalseFor i = 0 To Combo1. ListCount - 1If Combol. List (i) = Combol. Text Thenflag = TrueExit ForEnd IfNext iIf Not flag ThenCombol. Addltem Com