VB试卷

合集下载

VB试题

VB试题

1,若要设置文本框中所显示的文本颜色,使用的属性是( ).A,BackColor B,FillColor C,ForeColor D,BackStyle2,以下选项中,不是Visual Basic控件的是( ).A,单选框B,定时器C,窗体D,命令按钮3,双击窗体中的对象后,Visual Basic将显示的窗口是( ).A,项目(工程)窗口B,工具箱C,代码窗口D,属性窗口4,命令按钮能响应的事件是( ).A,DblClick B,Click C,Load D,Scroll5,若要将某命令按钮设置为默认命令按钮.则应设置为True的属性是( ).A,V alue B,Cancel C,Default D,Enabled6,Visual Basic程序设计的完整的步骤是( ).A.,可视性程序设计B,代码程序设计C,可视性程序设计和代码程序设计D,界面设计7,在Visual Basic环境下,当写一个新的Visual Basic程序时,所做的第一件事是( ).A,编写代码B,新建一个工程C,打开属性窗口D,进入VB环境8,窗体能响应的事件是( ).A,ActiveFrom B,Drive C,Load D,Change9,若要求从文本框中输入密码时在文本框中只显示*号,则应当在此文本框的属性窗口中设置( ).A,Text属性值为* B,Caption属性值为*C,password属性值为空D,Passwordchar属性值为*10,Visual Basic是一种面向对象的程序设计语言,构成对象的三要素是( ).A,属性,事件,方法B,控件,属性,事件C,窗体,控件,过程D,窗体,控件,模块11,只能用来显示字符信息的控件是( ).A,文本框B,标签框C,图片框D,图像框12,能够改变复选框中背景颜色的属性是( ).A,V alue B,Fontcolor C,Backcolor D,Font13,获得系统日期的函数是( ).A.,data$ B,time$ C,date$ D,gettime$14,在设计一个记事本时,必须要使用的控件是( ).A.,滚动条B,图片框C,文本框D,单选框15,以下选项中,不属于单选按钮属性的是( ).A,Enabled B,Caption C,Name D,Min16,若要设置定时器控件的定时时间,需设置的属性是( ).A,Interval B,Value C,Enabled D,Text17,Visual Basic为命令按钮提供的Cancle属性是( ).A,用来指定命令按钮是否为窗体的"取消"按钮B,用来指定命令按钮的功能是停止一个程序的运行C,用来指定命令按钮的功能是关闭一个运行程序D,用来指定命令按钮的功能是中断一个程序的运行18,Visual Basic规定窗体文件的扩展名是( ).A,.for B, .frm C, .vbp D,.bas19,下列叙述不正确的是( ).A ,一个目标程序所需的所有文件的集合称为工程B,VB的工程文件的扩展名为.vbpC,工程文件中可包括窗体文件,标准模块文件,类模块文件,资源文件等D,工程文件中除了窗体文件是可选的外,其它文件都是必须的20,下列关于添加"控件"的方法正确的是( ).A,单击控件图档,将指针移到窗体上,双击鼠标B,双击工具箱中的控体,即在窗体中央出现该控件C,单击工具箱中的控件,将指针移到窗体上,再单击D,用鼠标左键拖动工具箱中的某控件到窗体中适当位置21,下列关于事件的叙述中不正确的是( ).A,事件是系统预先为对象定义的能被对象识别的动作B,事件可分为用户事件与系统事件两类C,VB为每个对象设置好各种事件,并定义好事件过程的过程名,但过程代码必须由用户自行编写D, VB中所有对象的默认事件都是Click22,下列属于合法的VB变量的是( ).A,for B,3w C, num_1 D, name23,要求改变窗体的标题时,应当在属性窗口中改变的属性是( ).A, Caption B,Name C,Text D,Label24,.如果要求设置定时器时间间隔为1秒钟,那么它的Interval属性值应该等于( ).A,1000 B,100 C,10 D,125,能够将文本框控件隐藏起来的属性是( ).A,Clear B,Visible C,Hide D,New26. Visual Basic提供的选择框(CheckBox)可具有功能是( ).A,多重选择B,单一选择C,选择多次D,选择一次27,要在窗体上显示图片,需设置窗体的( )属性.A,Caption B,Icon C,Picture D,ControlBox28,在设计阶段,双击窗体Form1的空白处,打开代码窗口,显示( )事件过程模板.A,Form_Click B,Form_Load C,Form1_Click D,Form1_Load30,将文本框的( )属性设置为True 时,文本框可以输入或显示多行文本,且会在输入的内容超出文本框的宽度时自动换行.A,MultiLine B,ScrollBars C,Text D,Enabled31,如果将文本框的( )属性设置为True,则运行时不能对文本框中的内容进行编辑.A,Locked B,MultiLine C,TabStop D,Visible32,下列程序段的执行结果为( ).X=2Print X+1;X+1A,3, 3 B,X+1,X+1 C,3, 4 D,2+1,2+133,决定控件上文字的字体,字形,大小,效果的属性是( ).A,Text B,Caption C,Name D,Font34,下列程序段的执行结果为( ).X=2Y=1IF X*Y0A,True B,False C,-1 D,135,下列程序段的执行结果为( ).X=Int(Rnd+4)Select Case XCase 5Print"优秀"Case 4Print"良好"Case 3Print"及格"Case ElsePrint"不及格"Ene SelectA,优秀B,良好C,及格D,不及格36,下列程序段的执行结果为( ).X=6FOR K=1 TO Step --2X=X+KNEXT KPrint K ; XA,-1 ,6 B,-1 ,16 C,1 ,6 D,11, 3137,为了添加ComboBox控件中的项目,需要使用( )方法.A,ADD B,Remove C,AddItem D,RemoveItem38,定时器的Interval属性以( )为单位指定Timer事件之间的时间间隔.A,分B,秒C,毫秒D,微秒42,通过设置Shape控件的( )属性可以绘制多种形状的图形.A,Shape B,BorderStyle C,FillStyle D,Style43,当使用Line方法画直线后,当前坐标为( ).A,容器对象的原点B,直线的起点C,直线的终点D,容器对象的中心44,在Visual Basic 中按文件的访问方式不同,可以将文件分为( ).A,顺序文件,随机文件和二进制文件B,文本文件和数据文件C,数据文件和可执行文件D,ASCII文件和二进制文件45,使用驱动器列表框的( )属性可以返回或设置磁盘驱动器的名称.A,ChDrive B,Drive C,List D,ListIndex46,使用目录列表框的( )属性可以返回或设置当前工作目录的完整路径(包括驱动器盘符). A,Drive B,Path C,Dir D,ListIndex47,文件列表框中用于设置或返回所选文件的文件名的属性是( ).A,File B,FilePath C,Path D ,FileName二,填空题:1, 设置对象属性中的Caption是指_____________,Name是指_____________,Font是指_________.2, Private Sub Timer1_Timer()Label2.Caption=TimeEnd Sub语句中的Private意指:_________________ Timer1意指________,Timer()意指________,Label2.Caption=Time意指______________________.3,VB中常见的基本数据类型:______________,______________,______________,__________,______________,________ ______等.4,VB变量声明格式:[Public|Private|Dim|Static] 变量名As 类型,用Public意指__________________,用Private声明变量,意指_________________,用Dim|Static声明变量,意指________________________.5,一个工程可以包括多种类型的文件,其中,扩展名为.VBP的文件表示________文件;扩展名为.FRM的文件表示___________文件;扩展名为.BAS的文件表示__________文件.6,下面的程序用于求三个数中最大数.Private Sub Command1_Click()a=Val(inputbox("请输入第一个数:"))b=V al(inputbox("请输入第二个数:"))c=Val(inputbox("请输入第三个数:"))Max=aMin=aIF b>_______Then Max=bIF b<_______ Then Min=bIF _______ Then Max=cIF_______ Then Min=cPrint"最大数为:";MaxPrint"最小数为:";MinEne Sub7,下面是一个体操评分程序,20位评委,除去一个最高分和一个最低分,计算平均分(设满分为10分).Private Sub Command1_Click()Max=0 : Min=10For I=1 TO 20N=Val(InputBox("请输入分数:"))IF __________Then Max=NIF __________Then Min=NS=S+NNext IS=__________P=S/18Print"最高分:";MaxPrint"最低分:";MinPrint"最后得分:";PEND Sub一、单项选择题:(每小题1分,共100分)下列各题A)、B)、C)、D)四个选项中,只有一个选项是正确的,请将正确选项填在答题卡的相应位置上,答在试卷上不得分。

