单选题设有如图所示窗体和以下程序:PirintSubCommandl_Click()Text1.Text=”VisualBasic”EndSubPrivateSubText_LostFocus()IfText1.Text<>”BASIC”ThenText1.Text=“”:TextSetFocusEndIfEndSub程序运行时,在Text1文本框中输入“Basic”(如图所示),然后单击Command按钮,则产生的结果是
单选题如果在立即窗口中执行以下操作:______ 。 a=8
(是回车键,下同) b=9 print
a>b 则输出结果是______ 。
单选题窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:
Private Sub Command1_Click()
Open"c:/f1.txt"For Input As #1
Open"c:/f2.txt" For Output As #2
Do While Not EOF(2)
Line Input #1, str1 Print #2, str1
Loop
Close Kill"c:/f1.txt"
End Sub
该程序运行时发生错误,应该进行的修改是
单选题编写如下程序:Option Base 1Private Sub Command1_Click() Dim
a a=Array(1,2,3,4) s=0:j=1 For i=4 To 1
Step-1 s=s+a(i)*j j=j*10 Next i Print sEnd
Sub程序运行后,单击命令按钮Command1,输出结果为______。
A.110
B.123
C.1234
D.4321
单选题下列与鼠标拖放操作无关的是( )。
单选题下列叙述中正确的是{{U}} {{/U}}。
A.在窗体的Form_Load事件过程中定义的变量是全局变量
B.局部变量的作用域可以超出所定义的过程
C.在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名,但其作用域只限于该过程
D.在调用过程时,所有局部变量被系统初始化为0或空字符串
单选题下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click() Dim x (10)As Integer,y(5)As Integer For i=1 to 10 x(i)=10-i+1 Next For i=1 to 5 y(i)=x(2*i-1)+x(2*i) Next For i=1 to 5 Print y(i) Next End Sub
单选题下列描述中错误的是
单选题窗体上有1个名称为Command1的命令按钮,事件过程如下:Private Sub
Command1_Click() Dim num As Integer,x As
Integer num=Val(InputBox("请输入一个正整数")) Select Case num Case
Is>100 x=x+num Case Is<90 x=num Case
Else x=x*num End Select Print x;End
Sub运行程序,并在三次单击命令按钮时,分别输入正整数100、90和60,则窗体上显示的内容为______。
A.0 0 0
B.0 0 60
C.0 90 0
D.100 0 60
单选题结构化程序设计主要强调的是______。
A.程序的规模
B.程序的易读性
C.程序的执行效率
D.程序的可移植性
单选题假定建立一个名为Command1的命令按钮数组,则以下说法中错误的是( )。
单选题关系R和S进行自然连接时,要求R和S含有一个或多个公共______。
单选题在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a s=0:j=1 a=Array(1,2,3,4) For i=4 To 1 Step-1 S=S+a(i)*i j=j*10 Next Print s End Sub 运行上面的程序并单击命令按钮,其输出结果是( )。 A) 4221 B) 1234 C) 34 D) 12
单选题下列程序运行后的输出结果是 Function Fun(n) x=n*n Fun=x-11 End Function Private Sub Command1_Click() For k=1 To 2 y=Fun(k)=Print y Next End Sub
单选题在窗体E先后画2个图片框,名称分别为Picture1和banana,banana中添加了香蕉图片,如图1所示,且将banana.DragMode属性设置为1。要求程序运行时,可以用鼠标把banana拖拽到Picture1中,如图2所示。能实现此功能的事件过程是()。
单选题能够存放组合框的所有项目内容的属性是
单选题在窗体模块的声明部分声明变量时,不能使用的关键字是( )。
单选题将一个窗体设置为MDI子窗体的方法是
单选题设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
单选题在窗体上画一个命令按钮,名称为Command1,然后编写如下代码: Option Base() Private Sub Command1 Click() Dim A(4)As Integer,B(4)As Integer For k=0 To 2 A(k+1)=InputBox(“请输入一个整数”) B(3-k)=A(k+1) Next k Print B(k) End sub 程序运行后,单击命令按钮,在输入对话框中分别输入2、4、6,输出结果为______。
