※全国计算机等级考试二级Visual Basic在线模考>>开始 ■ 填空题 1.传统的程序设计语言主要是面向#_2的,而现在涌现出的许多可视化程序设计语言,如Visual Basic主要是面向#_2进行程序设计的。 2.属性窗口主要是针对窗体的控件设置的。在Visual Basic中,窗体和控件被称为#_2。每个#_2都可以用一组属性来刻画其特征,而属性窗口就是用来设置窗体或窗体中控件属性的。 3.下列程序的运行结果是#_9 A$="2002.09.05" B$=Mid$(Left$(A$,7),6,2) C$=Right$(Right$(A$,5),2) Print Val(C$);"Ex";Val(B$);"is"Left$(A$,5)+C$+"."+B$ 4.运行下列程序,弹出对话框的按钮分别为#_3,其中默认的是#_9 Private Sub Commandl-Click() MsgBox"你好!",vbDefaultButton4+vbYesN0,"提示:" End Sub 5.表达式Format(#2002-11-20#,"d-mm-yy")的返回值为#_8。 6.Visual Basic中有一种控件组合了文本框和列表框的特性,这种控件是#_3。 7.窗体上有一个按钮和一个列表框,执行下列程序后,输出结果为#_2。Private Sub Commandl_Click() Listl.Addhem"China" Listl.AddItem"USA" Listl.Addltem"Japan",l Print Listl.List(2) End Sub 8.在窗体上画一个命令按钮,然后编写如下程序: Function.M(x As Integer,y As Integer)As Integer M=Ⅱf(x>y,x,y) End Function Private Sub Commandl_Click() Dim a As integer,b As integer a=1 b=2 Print M(a,b) End Sub 9.在程序的横线处填写适当的语句(一条横线处只能填写一条语句),使程序完成相应的计算。 程序计算Sn的值,Sn=a+aa+aaa+…+aaa…a,其中最后一项为n个。 例如,a=5,n=4时,则:Sn=5+55+555+5555 Dim a As Integer,n As Integer,Cout As Integer Dim Sn As Lon9,Tn As Long Count=1:Sn=0,Tn=0 a=InputBox("请输 10.下面程序的输出结果是#_8。 Private Sub Form_Click() Dim u u=Array(3,4,5,8,9) i=0 For j=0 To 10 Step i S=u(i)^3 If S>40 Then Exit For i=i+1 Next j Print j;a(i);S End Sub 11.下列程序的输出结果为#_9。 Private Sub Commandl_Click() Dim a(1 To 20) Dim i For i=1 To 20 a(i)=i Next I For Each j In a() a(j)=20 Next i Print a(2) End Sub 12.在程序的横线处写上适当的语句,使程序完成相应的计算。程序的功能是:用随机函数给数组元素赋任意三位整数。然后计算数组arr的元素之和。 Private Sub Form_Click() Dim arrl(10)As Integer,k As Integer,S As Integer For k=0 To 10 #_9 Next k Call Sum(arrl(),s) Print"数组元素之和是:"+fo 13.在窗体上编写如下两个事件过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAseii) End Sub 程序运行后,按"a"键(不按住Shift键),则 14.在菜单编辑器中建立了一个菜单,名为pmenu,用下面的语句可以把它作为弹出式菜单弹出,请填空。Forml.#_5pmenu 15.在Open语句中,"文件号"是一个整型表达式,其取值范围是#_5。 ※全国计算机等级考试二级Visual Basic在线模考>>查看答案 |
我要做题网 ( 辽ICP备11009338号-1) |网站介绍 |联系我们 大连博易网络科技有限公司 版权所有
GMT+8, 2019-12-12 21:06 , Processed in 0.078125 second(s), 14 queries.
Powered by Discuz! X1
© 2001-2010 Comsenz Inc.