vb试卷答案

vb试卷答案

<一>界面设计1、以下有关对象属性的说法中正确的是D 。

A、对象所有的属性都罗列在属性窗口列表中B、不同对象不可能有同名属性C、不同对象的同名属性取值一定相同D、对象的某些属性即可在属性窗口设置,也可以通过属性代码设置或改变2、有程序代码:Text1.Text=”Visual Basic”其中的Text1、Text和”Visual Basic”分别代表C 。

A、对象、值、属性B、对象、方法、属性C、对象、属性、值D、属性、对象、值3、一个对象可以执行的动作与可被对象识别的动作分别称为B 。

A、事件,方法B、方法,事件C、属性,方法D、过程,事件4、Visual Basic是一种面向D 的程序设计语言。

A、过程B、用户C、方法D、对象5、一只白色的足球踢进球门,则白色、足球、踢、进球门是B 。

A、属性、对象、方法、事件B、属性、对象、事件、方法C、对象、属性、方法、事件D、对象、属性、事件、方法6、Visual Basic是用于开发B 环境下的应用程序的工具。

A、DOS B、Windows C、DOS和Windows D、UNIX7、一个可执行的Visual Basic中应用程序至少要包括一个C 。

A、标准模块B、类模块C、窗体模块D、辅助模块8、在Visual Basic最基本的对象是B ,它是应用程序的基石。

