VB考试题库十五套05

Ｆｏｒ ｉ ＝ １ Ｔｏ ｋ ： Ｐｒｉｎｔ ＃１，ｋ； ： Ｎｅｘｔ ｉ Ｐｒｉｎｔ ＃１， Ｎｅｘｔ ｋ Ｃｌｏｓｅ ＃１ Ｅｎｄ Ｓｕｂ （１） 请在左边文本框当中写出正确的答案。 Ａ、 １１１１１ ２２２２ ３３３ ４４ ５ Ｂ、１ ２ ３ ４ ５ Ｃ、 ５５５５５
ｈｔｔｐ：／／１９２．１６８．１５０．６３／ｗｅｂｔｅｓｔ／Ｈｏｍｅ／５０．６３／ｗｅｂｔｅｓｔ／Ｈｏｍｅ／Ｉｎｄｅｘ
２０１３－５－２０
Ｄ、１．２３４Ｅ２ 错误 参考答案： Ｃ ６、下列选项中，属于ＶＢ程序设计的特点是＿＿＿＿＿＿。
Ａ、面向过程、事件驱动 Ｂ、面向对象、顺序驱动 Ｃ、面向过程、顺序驱动 Ｄ、面向对象、事件驱动 错误 参考答案： Ｄ ７、执行语句 Ｗｒｉｔｅ ＃１， １２３； －３４．５６， ＂ｈｅｙ＂； Ｄａｔｅ 后，相应文件内被写入 ＿＿＿＿＿＿。 Ａ、１２３，－３４．５６，ｈｅｙ，２００１－０８－０３ Ｂ、＂１２３＂，＂－３４．５６＂，＂ｈｅｙ＂，＂２００１－０８－０３＂ Ｃ、１２３，－３４．５６，＂ｈｅｙ＂，＃２００１－０８－０３＃ Ｄ、１２３ －３４．５６ ｈｅｙ ２００１－０８－０３ 错误 参考答案： Ｃ ８、下列＿＿＿＿＿＿是用来画圆、圆弧及椭圆的。 Ａ、Ｃｉｒｃｌｅ方法 Ｂ、Ｐｓｅｔ方法 Ｃ、Ｌｉｎｅ方法 Ｄ、Ｐｏｉｎｔ属性 错误 参考答案： Ａ ９、 文本框控件的Ａｌｉｇｎｍｅｎｔ属性决定＿＿＿＿＿＿。 Ａ、是否显示多行文本
（１）
请在左边文本框当中输入正确答案。
错误 参考答案： Ｔｉｍｅｒ１．ｅｎａｂｌｅｄ＝ｔｒｕｅ
（２）
请在左边文本框当中输入正确答案。
错误 参考答案： ｘ＼６０ （３）
请在左边文本框当中输入正确答案。
错误 参考答案： ｘ ｍｏｄ ６０
（４）
请在左边文本框当中输入正确答案。
错误 参考答案： ｘ＝ｘ＋１ 或者 ｘ＝１＋ｘ
２、块Ｉｆ结构中的Ｅｎｄ ｉｆ可以缺省。 对 错
错误 参考答案： 错
３、调用一个过程时，实际参数和形式参数的类型必须一致。 对 错
错误 参考答案： 对
４、由于Ｓｉｎｇｌｅ型变量的取值范围比Ｌｏｎｇ型变量大，所以Ｓｉｎｇｌｅ型变量开销内存也比Ｌｏｎｇ型多。 对 错
错误 参考答案： 错
５、语句Ｃｏｎｓｔ Ａ＝１００是将Ａ声明为一个常量。 对 错
Ｃｌｓ ｘ＝０ －－－－１－－－－ Ｅｎｄ Ｓｕｂ Ｐｒｉｖａｔｅ Ｓｕｂ Ｃｏｍｍａｎｄ２＿Ｃｌｉｃｋ（） Ｄｉｍ ｈ Ａｓ Ｉｎｔｅｇｅｒ， ｍ Ａｓ Ｉｎｔｅｇｅｒ， ｓ Ａｓ Ｉｎｔｅｇｅｒ Ｔｉｍｅｒ１．Ｅｎａｂｌｅｄ ＝ Ｆａｌｓｅ ｈ ＝ －－－－２－－－－ ｍ ＝ －－－－３－－－－
Ｂ、Ｃｉｒｃｌｅ（１０００，１０００），，４００，０，３．１４１５９２６／２
Ｃ、Ｃｉｒｃｌｅ（１０００，１０００），４００，，０，３．１４１５９２６／２
Ｄ、Ｃｉｒｃｌｅ（１０００，１０００），４００，，０，９０
错误 参考答案： Ｃ
三、程序填空题
１、【程序说明】 本程序利用１个定时器、１个文本框和２个命令按钮制作一个动态表。各控件名称取缺省值，控件Ｃｏｍｍａｎｄ１、
ｘ ＝ １００ ＊ Ｃｏｓ（ｉ） ｙ ＝ １００ ＊ Ｓｉｎ（ｉ） Ｐｉｃｔｕｒｅ１．Ｌｉｎｅ （０， ０）－（ｘ， ｙ）， ＲＧＢ（Ｉｎｔ（Ｒｎｄ ＊ ２５６）， Ｉｎｔ（Ｒｎｄ ＊ ２５６）， Ｉｎｔ（Ｒｎｄ ＊ ２５６）） Ｎｅｘｔ ｉ Ｅｎｄ Ｓｕｂ
（１） 请在左边文本框当中写出正确的答案。
（３）
请在左边文本框当中输入正确答案。
错误 参考答案： Ｐｒｉｎｔ ａ（ｉ， ｊ）；
四、程序阅读题
１、写出程序运行时单击窗体后，在图片框上出现的结果。 Ｐｒｉｖａｔｅ Ｓｕｂ Ｆｏｒｍ＿Ｌｏａｄ（）
Ｐｉｃｔｕｒｅ１．Ｗｉｄｔｈ ＝ Ｐｉｃｔｕｒｅ１．Ｈｅｉｇｈｔ Ｅｎｄ Ｓｕｂ Ｐｒｉｖａｔｅ Ｓｕｂ Ｆｏｒｍ＿Ｃｌｉｃｋ（） Ｄｉｍ ｉ Ａｓ Ｓｉｎｇｌｅ， ｘ Ａｓ Ｓｉｎｇｌｅ， ｙ Ａｓ Ｓｉｎｇｌｅ Ｐｉｃｔｕｒｅ１．Ｓｃａｌｅ （－１００， １００）－（１００， －１００） Ｆｏｒ ｉ ＝ ０ Ｔｏ ２ ＊ ３．１４１５９２６ Ｓｔｅｐ ０．０００１
错误 参考答案： 对
６、利用窗体布局窗口，可以布置应用程序运行时各窗体的位置。 对
ｈｔｔｐ：／／１９２．１６８．１５０．６３／ｗｅｂｔｅｓｔ／Ｈｏｍｅ／Ｉｎｄｅｘ
２０１３－５－２０
错 错误 参考答案： 对
７、在程序运行中，目录列表框将以树形展开方式显示某个盘或目录内的各个子目录名，并用是否为打开的文件
Ｎｅｘｔ ｊ Ｆｏｒｍ１．Ｐｒｉｎｔ Ｎｅｘｔ ｉ Ｆｏｒ ｉ ＝ ２ Ｔｏ ６ Ｆｏｒ ｊ ＝ １ Ｔｏ －－－－－ １ －－－－－
－－－－－－ ２ －－－－－ Ｎｅｘｔ ｊ Ｎｅｘｔ ｉ Ｆｏｒｍ１．Ｐｒｉｎｔ ＂转置后数据＂ Ｆｏｒ ｉ ＝ １ Ｔｏ ６ Ｆｏｒ ｊ ＝ １ Ｔｏ ６
－－－－－ ３ －－－－－ Ｎｅｘｔ ｊ Ｆｏｒｍ１．Ｐｒｉｎｔ Ｎｅｘｔ ｉ Ｅｎｄ Ｓｕｂ Ｐｕｂｌｉｃ Ｓｕｂ Ｓｗａｐ（ａ Ａｓ Ｉｎｔｅｇｅｒ， ｂ Ａｓ Ｉｎｔｅｇｅｒ） Ｄｉｍ ｔｅｍｐ Ａｓ Ｉｎｔｅｇｅｒ ｔｅｍｐ ＝ ａ ａ＝ｂ ｂ ＝ ｔｅｍｐ Ｅｎｄ Ｓｕｂ
Test Service Solution
准考证号：12X2A0101VBP 交卷姓名：练帮习助001
IP：192.168.102.1
ＶＢ程序设计上机考试
注意：在 阅卷 前请先 保存 。
一、判断题
１、 移动框架时框架内控件也跟随移动，因此框架内控件的Ｌｅｆｔ和Ｔｏｐ属性值也随之改变。 对 错
错误 参考答案： 错
２、下面合法的变量名是＿＿＿＿＿＿。 Ａ、Ｅｎｄ Ｂ、ｐｒｉｖａｔｅ Ｃ、ＡＢＣ＿１ Ｄ、４Ａ
错误 参考答案： Ｃ ３、由 Ｆｏｒ ｉ＝１ Ｔｏ ９ Ｓｔｅｐ －３ 决定的循环结构被执行＿＿＿＿＿＿次。
Ａ、４ Ｂ、５ Ｃ、６ Ｄ、０ 错误 参考答案： Ｄ ４、在窗体Ｆｏｒｍ１的ＬＯＡＤ事件过程中有语句：Ｆｏｒｍ１．Ｐｒｉｎｔ ＂Ｖｉｓｕａｌ Ｂａｓｉｃ＂，但运行时窗体并未显示打印文字 ＿＿＿＿＿＿属性，才能使窗体启动有输出结果 。 Ａ、Ａｕｔｏｓｉｚｅ Ｂ、Ｅｎａｂｌｅｄ Ｃ、Ａｕｔｏｒｅｄｒａｗ Ｄ、Ｖｉｓｉｂｌｅ 错误 参考答案： Ｃ ５、下面哪一项不可以赋值给数值型变量？ Ａ、１２３．４ Ｂ、＂１２３．４＂ Ｃ、１．２３４Ｆ２
错误 参考答案： 错
二、单选题
１、 将命令按钮Ｃｏｍｍａｎｄ１设置为窗体的取消按钮，可修改该控件的＿＿＿＿＿＿属性。 Ａ、Ｅｎａｂｌｅｄ Ｂ、Ｖａｌｕｅ Ｃ、Ｄｅｆａｕｌｔ Ｄ、Ｃａｎｃｅｌ
错误 参考答案： Ｄ
ｈｔｔｐ：／／１９２．１６８．１５０．６３／ｗｅｂｔｅｓｔ／Ｈｏｍｅ／Ｉｎｄｅｘ
２０１３－５－２０
（２）
请在左边文本框当中输入正确答案。
错误 参考答案： Ｐｉｃｔｕｒｅ１．ＦｏｒｅＣｏｌｏｒ
（３）
请在左边文本框当中输入正确答案。
错误 参考答案： Ｓｅｌｅｃｔ Ｃａｓｅ Ｉｎｄｅｘ
３、【程序说明】 以下程序执行后将产生一个６ ６的转置矩阵，将二维数组中所有行和对应列的元素进行交换。 Ｐｒｉｖａｔｅ Ｓｕｂ Ｆｏｒｍ＿Ｃｌｉｃｋ（）
（１）
请在左边文本框当中写出正确的答案。
题
Ａ、折叠
型
Ｂ、展开
导
Ｃ、退出
ｈｔｔｐ：／／１９２．１６８．１５０．６３／ｗｅｂｔｅｓｔ／Ｈｏｍｅ／Ｉｎｄｅｘ
２０１３－５－２０
Ｐｉｃｔｕｒｅ１．Ｐｒｉｎｔ ＂黑桃被选中＂ Ｅｎｄ Ｓｅｌｅｃｔ Ｅｎｄ Ｓｕｂ
（１）
请在左边文本框当中输入正确答案。
错误 参考答案： Ｉｍａｇｅ２．Ｐｉｃｔｕｒｅ ＝Ｉｍａｇｅ１（Ｉｎｄｅｘ）．Ｐｉｃｔｕｒｅ
ｈｔｔｐ：／／１９２．１６８．１５０．６３／ｗｅｂｔｅｓｔ／Ｈｏｍｅ／Ｉｎｄｅｘ
２０１３－５－２０
Ｂ、鼠标移至控件时，所显示的提示
Ｃ、显示文本的对齐方式
Ｄ、文本框的显示内容
错误 参考答案： ｃ
１０、描述以（１０００，１０００）为圆心、以４００为半径画１／４圆弧的语句，以下正确的是＿＿＿＿＿＿。
Ａ、Ｃｉｒｃｌｅ（１０００，１０００），４００，０，３．１４１５９２６／２
结束 。运行时，单击 开始 按钮后表开始每分钟计一次时，并在文本框上显示总分钟数；单击 结 上显示出运行的时间（折算成小时、分钟，不计算秒数）。
Ｄｉｍ ｘ ａｓ ｌｏｎｇ Ｐｒｉｖａｔｅ Ｓｕｂ Ｆｏｒｍ＿Ｌｏａｄ（）
Ｔｉｍｅｒ１．Ｉｎｔｅｒｖａｌ ＝ ６００００： Ｔｉｍｅｒ１．Ｅｎａｂｌｅｄ ＝ Ｆａｌｓｅ Ｅｎｄ Ｓｕｂ Ｐｒｉｖａｔｅ Ｓｕｂ Ｃｏｍｍａｎｄ１＿Ｃｌｉｃｋ（）
Ｐｒｉｎｔ ＂运行了＂ ＋ Ｓｔｒ（ｈ） ＋ ＂小时＂ ＋ Ｓｔｒ（ｍ） ＋ ＂分＂ Ｅｎｄ Ｓｕｂ Ｐｒｉｖａｔｅ Ｓｕｂ Ｔｉｍｅｒ１＿Ｔｉｍｅｒ（）
ｈｔｔｐ：／／１９２．１６８．１５０．６３／ｗｅｂｔｅｓｔ／Ｈｏｍｅ／Ｉｎｄｅｘ
２０１３－５－２０
－－－－４－－－－ Ｔｅｘｔ１．ｔｅｘｔ ＝ ｘ Ｅｎｄ Ｓｕｂ
２、【程序说明】 程序运行时界面如下图，红桃、梅花、方块、黑桃的图形文件在界面设计时已经在属性窗口中设置好，而且使用的是 序运行时，单击Ｉｍａｇｅ１时，Ｉｍａｇｅ２显示相应的图片，同时在Ｐｉｃｔｕｒｅ１中用蓝色显示哪个图案被选中的文字信息
Ｐｒｉｖａｔｅ Ｓｕｂ Ｉｍａｇｅ１＿Ｃｌｉｃｋ（Ｉｎｄｅｘ Ａｓ Ｉｎｔｅｇｅｒ） －－－－１－－－－ Ｐｉｃｔｕｒｅ１．ＦｏｎｔＳｉｚｅ ＝ ２０ －－－－２－－－－ ＝ ｖｂＢｌｕｅ Ｐｉｃｔｕｒｅ１．Ｃｌｓ －－－－３－－－－ Ｃａｓｅ ０ Ｐｉｃｔｕｒｅ１．Ｐｒｉｎｔ ＂红桃被选中＂ Ｃａｓｅ １ Ｐｉｃｔｕｒｅ１．Ｐｒｉｎｔ ＂草花被选中＂ Ｃａｓｅ ２ Ｐｉｃｔｕｒｅ１．Ｐｒｉｎｔ ＂方片被选中＂ Ｃａｓｅ ３