1、VB 笔试模拟试卷 287及答案与解析 1 在窗体上画 个命令按钮和 个文本框，名称分别为 Command1和 Text1，然后编写如下程序： Private Sub Command1_Click() a=InputBox(“请输入日期(1 31)“) t=“旅游景点： “按传地址的方式传递时 ,实参和形参指向的内容被改变。 42 【正确答案】 “Welc。 0me to Beijing!” Current X=x Print 【试题解析】 该题中主要考查了赋值语句与显示语句。赋值语句是根据图示给出的信息，填写字符串，然后，用 Ptint命令，使字符串显示在窗体上。赋值语句Sample!$=“
2、Welcome to Beijing!”，输出语句为： Print Sample$。 43 【正确答案】 变体或 Variant 【试题解析】 Array 返回一个包含数组的 Variant。 语法 Array(arglist) 所需的 arglist参数是一个用逗号隔 开的值表，这些值用于给 Variant所包含的数组的各元素赋值。如果不提供参数，则创建一个长度为 0的数组。 44 【正确答案】 下拉式列表框 【试题解析】 下拉式列表框：这种样式仅允许从下拉式列表中选择。 (缺省值 )下拉式组合框：包括一个下拉式列表和一个文本框。可以从列表选择或在文本框中输入。 简单组合框：包括一个文本框和
3、一个不能下拉的列表。可以从列表中选择或在文本框中输入。简单组合框的大小包括编辑和列表部分。按缺省规定，简单组合框的大小调整在没有任何列表显示的状态。增加 Height属性值可显示列表 的更多部分。 45 【正确答案】 until c=0或 while c 0,99-a,n=n+1 【试题解析】 由求最大公约数的算法可知，当余数 c为零时， a为 a和 b 的最大公约数。因条件给定： “a+ b=99”，所以 “b=99-a”。 n 为累计数。 46 【正确答案】 1 3 4 47 【正确答案】 9 【试题解析】 返回参数的整数部分，其类型和参数相同。 语法 Int(number) 必要的 nu
4、mber参数是 Double或任何有效的数值表达式。如果 number包含Null，则返回 Null。 48 【正确答案】 PaintStart=False 【试题解析】 上述过程定义了一个布尔型变量 PaintStart，当按下鼠标左键 (触发MouseDown 事件 )时，由题意按下鼠标键表示能画图，所以该变量的值为 True，而松开鼠标左键 (触发 MouseUp 事件 )时，该变量为 False；如果变量 PaintStart为True，则移动鼠标 (触发 MouseMove事件 )，将在窗体上绘出一个点；除鼠标事件外，上述程序还含有一个 Load 事件过程和一个 DblClick 事
5、件过程 ，其中 Load事件过程用来设置画点的大小和颜色， DblClick事件过程用来清除所画的图形，函数 Pset是画点语句，用它可以在 (x， y)处画一个点。注意：窗体事件、方法 49 【正确答案】 Interval 【试题解析】 Interval 属性用来设置计时器事件之间的间隔，以毫秒为单位，取值范围为 0 65535，因此其最大时间间隔不能超过 65秒。 60000毫秒为 1分钟，如果将 Interval 属性设置为 1000，则表明每秒钟发生一个计时器事件。如果希望每秒产生 n个事件，则属性 Interval 的值 为 1000/n。 50 【正确答案】 DialogTitle 【试题解析】 在通用对话框框中， DialogTitle用来表示通用对话框的标题，故12空应填 DialogTitle。