A、标签B、窗体C、文本框D、命令按钮9、如果要在两个菜单命令项之间加一条分隔线,可在标题文本框中键入A 。

A、- B、+ C、& D、#10、在使用菜单编辑器创建菜单时,可在菜单名称中某字母前插入B 符号,那么在运行程序时按Alt键和该字母键就可打开该命令菜单。

A、下划线B、&C、$D、@11、在窗体Form1的Click事件过程中有以下语句:Label1.Caption=”visual basic”若本语句执行前,标签控件的名称属性和Caption属性取缺省值,则标签控件的名称属性和Caption 属性在执行本语句前的取值分别为 C 。

VB期中考试试卷-及参考答案(B1卷)-

VB期中考试试卷-及参考答案(B1卷)-

2010~2011学年度第2学期期中考试试卷[B1]考试科目: 《Visual Basic程序设计》考试形式: 开卷-上机考答题时间: 120分钟班级学号姓名一、选择题(2分/题, 共20分)1.以下有关VB对象名称(Name)属性的叙述,正确的是_______。

A)对象的Name属性值可以为空B)窗体的Name属性用来标识和引用窗体C)可以在程序运行期间改变对象的Name属性值D)窗体的Name属性值是显示在标题栏中的字符串2.Visual Basic6.0集成环境的主窗口中不包括_______。

A)标题栏B)菜单栏C)状态栏D)工具栏3. 在开发VB应用程序时, 一个工程一般至少应含有_______。

A)标准模块文件和类模块文件B)工程文件和窗体文件C)工程文件和类模块文件D)工程文件和标准模块文件4. .为了使命令按钮(名称为Command1)右移200, 应使用的语句是_______。

