VB程序设计习题及参考答案(42页).doc

  1. 1、本文档共42页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
VB程序设计习题及参考答案(42页).doc

练习题 习题一 2 一、判断题 2 二、选择题 2 习题二 3 三、程序设计题 5 习题三 5 一、选择题 5 二、程序阅读题(写出下列程序的运行结果) 6 三、程序填空题 7 四、程序设计题 8 习题四 8 一、选择题 8 二、程序阅读题(写出下列程序的运行结果) 9 三、程序填空题 10 四、程序设计题 11 习题五 11 一、选择题 11 二、程序阅读题(写出下列程序的运行结果) 12 三、程序填空题 12 四、程序设计题 14 习题六 14 一、选择题 14 二、程序填空题 16 三、程序设计题 17 习题七 18 一、选择题 18 二、程序填空题 19 三、程序设计题 19 习题八 20 一、判断题 20 二、单选题 20 三、填空题 22 四、程序填空 22 五、程序设计题 23 习题九 24 一、选择题: 24 二、填空题 25 三、程序阅读题 25 三、编程题: 26 习题十 26 一、选择题 26 习题参考答案 30 习题一 30 习题二 30 习题三 31 习题四 33 习题五 35 习题六 36 习题七 39 习题八 39 习题九 40 习题十 42 习题一 一、判断题 1.Visual Basic是以结构化的Basic语言为基础、以事件驱动作为运行机制的可视化程序设计语言。√ 2.面向对象的程序设计是一种以对象为基础,由事件驱动对象的编程技术。√ 3.事件是由Visual Basic预先定义的对象能够识别的动作。√ 4.新建工程时系统会自动将窗体标题设置为Form1。√ 5.控件的属性值不可以在程序运行时动态地修改。× 6.决定对象是否可见的属性为Visible属性,决定对象可用性的属性是Enabled属性。√ 7.保存Visual Basic文件时,若一个工程包含多个窗体或模块,则系统先保存工程文件,再分别保存窗体或模块文件。√ 8.单击“启动”菜单项将窗体装入内存时,一定触发窗体的Load事件。√ 9.“事件过程”是用来完成事件发生后所要执行的程序代码。√ 10.在打开某窗体时,初始化该窗体中的各控件,应选用Load事件。√ 二、选择题 1.工程文件的扩展名为 。 A、.frx B、.bas C、.vbp D、.frm 2.下列不属于对象的基本特征是 。 A、属性 B、方法 C、事件 D、函数 3.在设计模式双击窗体将显示的窗口是 。 A、工程窗口 B、工具箱 C、代码窗口 D、属性窗口 4.VB中运行程序的快捷键是 。 A、F2 B、F5 C、Alt+F3 D、F8 5.改变控件在窗体中的上下位置应修改该控件的 属性。 A、Top B、Left C、Width D、Right 6.窗体模块的文件扩展名是 。 A、.exe B、.bas C、.frx D、frm 7.设置窗体的字体用 属性。 A、FontName B、FontSize C、FontBold D、FontItalic 8.设置窗体的字号用 属性。 A、FontName B、FontSize C、FontBold D、FontItalic 9.下列选项中不属于事件的是 。 A、Dblclick B、Load C、Show D、KeyUp 10.VB编制的程序保存在磁盘上,至少会产生何种文件 。 A、.doc与.txt B、.com与.exe. C、.bat与.frm D、.vbp与.frm 三、程序设计题 1.新建一个工程,单击窗体时,在窗体上显示“欢迎使用Visual Basic程序”。生成可执行文件,保存到D盘根目录下。 2.建立一个工程,界面如图1-28所示。它由一个窗体、两个文本框和两个命令按钮组成。单击“拷贝”按钮,可以将第一个文本框中显示的内容复制到第二个文本框中;单击“退出”按钮退出应用程序。 代码设计: Private Sub Command1_Click() Text2.Text = Text1.Text End Sub Private Sub Command2_Click() End End Sub

文档评论(0)

haocen + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档