2005年9月计算机等级考试二级VB考前密卷[1]14

文章作者 100test 发表时间 2007:03:10 17:51:54
来源 100Test.Com百考试题网


(11)在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Option Base l
Private Sub Colilinand1_Click()
Dim a(10)As Integer
FOr i=l TO 10
a(i)=i
Next
call Swap( 【13】 )
FOr I=l T0 10
Print a(i);
Next
End Sub
Sub Swap(b()As Integer)
n= 【14】
For i=l TO n/2
t=b(i)
b(i)=b(n)
b(n)=t
【15】
Next
End Sub
上述程序的功能是,通过调用过程Swap,调换数组中数值的存放位置,即a(1)与a(10)的值互换,a(2)与a(9)的值互换,……,a(5)与a(6)的值互换。请填空。
答案:【13】a
【14】10。
【15】n=n-1
评析:Option Base语句,在模块级别中使用,用来声明数组下标的起始值(缺省值为0)。子过程利用语句加以调用,使子过程成为一个独立的语句,其形式为:子过程名[参数列表]或Call子过程名[参数列表]。题目要求将数组中的10个数逆序存放,也就是首尾两两交换,循环次数应为5次,在交换了a(1)与a(10),应将n的值减1,再将a(2)与a(9)进行交换,以此类推。

(35)在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Labe11和 Command1,然后编写如下两个事件过程:
Private Sub Commandl_Click()
strText=InputBox("请输入")
Text1.Text=strText
End Sub
Private Sub Text1_Change()
Labe11.Caption=Right(Trim(Text1.Text,),3)
End Sub
程序运行后,如果在对话框中输入abcdef,则在标签中显示的内容是_________。
A)空  B)abcdef  C)abc  D)def
答案:D
评析:Trim函数返回Variant(String)类型,其中包含指定字符串的拷贝,但不包含前导和尾随空白。Right(字符串,n):返回"字符串"的后n个字符。这里的"字符串"可以是字符串常量、字符串变量、字符串函数或字符串连接表达式。本题中输入的是abcdef,返回后3个字符就是def。



相关文章


计算机二级VisualFoxPro笔试试卷
二级VisualFoxPro程序设计全真标准预测试卷(二)2
2005年9月计算机等级考试二级VB考前密卷[1]14
二级VisualFoxPro程序设计全真标准预测试卷(二)1
2005年9月计算机等级考试二级VB考前密卷[1]5
澳大利亚华人论坛
考好网
日本华人论坛
华人移民留学论坛
英国华人论坛