A)Command1.Move -200B)Command1.Move 200C)Command1.Left= Command1.Left+200D)Command1.Left= Command1.Left-2005. 当程序运行时, 系统自动执行启动窗体的_______事件过程。

A)Click B)Load C)Unload D)GotFocus6. Visual Basic有多种类型的窗口, 若要在设计时看到窗体窗口, 以下操作不正确的是________。

A)打开“视图”菜单, 选择“对象窗口”B)双击VB窗口工作区的空白处C)单击“工程资源管理器”中的“查看对象”按钮D)双击“工程资源管理器”中对应的窗体名7. 下面关于属性和方法的描述中, 不正确的是________。

A)属性是对象的特征, 方法是对象的行为B)属性和方法都有值C)属性可以被赋值D)方法表示能执行的操作8. 下面关于标签和文本框的描述中, 正确的是________。

VB笔试模拟试卷123(题后含答案及解析)

VB笔试模拟试卷123(题后含答案及解析)

VB笔试模拟试卷123(题后含答案及解析) 题型有:1. 选择题 2. 填空题选择题(每小题2分,共70分)下列各题A、B、C、D四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上。

1.下列说法中错误的是( )。

A.在同一模块不同过程中的变量可以同名B.不同模块中定义的全局变量可以同名C.引用另一模块中的全局变量时,必须在变量名前加模块名D.同一模块中不同级的变量可以同名正确答案:D解析:变量可以分为3类:局部变量、模块变量、全局变量。

在同一模块不同过程中的变量叫做局部变量,其作用域是它所在的过程,所以不同过程中的局部变量可以同名;模块变量的作用范围是整个窗体或模块,引用其他模块中的模块变量时,必须加上模块名;当同一个模块内的不同过程使用相同的变量时,必须声明窗体层的变量,当然不能有重名。

2.下列数据结构中,属于非线性的是( )。

A.线性表B.队列C.树D.栈正确答案:C解析:线性结构,是指数据元素只有一个直接前件元素和直接后件元素。

线性表是线性结构。

栈和队列是指对插入和删除操作有特殊要求的线性表,树是非线性结构。

3.下列叙述中错误的是( )。

A.线性表是由n个元素组成的一个有限序列B.线性表是一种线性结构C.线性表的所有结点有且仅有一个前件和后件D.线性表可以是空表正确答案:C解析:线性表是一种线性结构,由n(n≥0)个元素组成,所以线性表可以是空表。

但是在线性表中,第一个结点没有前件,最后一个结点没有后件,其他结点有且只有一个前件和后件,所以C是错误的。

4.按照“先进先出”组织数据的数据结构是( )。

A.队列B.栈C.双向链表D.二叉树正确答案:A解析:队列是一种特殊的线性表,只允许在表的一端插入元素,在表的另一端删除元素,插入元素的一端叫“队尾”,删除元素的一端叫“队头”,先插入的元素先被删除,是按“先进先出”的原则组织数据的。

5.下列关于线性链表的描述中正确的是( )。

VB程序试卷

VB程序试卷

VB程序试卷试卷一1.将调试通过的工程经"文件"菜单的"生成.exe文件"编译成.exe后,将该可执行文件到其他机器上不能运行的主要原因是______B______。

A、该可执行文件有病毒B、运行的机器上无VB系统C、缺少.frm窗体文件D、以上原因都不对2.执行VB工程时第一次出现的窗体称启动窗体,关于该窗体的叙述不正确的是____C_。

A、若不对启动窗体进行设置,工程中的第一个窗体默认为启动窗体B、启动窗体和其他窗体一样可以隐藏和关闭C、启动窗体一般作为用户的界面,不可更改D、启动窗体可进行设置,设置方法是执行“工程”菜单中的“属性”3.用来设置粗体字的属性是_A____。

B___。

