单选题编写如下程序: Private Sub Command1_Click()
Dim x As Integer,y As Integer
x=InputBox("输入第一个数") y=InputBox("输入第二个数")
Call f(x,y) Print x,y End
Sub Sub f(a As Integer,ByVal b As Integer)
a=a*2 x=a+b
b=b+100 End Sub
程序运行后,单击命令按钮Command1,并输入数值10和15,则输出结果为______。
A.10 115
B.20 115
C.35 15
D.20 15
单选题为了取消窗体的最大化功能,需要将它的一个属性设置为False,这个属性是
单选题函数LEN(SPACE(20)-SPACE(15))的返回值是( )
单选题在窗体上画两个单选按钮(名称分别为Option1、Option2,标题分别为“宋体”和“黑体”)、1个复选框(名称为Check1,标题为“粗体”)和1个文本框(名称为Text1,Text属性为“改变文字字体”),窗体外观如下图所示。程序运行后,要求“宋体”单选钮和“粗体”复选框被选中,则下列能够实现上述操作的语句序列是()。
单选题在窗体上有—今名为Cd1的通用对话框,为了在运行程序时打开保存文件对话框,则在程序中应使用的语句是______。
单选题在窗体上画一个名为Command1的命令按钮,然后编写以下程序: Private Sub Command1_Click() Dim a(10)As Integer For k=10 To 1 Step-1 a(k)=20-2*k Next k k=k+7 Print a(k-a(k)) End Sub 运行程序,单击命令按钮,输出结果是( )。
单选题设a=5,b=6,c=7,d=8,执行下列语句后,x的值为( )。 x=IIf((a>b)And(c>d),10,20) A.10 B.20 C.True D.False
单选题设窗体上有一个图片框Picture1,要在程序运行期间装入当前文件夹下的图形文件Filel.jpg,能实现此功能的语句是
单选题执行如下程序段后,intsum的值为______。
单选题下面有关标准模块的叙述中,错误的是
单选题在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程:Private Sub Command1_ Click() Dim b As Integer b=b+1End Sub 运行程序,三次单击命令按钮后,变量b的值是______。
单选题下列关于线性表的叙述中,不正确的是( )。
单选题要在D盘的Temp 目录下建立一个名为Name.dat 的顺序文件,应使用______ 语句。
单选题在Visual Basic中,所有标准控件都具有的属性是
单选题假定窗体上有一个标签,名为Labe11,为了使该标签透明并且没有边框,则正确的属性设置为______ 。
单选题执行以下程序段 a$=“abbacddcba” For i=6 To 2 Step-2 X=Mid(a,i,i) Y=Left(a,i) z=Right(a, i) z=Ucase(X & Y & z) Next i Print z 输出结果为
单选题如果一个正整数从高位到低位上的数字依次递减,则称其为降序数(如9632是降序数,而8516则不是降序数)。现编写如下程序,判断输入的正整数是否为降序数。
Private Sub Command1_Click()
Dim n As Long
Dim flag As Boolean
n=InputBox("输入一个正整数")
s=Trim(Str(n))
For i=2 To Len(s)
If Mid(s,i -1,1)<Mid(s,i,1)Then Exit For
Next i
IF i=Len(s)Then flag=True Else flag= False
If flag Then
Print n;"是降序数"
Else
Print n;"不是降序数"
End If
End Sub
运行以上程序,发现有错误,需要对给flag变量赋值的If语句进行修改。以下正确的修改是______。
单选题使用Open语句打开文件时需果指定参数Len的是____。
单选题对下列二叉树进行前序遍历的结果为()。
单选题设有如下程序: Private Sub Commandl_click() Dim c As Integer,d As Integer c=4 d=InputBox("请输入一个整数") Do While d>0 If d>c Then c=c+1 End If d=InputBox("请输入一个整数") Loop Print c+d End Sub 程序运行后,单击命令按钮,如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、 0,则输出结果是
