书签 分享 收藏 举报 版权申诉 / 49
上传文档赚钱

类型C语言资料:vb复习题.doc

  • 上传人(卖家):罗嗣辉
  • 文档编号:2102666
  • 上传时间:2022-02-18
  • 格式:DOC
  • 页数:49
  • 大小:296KB
  • 【下载声明】
    1. 本站全部试题类文档,若标题没写含答案,则无答案;标题注明含答案的文档,主观题也可能无答案。请谨慎下单,一旦售出,不予退换。
    2. 本站全部PPT文档均不含视频和音频,PPT中出现的音频或视频标识(或文字)仅表示流程,实际无音频或视频文件。请谨慎下单,一旦售出,不予退换。
    3. 本页资料《C语言资料:vb复习题.doc》由用户(罗嗣辉)主动上传,其收益全归该用户。163文库仅提供信息存储空间,仅对该用户上传内容的表现方式做保护处理,对上传内容本身不做任何修改或编辑。 若此文所含内容侵犯了您的版权或隐私,请立即通知163文库(点击联系客服),我们立即给予删除!
    4. 请根据预览情况,自愿下载本文。本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
    5. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007及以上版本和PDF阅读器,压缩文件请下载最新的WinRAR软件解压。
    配套讲稿:

    如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。

    特殊限制:

    部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。

    关 键  词:
    语言 资料 vb 复习题
    资源描述:

    1、1第一卷 客观题第一题:是非题(共第一题:是非题(共 1010 分,每项分,每项 1 1 分)分)1. ActiveX 部件是可以重复使用的编程代码和数据。AA.对B.错2. 窗体的 Enabled 属性设为 False 时,窗体题的按钮、文本框控件就不会对用户的操作做出反应。AA.对B.错3. 每一个控件实质上都是一个微型程序。AA.对B.错4. 在程序运行过程中,变量中的值不会改变,而常量中的值会被改变。BA.对B.错5. 用 Dim 语句声明变量时,VB 系统不仅为变量分配相应数据类型的内在空间,而且还为变量赋所需的初值。BA.对B.错6. 定义菜单项时,可以不设置分隔线的菜单项控件名称

    2、。BA.对B.错7. 在事件驱动的应用程序中,代码是按照预定的路径执行的。BA.对B.错8. 函数调用时,实际参数与形式参数在数量必须完全一致。AA.对B.错9. 每个菜单项都是一个控件,与其他控件一样也有自己的属性和事件。AA.对B.错10. 通用过程可以放在标准模块中,也可以放在窗体模块中。AA.对B.错11. 当窗体上有多个控件时,一般只有一个控件是当前控件,对控件的所有操作都是针对当前控件进行的。A.对B.错12. 窗体上的控件同样可以借助于剪贴板进行剪切、复制和粘贴。A.对B.错13. 在 VB 系统中,没有用 Dim 语句声明的变量不能使用,因为它没有数据类型。A.对B.错14.

    3、普通窗体与子窗体建立的方法是相同的,不同之处是子窗体的 MDIChild 属性设置为 False,而普通窗体的 MDIChild 属性设置为True。A.对B.错15. 除了 Click 事件之外,菜单项还能响应其他的事件。A.对B.错16. 数组作为过程参数时,使用的是地址传送方式。A.对B.错17. 标签控件即可以用来显示用户不能编辑和修改的文本,也可以用来编辑和修改文本。BA.对B.错18. Timer 是时钟控件的唯一事件。AA.对B.错19. 菜单项的快捷键不能任意设置。AA.对B.错20. VB 中的“消息”是指由一个应用程序传递到另一个应用程序的信息包。AA.对B.错21. 菜单

    4、选项“Enabled”属性与“Visible”属性是相同的。BA.对B.错22. VB6.0 只能运行在 Windows 2000 下,不能运行在 Windows 98 下。B2A.对B.错23. 用户控件和系统控件都可以加载到工具箱上,并且永久保留。BA.对B.错24. 在 VB 中,可通过函数 Shell 调用 DOS 或 Windows 下的可执行程序。AA.对B.错25. 窗体的 Moveabel 属性设为 False 时,不能改变窗体的大小,只能移动窗体。BA.对B.错26. 是一个字符串,而不是一个字符串。BA.对B.错27. 单选项和复选框能够响应 Click 事件,但通常不需要

    5、编写事件过程。AA.对B.错28. GotFocus 事件通常用来在焦点移离时进行验证和确认。BA.对B.错29. 函数过程和子过程的区别是子过程结束将返回值过程值,函数过程结束不必返回函数值。BA.对B.错30.ActiveX 技术是一种共享程序数据和功能的技术。AA.对B.错31. 在 Not、Or、And 三个运算符中,运算符 And 的的优先级最高。BA.对B.错32. 变量名是以字母或汉字开头,由字母、汉字、数字或下划线组成,长度可以任意的字符序列。B33. Style 为 0 时组合框称为简单组合框。 BA.对B.错34. 表达式 “ab” & 34 的结果是 “ab34” 。AA

    6、.对B.错第二题、第二题、 单选题(共单选题(共 45 分,每项分,每项 1.5 分)分)12. InputBox 函数的返回值的类型为_B_。A.数值B.字符串C.逻辑值D.日期值13. 要想在过程调用后返回两个结果,下面的过程定义语句合法的是_A_。A.Sub Proc1(ByVal n,Byval m)B.Sub Proc1(ByVal n, m)C.Sub Proc1(n,Byval m)D.Sub Proc1(n, m)14. 下面关于打印对话框属性的说法错误的是_C_。A.Copies 属性指定打印的份数。B.HDC 属性指定分配给打印机的句柄,用来识别对象的设备环境。C.From

    7、Page 属性指定要打印文档的页范围。使用该属性时必须把 Flags 属性设置为 1。D.Max 和 Min 属性用来显示 FromPage 和 ToPage 的范围,其中 Min 指定允许的起始页码,Max 指定允许的最后页码。16. Print #1,STR1$中的 Print 是_A_。A.顺序文件的写语句B.在窗体上显示的方法C.子程序名D.打印命令17. 使用 Public x 声明一个全局的变量时,该语句应放在_D_。A.过程中B.窗体模块的通用声明段C.标准模块的通用声明段D.窗体模块或标准模块的通用声明段19. 记录长度最大可取的值是_A_字节。A.32767B.32768C.

    8、65535D.6553620. 下面四项中,_A_是 VB 中的数值变量。3A.ABCB.E+2C.TrueD.1.35E-221. 将数据项“China”添加到列表框(List)中成为第一项应使用A语句。A.List1.AddItem”China”,0B.List1.AddItem”China”,lC.List1.AddItem 0,”China”D.List1.AddItem 1,”China”22. 下列不能打开菜单编辑器的操作是_D_。A.按 Ctrl+EB.单击工具栏中的“菜单编辑器”按钮C.执行“工具”菜单中的“菜单编辑器”命令D.按 Shift + Alt + M23. 文本框(

    9、Text1)中有选定的文本,执行 Text1.SelText=”Hello”的结果是A。A.“Hello”将替换掉原来选定的文本B.“Hello”将插入到原来选定的文本之前C.Text1.SelLength 为 5D.文本框中只有“Hello”24. 语句 Print Format(HELLO, yz 的正确 VB 逻辑表达式是_D_。A.xy And yzC.xy And zD.xy And yz31. 在下列说法中,正确的是D。A.通过适当的设置,可以在程序运行期间,让时钟控件显示在窗体上B.在列表框中不能进行多项选择C.在列表框中能够将项目按字母顺序从大到小排列D.框架也有 Click

    10、和 DblClick 事件33. 按文件的组织方式分为_A_。A.顺序文件和随机文件B.文本文件和二进制文件C.程序文件和数据文件D.只读文件和读写文件34. 以下_C_不能作为 VB 中的变量名。A.Abx45B.P1234C.89TasFFD.xy35. 已编译的控件部件的扩展名是A。A. .OCXB. .VBPC. .EXED. .CTL36. 为了建立一个随机文件,其中每一条记录有多个不同数据类型的数据项组成,应使用_A_。A.自定义类型B.数组C.字符串类型D.变体类型37. 表达式 Int(23.4)+Round(-35.5)的计算结果为_C_。A.-11B.-12.1C.-13D

    11、.-12.538. 引用列表框(List1)最后一个数据项应使用B。A. List1.List(List1.ListCount)B.List1.List(List1.ListCount-1)C.List1.List(ListCount)D.List1.List(ListCount-l)411. 文本框没有_D_属性。A.EnabledB.VisibleC.BackColorD.Caption12. 语句 Dim a(3,-3 to 0,3 to 6)声明的数组 a 有_C_元素。A.12B.27C.64D.8013. 下面关于随机文件的描述,不正确的是_B_。A.每条记录的长度必须相同B.一个

    12、文件中记录号不必惟一C.文件的组织结构比顺序文件复杂D.可通过编程对文件中的某条记录方便地修改14. 如果要使一个窗体从屏幕上和内存中完全消失,所要使用的语句是_D_。A.HideB.ShowC.LoadD.Unload15. 在 VB 中,常量 987654,987654#的数据类型是_D_。A.整型B.实型C.长整型D.双精度16. 在下面选项中,不能完成对顺序文件的读操作的是_D_。A.LineInput#语句B.Input#语句C.Input()函数D.Get#语句18. 不论何种控件,共同具有的是_B_属性。A.TextB.NameC.BackColorD.Caption19. 为了

    13、把一个记录型变量的内容写入文件中指定的位置,所使用的语句的格式为_D_。A.Get 文件号,记录号,变量名B.Get 文件号,变量名,记录号C.Put 文件号,变量名,记录号D.Put 文件号,记录号,变量名20. 常量 2.7856E-6 的类型是_B_。A.整型B.实型C.字符型D.双精度21. 假如列表框(List1)有 4 个数据项,那么把数据项“China”添加到列表框的最后,应使用D语句。A. List1.AddItem3,”China”B.List1.AddItem”China”,List1.ListCount-1C.List1.AddItem”China”,3D.List1.A

    14、ddItem”China”,List1.ListCount23. 如果文本框的 Enabled 属性设为 False,则A。A.文本框的文本将变成灰色,并且此时用户不能将光标置于文本框上B.文本框的文本将变成灰色,用户仍然能将光标置于文本框上,但是不能改变文本框中的内容C.文本框的文本将变成灰色,用户仍然能改变文本框中的内容D.文本框的文本正常显示,用户能将光标置于文本框上,但是不能改变文本框中的内容24. 下列控件中,没有 Caption 属性的是B。A.框架B.列表框C.复选框D.单选按钮25. 下列逻辑表达式中,其值为真的是_A_。A.bABCB.THATTHEC.9HD.Aa26. 窗

    15、体从加载到显示,依次引发的事件有。DA.Load、Initialize、ActivateB.Initialize、Activate、loadC.Load、Activate、InitializeD.Initialize、Load、Activate27. 如果每 0.5 秒产生一个计时器事件,那么 Interval 属性值应设为C。A.5B.50C.500D.0.528. 表达式 34 And 7=5 的返回值为_D_。5A.0B.TrueC.-1D.False31. 为了防止用户随意将光标置于控件之上,应该进行设置。DA.将控件的 TabIndex 属性设置为 0B.将控件的 TabStop 属

    16、性设置为 TrueC.将控件的 TabStop 属性设置为 FalseD.将控件的将控件的 Enabled 属性设置为属性设置为 False33. 文件号最大可取的值为_。B BA.255B.511C.512D.25634. 在 Visual Basic 中,语句 Print 39 的输出结果为_。DA.0B.1C.-1D.False39. 改变驱动器列表框的 Drive 属性值将激活_事件。AA.ChangeB.ScollC.KeyDownD.KeyUp11. 在 VB 中,变量的默认类型是_C_。A.IntegerB.DoubleC.VariantD.Currency12. 在顺序文件中_

    17、D_。A.文件中按每条记录的记录号从小到大排序B.文件中按每条记录的长度从小到大排序C.文件中按记录的某关键数据项的从小到大的顺序D.记录是按写入的先后顺序存放的,读出也是按写入的先后顺序读出13. 利用菜单编辑器设计菜单时,如果要在菜单中加入一个分隔符,菜单分隔符的标题必须设置为_B_。A.+B.-C.*D./14. 在 Visual Basic 中,最简单的数据类型包括_A_。A.整型、实型、布尔型、字符型B.整型、实型、字符型C.整型、实型、逻辑型D.实型、逻辑型、字符型15. 使用驱动器列表框的_B_属性可以返回或设置磁盘驱动器的名称。A.ChDriveB.DriveC.ListD.L

    18、istIndex16. 在随机文件中_C_。A.文件中的内容是通过随机数产生的B.文件中的记录号是通过随机数产生的C.可对文件中的记录根据记录号随机地读写D.文件的每条记录的长度是随机的18. 下列控件中,不属于文件系统控件的是_D_。A.驱动器列表框B.文件列表框 C.目录列表框D.图象列表框20. 如果列表框(List1)中没有被选定的项目,则执行 List1.RemoveItemList1.ListIndex 语句的结果是D。A.移去第一项B.移去最后一项C.移去最后加入列表的一项D.以上都不对21. 下列关于通用对话的描述错误的是_C_。A.CommandDialog1.ShowFon

    19、t 显示字体对话框。B.在打开或另存为对话框中,用户选择的文件名和路径可以经 FileName 属性返回。C.在打开或另存为对话框中,用户选择的文件名和路径可以经 FileTitle 属性返回。D.利用通用对话框可显示和制作帮助对话框。23. 当一个窗体被卸载时,最后引发的一个事件是。DA.DeactivateB.QueryUnloadC.UnloadD.terminate24. 复选框的 Value 属性为 1 时,表示B。A.复选框未被选中B.复选框被选中C.复选框内有灰色的勾D.复选框操作方式“错误”625. 下列四个字符串进行比较,最小的是_A_。A.9977B.B123 C.BASE

    20、D.DATA26. 计时器的时间间隔是A。A.以毫秒计B.以分计C.以秒计D.以小时计27. 组合框的 Style 属性决定组合框的类型和行为,它的值为 2 时,其显示形式和功能是C。A.下拉列表框,并允许用户输入不属于列表框中的选项B.简单组合框,并允许用户输入不属于列表框中的选项C.下拉列表框,不允许用户输入不属于列表框中的选项D.简单组合框,不允许用户输入不属于列表框中的选项30. 下面关于顺序文件的描述,正确的是_C_。A.每条记录的长度必须相同B.可通过编程对文件中的某条记录方便地修改C.数据以 ASCII 码形式存放在文件中,所有可通过文本编辑软件显示D.文件的组织结构复杂31.

    21、文件列表框中用于设置或返回所选文件的文件名的属性是_D_。A.FilePathB.FileC.PathD.FileName32. 为了建立一个随机文件,其中每一条记录有多个不同数据类型的数据项组成,应使用_A_。A.自定义类型B.数组C.字符串类型D.变体类型34. 当一个工程含有多个窗体时,其中的启动窗体是_D_。A.启动 VB 时建立的窗体B.第一个添加的窗体C.最后一个添加的窗体D.在“工程属性”对话框中指定的窗体。35. 使用目录列表框的_C_属性可以返回或设置当前工作目录的完整路径。A.DriveB.ListIndexC.PathD.Dir36. Integer 类型的数据由_B_字

    22、节组成。A.1B.2C.3D.437. 如果列表框(List1)中只有一个项目被用户选定,则执行 DebugPrintList1Selected(List1.ListIndex)语句的结果是A。A.在 Debug 窗口输出被选定的项目的索引值B.在 Debug 窗口输出 TrueC.在窗体上输出被选定的项目的索引值D.在窗体上输出 True38. 通过代码在运行时设置属性的语法格式为_B_。A.对象名属性 .新值B.对象名.属性新值C.对象名.新值=属性 .新值D.对象名.属性=属性 .新值39. 要使用 FSO 对象模型,必须通过【工程】菜单中的_D_命令将 FSO 对象模型引入到当前工程中

    23、。A.部件B.工程属性 C.添加属性D.引用40. 全局变量必须在_A_中定义A.标准模块B.任意模块C.窗体模块D.类模块第二题、 单选题(共 45 分,每项 1.5 分)11. 常量 2.7856E-6 的类型是_B_。A.整型B.实型C.字符型D.双精度12. 下列说法错误的是_C_。A.在多重窗体中一定要有一个窗体为启动窗体。B.在多重窗体中,如果没有指定启动窗体,则默认首先设计的窗体为启动窗体。C.启动窗体能在运行程序时自动显示出来,其它窗体有些也能自动显示出来。7D.启动窗体通过“工程”菜单中的“工程属性”命令来指定。13. Sub 和 Function 的最大差别在于_A_。A.

    24、Function 有返回值,而 Sub 没有B.Function 需要输入参数,而 Sub 不用C.Sub 可以用 Call 语句调用,而 Function 不行D.两者并无不同14. 在下列表达式中,非法的是_C_。A.a=b+cB.ab+cC.abcD.a4And 7=5 的返回值为_D_。A.0B.TrueC.-1D.False25. 如果列表框(List1)中没有被选定的项目,则执行 List1.RemoveItemList1.ListIndex 语句的结果是D。A.移去第一项B.移去最后一项C.移去最后加入列表的一项D.以上都不对26. 在下列说法中,正确的是D。A.通过适当的设置,

    25、可以在程序运行期间,让时钟控件显示在窗体上B.在列表框中不能进行多项选择C.在列表框中能够将项目按字母顺序从人到小排列D.框架也有 Click 和 DblClick 事件28. 表达式 Int(23.4)+Round(-35.5)的计算结果为_。A.-11B.-12.1C.-13D.-12.529. 当一个工程含有多个窗体时,其中的启动窗体是_。A.启动 VB 时建立的窗体B.第一个添加的窗体8C.最后一个添加的窗体 D.在“工程属性”对话框中指定的窗体。30. 下面关于随机文件的描述,不正确的是_B_。A.每条记录的长度必须相同B.一个文件中记录号不必惟一C.文件的组织结构比顺序文件复杂D.

    26、可通过编程对文件中的某条记录方便地修改31. 如果要使一个窗体从屏幕上和内存中完全消失,所要使用的语句是_D_。A.HideB.ShowC.LoadD.Unload32. 用语句 Dim a(-3 to 5) As Integer 定义的数组的元素个数是_C_。A.7B.8C.9D.1033. 当一个窗体被卸载时,最后引发的一个事件是。 CA.DeactivateB.QueryUnloadC.UnloadD.terminate34. 下面关于顺序文件的描述,正确的是_C_。A.每条记录的长度必须相同B.可通过编程对文件中的某条记录方便地修改C.数据以 ASCII 码形式存放在文件中,所有可通过

    27、文本编辑软件显示D.文件的组织结构复杂35. 以下_C_不能作为 VB 中的变量名。A.Abx45B.P1234C.89TasFFD.xy36. VB 工程中的每一个窗体都是独立的_B_。A.类B.对象C.数据库D.方法37. 按文件的组织方式分为_A_。A.顺序文件和随机文件B.文本文件和二进制文件C.程序文件和数据文件D.只读文件和读写文件38. 为了防止用户随意将光标置于控件之上,应该进行C设置。A.将控件的 TabIndex 属性设置为 0B.将控件的 TabStop 属性设置为 TrueC.将控件的 TabStop 属性设置为 FalseD.将控件的 Enabled 属性设置为 Fa

    28、lse39. VB 中的工具栏可以从_C_菜单上的“工具栏”命令中移进或移出。A.工具B.编辑C.视图D.调试40. 将数据项“China”添加到列表框(List)中成为第一项应使用A语句。A.List1.AddItem”China”,0B.List1.AddItem”China”,lC.List1.AddItem 0,”China”D.List1.AddItem 1,”China”第二题、 单选题(共 45 分,每项 1.5 分)11. 下列不能打开菜单编辑器的操作是_D_。A.按 Ctrl+EB.单击工具栏中的“菜单编辑器”按钮C.执行“工具”菜单中的“菜单编辑器”命令D.按 Shift

    29、+Alt + M12. 已编译的控件部件的扩展名是A。A. .OCXB. .VBPC. .EXED. .CTL13. 表达式 a+b=c 是_D_。A.赋值表达式 B.字符表达式 C.算术表达式D.关系表达式14. 利用菜单编辑器设计菜单时,如果要在菜单中加入一个分隔符,菜单分隔符的标题必须设置为_B_。A.+B.-C.*D./915. 文本框没有_D_属性。A.EnabledB.VisibleC.BackColorD.Caption16. 在 VB 中要将一个窗体装载到同存中进行预处理,但不显示,应该使用语句_C_。A.Form.ShowB.Form.LoadC.Form.HideD.For

    30、m.Unload17. 下列四个字符串进行比较,最小的是_A_。A.9977B.B123C.BASED.DATA18. 语句 Print Format(HELLO, 9 的输出结果为_ D_。A.0B.1C.-1D.False26. 表达式 Int(23.4)+Round(-35.5)的计算结果为_C_。A.-11B.-12.1C.-13D.-12.527. 为减少语句的使用,将一个窗体加载到内存中并显示出来,所使用的语句或方法是_C_。A.LoadB.UnloadC.ShowD.Hide28. 使用 Public x 声明一个全局的变量时,该语句应放在_C_。A.过程中B.窗体模块的通用声明

    31、段C.标准模块的通用声明段D.窗体模块或标准模块的通用声明段29. 下列说法错误的是_B_。A.在同一模块不同过程中的变量可以同名。B.不同模块中定义的全局变量不可以同名。C.引用另一模块中的全局变量时,必须在变量名前加模块名。D.同一模块中不同级的变量可以同名。30. 用语句 Dim a(-3 to 5)As Integer 定义的数组的元素个数是_C_。A.7B.8C.9D.1031. 如果文本框的 Enabled 属性设为 False,则A。A.文本框的文本将变成灰色,并且此时用户不能将光标置于文本框上10B.文本框的文本将变成灰色,用户仍然能将光标置于文本框上,但是不能改变文本框中的内

    32、容C.文本框的文本将变成灰色,用户仍然能改变文本框中的内容D.文本框的文本正常显示,用户能将光标置于文本框上,但是不能改变文本框中的内容32. 在 Visual Basic 中,用于获得字符串 S 最左边 4 个字符的函数是_A_。A.Left(S,4)B.Left(1,4)C.LeftStr(S)D.LeftStr(S,4)33. VB 工程中的每一个窗体都是独立的_B_。A.类B.对象C.数据库D.方法34. 下面关于顺序文件的描述,正确的是_C_。A.每条记录的长度必须相同B.可通过编程对文件中的某条记录方便地修改C.数据以 ASCII 码形式存放在文件中,所有可通过文本编辑软件显示D.

    33、文件的组织结构复杂35. 文本框(Text1)中有选定的文本,执行 Text1.SelText=”Hello”的结果是A。A.“Hello”将替换掉原来选定的文本B.“Hello”将插入到原来选定的文本之前C.Text1.SelLength 为 5D.文本框中只有“Hello”36. VB 中的工具栏可以从_C_菜单上的“工具栏”命令中移进或移出。A.工具B.编辑C.视图D.调试37. 用来设置粗体字的属性是。CA.Font1ItalicB.FontNameC.FontBoldD.FontSize38. 在 VB 的集成环境中创建 VB 应用程序时,除了工具箱窗口、窗体设计窗口、属性窗口外,必

    34、不可少的窗口是_C_。A.窗体布局窗口B.立即窗口C.代码窗口D.监视窗口39. Sub 和 Function 的最大差别在于_A_。A.Function 有返回值,而 Sub 没有B.Function 需要输入参数,而 Sub 不用C.Sub 可以用 Call 语句调用,而 Function 不行D.两者并无不同40. 要判断“命令按钮”是否被鼠标单击,应在“命令按钮”的事件中判断。CA.ChangB.KeyDownC.ClickD.KeyPress第三题、 简单程序(共 15 分,每项 1.5 分)41. 下列程序段的运行结果。APrivate Sub Form_Click()Dim Ms

    35、gHideMsg=”选择确定按钮”MsgBox MsgShowEnd SubA.隐藏窗体,按确定按钮使窗体重现B.隐藏窗体C.显示窗体,按确定按钮使窗体隐藏D.显示窗体42. 执行下面程序段后,变量 c$的值为_D_。a$= Visual Basic Programmingb$= Quick11c$=b$ & Ucase(Mid$(a$,7,6) & Right$(a$,12)A.Visual BASIC ProgrammingB.Quick Basic ProgrammingC.QUICK Basic ProgrammingD.Quick BASIC Programming43. 运行下面程

    36、序后,在窗体中显示的是_D_。Private Sub Form_Click()a$=*: b$=$For k=1To 3x$=String$(Len(a$)+k,b$)Print x$;Next kPrintEnd SubA.、* * *B.*$*$*$C.1*$2*$3*$D.、$44. 执行下面程序段后,变量 a 的值为_C_。For I=1 To 3For j=1 To IFor k=j To 3a=a+1Next kNext jNext IA.3B.9C.14D.2145. 写出如下程序运行结果。DFunction f(m As Integer) As Integerb = 1Stat

    37、ic c As Integerb = b + 1c = c + 1f = m * b * cEnd FunctionPrivate Sub Command1_Click()Dim a As Integera = 2sum=0For I = 1 To 3sum=sum+ f(a)Next Iprint sumEnd SubA.12B.16C.20D.2446. 以下程序的输出结果是_B_。Private Sub Command1_Click()a=123412b$=Str$(a)c=Len(Trim(b)print c;LenB(b)End SubA.3 8B.4 10C.5 10D.4 847

    38、. 执行下面程序段后,变量 x 的值为_A_。x=5For I=1 To 20 step 2x=x+I5Next IA.21B.22C.23D.2448. 以下程序的输出结果是_D_。Private Sub Command1_Click()a=100Dos=s+aa=a+1Loop Until a100print aEnd SubA.100B.120C.201D.10149. 以下程序的循环次数是_A_。Private Sub Command1_Click()For j=8 To 35 Step 3Print j;Next jEnd SubA.10B.9C.27D.2850. 下列程序运行后,

    39、其结果为_A_。Private Sub Form_Click ( )Filename=“c:testfile.txt”Open filename For Output As #1Print #1,“ABCD 我是一个学生”Close #1Open filename For Input As #1MsgBox Input(8,1)Close #1End SubA.在通用对话框中显示“ABCD 我是一个”B.在通用对话框中显示“ABCD 我是”C.在窗体中显示“ABCD 我是一个”D.在窗体中显示“ABCD 我是”第二卷主观题填空题(共 30 分,每项 2 分。注意:填两个空的题的时候,要按照从上

    40、至下,从左至右的顺序添入答题卡! )131. 下列程序运行后,能求出 20 个数中的最大值。请填上适当的内容,将程序补充完整。Private Sub Form_Activate()RandomizeDim I As Integer,ssl As Integer,Dim tt As Integerssl = Int(Rnd * 51 + 50)For I = 1 To 19tt = Rnd * 51 + 50_IF ssltt then ssl=tt_Next IPrintPrint sslEnd Sub2. 在 C 盘根目录下建立一个名为 Student.dat 的顺序文件。要求用 Input

    41、Box 函数输入 10 名学生的学号(StuNo) 、姓名(StuName)和性别(StuSex) 。Private Sub Form_Load ( )Open “C:Student.dat” For Output As #1For I=1 to 10StuNo=InputBox(“请输入学号”)StuName= InputBox (“请输入姓名”)StuSex= InputBox (“请输入性别”)_write #1, _ ,StuNo,Stuname,StuSexNext IClose #1End Sub3. 编写一个求最大公约数的函数,并调用该函数,程序如下:Function gcd(B

    42、yVal a As Integer,ByVal b As Integer) As IntegerDim re as integerDo While b0re=a mod ba=bb=reLoopgcd=aEnd FunctionSub Command1_Click()Dim x As Integer,y As Integer, z As integerX=96Y=64_z=gcd(x,y)_Print “结果=”;zEnd Sub4. 请用正确的内容填空。下面程序的作用是利用随机函数产生 10 个(1200)之间的随机整数,打印其中 7 的整数倍的数并求其和。Private Sub Form_

    43、Click()For I=1 To 1014x=Int(Rnd*200+1)If_(x mod 7)=0_ Thenk1=k1+xPrint xEnd IfNext IPrintPrint k1=;k1End Sub5. 下面程序运行时,内层循环的循环总次数是_6_。For m = 1 To 3For n = 0 To m - 1Next nNext m6. 在窗体中添加两个命令按钮,其名称分别为 Command1 和 Command2,窗体加载时要求 Command1 不可用,Command2 可用;单击 Command2 后,Command1 可用。请将下列程序补充完整。Private S

    44、ub Command2_Click()_command1.enabled=true_End SubPrivate Sub Form_Load()_command1.enabled=false_command2.enabled=true_End Sub7. 函数 odd 用于判断一个数是否是奇数。当单击命令按钮时,产生1,9之间的随机数,调用 odd 过程,判断该数是否为奇数。如果是则显示“奇数” ,否则显示“偶数” 。Private Sub odd(n As Integer)Print n;If n/2n2 ThenPrint 奇数ElsePrint _“偶数”_End IfEnd SubPr

    45、ivate Sub Command1_Click()Dim x As IntegerRandomizex =_int(rnd*9+1)_odd xEnd Sub8. 下列程序允许用户按 Enter 键将一个组合框(cboComputer)中没有的项目添加到组合框中。Sub cboComputer_KeyPress(KeyAscii As Integer)Dim flag As BooleanIf KeyAscii=13 Then15flag=FalseFor I=0 To cboComputer.ListCount-1IfThenFlag=TrueExit ForEnd IfNext iIf

    46、Not flag ThenElseMsgBox(”组合框中已有该项目! ”)End IfEnd IfEnd Sub9. 请用正确的内容填空。下面程序的功能是通过 InputBox 对话框接受一个二进制数,并把它转换成一个十进制数,结果显示在窗体中。Private Sub Form_Click()b=InputBox(请输入一个二进制数)m=Len(b)For j= _1 to m_dec=dec*2+ _val(Mid(b,j,1)Next jPrint b;转换后的十进制数为:;decEnd Sub10. 以下程序的功能是:把当前目录下的顺序文件 smtext1.txt 的内容读入内存,并在

    47、文本框 Text1 中显示出来。请填空。Private Sub Command1_Click()Dim inData As StringText1.Text = Open .smtext1.txt_for Input_As #1Do While _not eof(1)_Input #1, inDataText1.Text = Text1.Text & inDataLoopEnd Sub第一卷 客观题第三题、 简单程序(共 15 分,每项 1.5 分)41. 执行下面程序段后,变量 c$的值为_。Da$= Visual Basic Programmingb$= Quickc$=b$ & Ucas

    48、e(Mid$(a$,7,6) & Right$(a$,12)A.Visual BASIC ProgrammingB.Quick Basic ProgrammingC.QUICK Basic ProgrammingD.Quick BASIC Programming42. 运行下面程序后,在弹出的消息窗口中显示的是_。DPrivate Sub Form_Click()16score=Int(Rnd)+5Select Case scoreCase 5a$=GoodCase 4a$=OkCase 3a$=PassCase Elsea$=BadEnd SelectMsgBox a$End SubA.Ba

    49、dB.PassC.OkD.Good43. 执行下面程序段后,变量 a 的值为_。CFor I=1 To 3For j=1 To IFor k=j To 3a=a+1Next kNext jNext IA.3B.9C.14D.2144. 写出下列程序的运行结果,并说明函数的功能。APublic Function f(m%, n%)Do While m nDo While m nm = m nLoopDo While n mn = n mLoopLoopf = mEnd FunctionPrivate Sub Command1_Click()print f(24, 18)End SubA.6B.8

    50、C.10D.1245. 以下程序的输出结果是_。BPrivate Sub Command1_Click()a=1234b$=Str$(a)c=Len(Trim(b)print c;LenB(b)End Sub17A.3 8B.4 10C.5 10D.4 846. 执行下面程序段后,变量 x 的值为_。Ax=5For I=1 To 20 step 2x=x+I5Next IA.21B.22C.23D.2447. 以下程序的循环次数是_。Private Sub Command1_Click()For j=8 To 35 Step 3Print j;Next jEnd SubA.10B.9C.27D

    展开阅读全文
    提示  163文库所有资源均是用户自行上传分享,仅供网友学习交流,未经上传用户书面授权,请勿作他用。
    关于本文
    本文标题:C语言资料:vb复习题.doc
    链接地址:https://www.163wenku.com/p-2102666.html

    Copyright@ 2017-2037 Www.163WenKu.Com  网站版权所有  |  资源地图   
    IPC备案号:蜀ICP备2021032737号  | 川公网安备 51099002000191号


    侵权投诉QQ:3464097650  资料上传QQ:3464097650
       


    【声明】本站为“文档C2C交易模式”,即用户上传的文档直接卖给(下载)用户,本站只是网络空间服务平台,本站所有原创文档下载所得归上传人所有,如您发现上传作品侵犯了您的版权,请立刻联系我们并提供证据,我们将在3个工作日内予以改正。

    163文库