A、将其BackStyle属性设置为1,BorderStyle属性设置为1B、将其BackStyle属性设置为0,BorderStyle属性设置为1C、将其BackStyle属性设置为0,BorderStyle属性设置为0D、将其BackStyle 属性设置为1,BorderStyle属性设置为05.当一个CheckBox控件的Value属性为2时,表示该控件__C___。

A、未选中B、以被选中C、当前不可用D、未知6.设X=2.0,Y=8.0,Z=6.0,L=True,则下列VB表达式中值为True的是_______B_____。

A、Y+X>=Z+XANDNOTLB、NOT(Z+X>Y)ANDLC、NOTLOR(L=Y+X=Z)D、X+Z>YANDL7.在代码编辑器中,如果一条语句太长,无法在一行内写下(不包括注释),要折行书写,可以在行末使用续行字符_______B_________,表示下一行是当前行的继续。

A、直接回车B、一个空格加一个下划字符(_)C、一个下划字符(_)D、一个空格加一个连字符(-)8.在程序中将变量Inta、Bl、St、D分别定义为Integer类型、Boolean类型、String类型和Date类型,下列赋值语句中,正确的是___A___。

VB笔试模拟试卷96(题后含答案及解析)

VB笔试模拟试卷96(题后含答案及解析)

VB笔试模拟试卷96(题后含答案及解析)题型有:1. 选择题 2. 填空题选择题(每小题2分,共70分)下列各题A、B、C、D四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上。

1.循环链表的主要优点是A.不再需要头指针了B.从表中任一结点出发都能访问到整个链表C.在进行插入、删除运算时,能更好的保证链表不断开D.已知某个结点的位置后,能够容易的找到它的直接前件正确答案:B解析:循环链表就是将单向链表中最后一个结点的指针指向头结点,使整个链表构成一个环形,这样的结构使得从表中的任一结点出发都能访问到整个链表。

2.栈底至栈顶依次存放元素A、B、C、D,在第五个元素E入栈前,栈中元素可以出栈,则出栈序列可能是A.ABCEDB.DCBEAC.DBCEAD.CDABE正确答案:B解析:栈操作原则上“后进先出”,栈底至栈顶依次存放元素A、B、C、D,则表明这4个元素中D是最后进栈,B、C处于中间,A最早进栈。

所以出栈时一定是先出D,再出C,最后出A。

3.对长度为n的线性表进行顺序查找,在最坏情况下所需要的比较次数为A.long2nB.n/2C.nD.n+1正确答案:C解析:对于长度为n的有序线性表,在最坏情况下,二分查找只需要比较log2n次,而顺序查找需要比较n次。

4.在结构化程序设计思想提出之前,在程序设计中曾强调程序的效率。

与程序的效率相比,人们更重视程序的A.安全性B.一致性C.可理解性D.合理性正确答案:C解析:结构化程序设计方法设计出的程序具有明显的优点,、其一,程序易于理解、使用和维护;其二,提交了编程工作的效率,降低了软件开发成本。

其中,人们更重视前者。

5.模块独立性是软件模块化所提出的要求,衡量模块独立性的度量标准则是模块的A.抽象和信息隐蔽B.局部化和封装化C.内聚性和耦合性D.激活机制和控制方法正确答案:C解析:模块的独立程序是评价设计好坏的重要度量标准。

衡量软件的模块独立性使用耦合性和内聚性两个定性的度量标准。

vb考试试卷

vb考试试卷

vb考试试卷VB考试试卷一、选择题(每题2分,共20分)1. 在VB中,以下哪个是正确的变量声明方式?A. Dim aB. Dim a = 5C. Dim a As IntegerD. Dim a As String = "Hello"2. 下列哪个是VB中的循环结构?A. IfB. ForC. SubD. Function3. VB中的数组声明方式是:A. Dim numbers(1 To 10)B. Dim numbers As Integer(1 To 10)C. Dim numbers(10)D. Dim numbers As Array = New Integer(10)4. 在VB中,以下哪个是正确的条件语句?A. If x > 0 ThenB. If x > 0C. If x > 0 ElseD. If x > 0 End If5. VB中,以下哪个是正确的函数定义方式?A. Function Add(x, y) As IntegerB. Function Add(x, y) = x + yC. Function Add(x, y) = Return x + yD. Function Add(x, y) = x + y End Function...(此处省略其他选择题)二、填空题(每空2分,共20分)1. 在VB中,使用________关键字来声明常量。

2. VB中的________结构用于执行一系列动作,直到满足某个条件。

3. 要声明一个包含10个整数的数组,可以使用________。

4. 当需要在VB中调用另一个窗体时,可以使用________方法。

5. VB中的________属性用于设置控件的可见性。

...(此处省略其他填空题)三、简答题(每题10分,共20分)1. 简述VB中的事件驱动编程的概念及其重要性。

2. 解释VB中类和对象的区别,并给出一个使用类和对象的简单示例。

VB开发基础(试卷编号1111)

VB开发基础(试卷编号1111)

VB开发基础(试卷编号1111)1.[单选题]如果将布尔常量值TRUE赋值给一个整型变量,则整型变量的值为( )。

A)-B)TRUC)FALSE答案:B解析:2.[单选题]文本框没有_____属性.A)EnabledB)VisibleC)BackColorD)Caption答案:D解析:3.[单选题]有如下程序.Dim a As String,b As String a=12345h="abcde" For i=1 To 5 c=c+Left(a,i)+Right(b,i) Next i Print c 运行后输出的结果是().A)alb2c3d4e5B)1a2b3c4de5C)eld2c4b5eld2c3b4a5D)1e12del23cdel234bcdel2345abcde答案:D解析:4.[单选题]以下语句正确的是A)CommonDialogl.Filter=All Files |*.*| Pictures (*.Bmp) |*.BmpB)CommonDialogl.Filter="All Files" | "*.*" | "Pictures (*.Bmp) " | "*.Bmp"C)CommonDialogl.Filter="All Files| *.* | Pictures(*.Bmp)|*.Bmp"D)CommonDialogl.Filter={All Files| *.* | Pictures(*.Bmp)|*.Bmp|答案:C解析:5.[单选题]以下合法的变量名是____。

A)A%BB)Test1C)2costD)And6.[单选题]下面 语句声明的数组不是动态数组。

( )A)Dim X()B)Dim X(5)C)ReDim X(10)D)以上都不是答案:B解析:7.[单选题]下列变量命名正确的是().A)LenB)Test@qwC)6cost_1D)count2s答案:D解析:8.[单选题]下面的数组声明语句中,正确的是_____.A)Dim a[1,2] As IntegerB)Dim a(1,2) As IntegerC)Dim a[1] [2] As IntegerD)Dim a(1 to 0,2 to 0) As Integer答案:B解析:9.[单选题]函数Sgn( )的值是____。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

第二套试题说明:⒈请在答卷纸的指定位置处写明:班级、学号、姓名,否则将无法登记你的考试成绩,按缺考论;⒉前三大题的答案写在答卷纸的相应表格里,第四题的答案则填入相应空格中,否则作无效处理;⒊请保持答卷纸的整洁;本次考试要求闭卷、独立在120分钟内完成,本试题册不要拆开。

B表示错误)(共20分,每小题1 分)1.hello”。

2.VB坐标系的默认刻度是像素。

3.XXX.vbp文件是用来管理构成应用程序XXX的所有文件和对象的清单。

4.文本框中的文本不能自动换行的原因是MultiLine属性采用了默认值。

5.对话框控件在程序运行时是不可见的。

6.影像框和图片框一样,也可以作为其他控件的容器。

7.将命令按钮Command1设置为缺省的活动按钮可修改该控件的Enabled属性。

8.双击工具箱上的控件与选中工具箱上的控件后,在窗体上拖曳画出完全一样。

9.不论步长是正值或负值,当循环变量的值大于终值时,结束循环。

10.控件数组与普通控件一样,但可节省编程代码。

11.在图片框中添加的控件,其Top和Left属性值是相对图片框而言的,与窗体无关。

12.表示各控件对象的变量名的属性为Caption。

13.列表框和文本框一样均没有Caption属性,但都具有Text属性。

14.用KILL语句删除文件,只能删除与指定文件名完全匹配的一个文件。

15.Visual Basic的对象包括窗体、控件及其中可访问的实物。

16.菜单中的分隔条是一个特殊的菜单项,其标题以一个“ - ”号表示。

17.同一Form窗体中的控件可以相互重叠,其显示的上下层次的次序不可以调整。

18.单选钮控件和复选框控件都具有Value属性,它们的作用完全相同。

19. Data控件的RecordSouce属性,可以指定为数据库中的表或SQL语言的Select查询语句。

20. Circle方法画圆与用Shape形状控件画圆时,要控制画笔的大小时,前者用容器的DrawWidth设置,后者用形状控件的BorderWidth 属性设置。

1 分)1)。

A、25B、“5*5“C、出现错误提示D、5*52、DIM A(1 TO 20)as Integer所定义的数组有多少个元素()。

A、40B、1C、2D、203、由For=35 TO 0 Step 3 : Next k循环语句控制的循环次数是()。

A. 0B.12C.-11D.-104、一个对象可以执行的动作和可被对象识别的动作分别称为()。

A.事件、方法B.方法、事件C.属性、方法D.过程、事件5、单击滚动条两端的任一个滚动箭头,将触发该滚动条的()事件。

A、ScrollB、KeyDownC、ChangeD、DragOver6、下列()方法或函数可以调用外部的可执行文件。

A、ShowB、ShellC、InputD、Open7、由“For I=1 To 16 Step 3“决定的循环结构被执行()次。

A、4B、5C、6D、78、在Visual Basic的“文件”菜单项中,一般列出最近打开的文件个数有()个。

A、1B、2C、3D、49、Abs(-2.5)的值是( )A、 -3B、 -2C、 2.5D、 210、选中复选框控件时,Value属性的值为()。

A、TrueB、FalseC、0D、111、已知A、B、C中C最小,则判断A、B、C可否构成三角形三条边长的逻辑表达式是()。

A. A>=B And B>= C And C>0 B A+C>B And B+ C >A And C>0C (A+B>=C Or A-C<=C) And C>0D A+B>C And A-B> C And C>012、下列控件没有Change事件的是()。

A、盘驱动器列表框B、目录路径列表框C、文本框D、定时器13、一个菜单项是不是一个分隔条,由()属性决定。

A. Name(名称)B.CaptionC.EnabledD.Visible14、将CommonDialog通用对话框的类型设置为颜色(打开、另存为、字体、打印和帮助)对话框,可修改该控件的()属性。

A、ColorB、FilterC、filenameD、Action15、设定文件列表框中所显示的文件类型,应修改该控件的()属性。

A、PatternB、PathC、FileNameD、Name16、执行语句“Write#1,234;-34.56,”hello”;Date”后,相应的文件内被写入()。

A、234,-34.56, hello,2001-08-03B、”234”,”-34.56”, “hello”,”2001-08-03”C、234,-34.56, “hello”,#2001-08-03#D、234 -34.56 hello 2001-08-0317、下列()对象具有Clear方法。

A、图片框B、窗体C、复选框D、列表框18、每创建一个菜单,它的下面最多可以有()级子菜单。

A、1B、3C、5D、619、()对象不能作为控件的容器。

A. FormB.PictureBoxC.ShapeD.Frame20、表达式-2^2的值为()。

A、-4B、4C、-1D、1(共20 分,每小题5 分)1上的输出结果。

Private Sub Form_Click()Dim i As IntegerStatic s As Integeri = i + 2s = s + iForm1.Print "i="; i, "s="; sEnd Sub2、写出下列程序中Form1的显示结果。

Private Sub Form_Click()Form1.Clsw = 3For k = 2 To 6 Step 2Form1.Print "w="; w, "k="; kw = w + 1Next kForm1.Print "w="; w, "k="; kEnd Sub3、程序运行时单击Commandl后,分别写出文本框Textl.Text2和Text 3的Text的值。

Private Sub Command1_Click()n = 0: x = 1: y = 0Do While x < 20n = n + 1y = x + yx = x * (x + 1)LoopText1.Text = "n=" & Str(n)Text2.Text = "x=" & Str(x)Text3.Text = "y=" & Str(y)End Sub4、写出程序运行时单击窗体后,Forml上的输出结果。

Private Sub Form_Click()Dim a(2, 3) As IntegerFor I = 1 To 2For j = 1 To 3a(I, j) = 2 * I - jNext j, IFor h = 1 To 3For k = 1 To 2Form1.Print a(k, h),Next kPrintNext hEnd Sub分,每小格2分)1、程序说明:本程序用于求两个等长的十进制数字字符串的对应数值之和,结果也当作一个字符串,如:“7811801246101”+“5502450186932”=“13314251433033”在程序中rm%表示两位数字相加所产生的进位,因此它作为下一位的一个相加对象;a$和b$分别为被“相加”的两个字符串;l%为a$和b$的长度;c$为结果字符串。

Private Sub Form_Click()Dim a As String, b As String, c As StringDim pa As String, pb As String, ps As StringDim rm As Integer, l As Integer, i As Integera = "7811801246101"b = "5502450186932"c = "": rm = 0(1)For i = l To 1 Step -1pa = Mid$(a, i, 1)pb = Mid$(b, i, 1)pc = Str(Val(pa) + Val(pb) + (2) )If (3) Thenrm = 1Elserm = 0End Ifpc = Right$(Str$(pc), 1)c = (4)Next iIf rm = 1 Then c = (5)Print a; "+"; b; "="; cEnd Sub2、程序说明,在窗体上有两个命令按钮和一个文本框,名称分别为cmdstart(“开始”)、cmdend(“结束”)和Text1。

文本框中的字符个数不超过200个。

程序刚开始运行时,“结束”按钮成灰色,单击“开始”按钮后,将文本框中的字符按其ASCII码值由小到大自左到右重新组合,并在窗体输出重组后的字符串,同时使“结束”按钮能响应而“开始”按钮不能响应。

Private Sub Form_Load()Cmdend.Enabled=FalseEnd SubPrivate Sub Cmdstart_Click()Dim n as integer,I as integer,j as integer,p as integerStr1=Text1.Textn=Len(Str1)For I=1 to n …取出单个字符放入数组A中A(I)=Mid$(str1,I,1)Next IFor I=1 to n-1 ‘排序P=IFor j=1 to nIf a(p)>a(j) then (6)Next jIf (7) then t=a(I):a(I)=a(p):a(p)=tNext IFor I=1 to nPrint a(I);Next I(8)(9)End SubPrivate Sub Cmdend_Click()(10)End Sub五、编程题10分)1、设计一个调色板程序,如下图所示。

使用三个滚动条,红:Hscroll1,绿:Hscroll2,兰:Hscroll3,作为三种基本颜色的输入工具(输入值均为0~255,LargeChange为25)。

按“设置前景色”(Command1)按钮,则设置右上角标签控件(Label1)的前景色,按“设置背景色”(Command2)按钮,则设置右上角标签控件的背景色;标签中的文字通过下面的文本框(Text1)输入,要求按回车后即可将文本框中的文字显示在标签中。

相关文档
最新文档