A.信息框的标题是Basic
B.信息框中的提示信息是Programming
C.c的值是函数的返回值
D.MsgBox的使用格式有错
[单选题]窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()Sum = 0F.or m = 1 To 3Select Case mC.ase 1a = 1C.ase 2a = 2C.ase 3a = 3E.nd SelectPrint a,Sum = Sum + aNext mPrint SumE.nd Sub运行时,单击按钮,输出结果是( )。A. 3 3 3 9B. 3 2 1 6C. 1 1 1 3D. 1 2 3 6
[单选题]窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()a = 80: b = 50: c = 30If ac Then b = cIf b = c And ac Then c = a + bPrint a, b, cE.nd Sub运行时,单击按钮,窗体输出的结果是( )。A. 80 50 30B. 80 30 30C. 50 30 80D. 50 30 30
[单选题]窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()x = InputBox("x=")y = InputBox("y=")Print x + yE.nd Sub运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是( )。A. 444B. 123321C. 123+321D. 出错信息
[单选题]在窗体上有一个命令按钮Command1,编写事件代码如下: Private Sub Command1_Click() Dim y As Integer y=0 Do y=InputBox("y=") If(y Mod 10)+Int(y/10)=10 Then Debug.Print y; Loop Until y=0 End Sub 打开窗体运行后,单击命令按钮,依次输入10、37、50、55、64、20、28、19、-19、0,立即窗口上输出的结果是( )。A.37 55 64 28 1
[单选题]在窗体上有一个命令按钮Command1,编写事件代码如下: Private Sub Command 1_Click() Dim x As Integer,y As Integer x=12:y=32 Call Proe(X,Y) Debug.Print x;y End Sub Public Sub Proc(n As Integer,ByVal m As Integer) n=n Mod 10 m=in Mod 10 End Sub 打开窗体运行后,单击命令按钮,立即窗口上输出的结果是( )。A
[单选题]在窗体上画一个名称为Command1的命令按钮,编写如下程序: Private Sub Command1_Click() Print p1(3,7) End Sub Public Function p1(x As Single,n As Integer) As Single If n=0 Then p1=1 Else If n Mod 2=1 Then p1=x*x+n Else p1=x*x-n End If End If End Function 程序运行后,单击该命令按钮,屏幕上显示的结果
[单选题]在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程: Private Sub Command1_Click() a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBox a$,,b$,c$,1 End Sub 则在弹出的信息框的标题栏中显示的信息是( )。A.hardwareB.softwareC.hardwareD.1
[单选题]在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程: Private Sub Command1_Click( ) a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBox aS,b$,c$,1 End Sub 则在弹出的信息框的标题栏中显示的信息是A.software and hardwareB.softwareC.hardwareD.1
[单选题]在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程,则在弹出的信息框的标题栏中显示的信息是 ______。 Private SubCommand1_Click() a$="software and hardware" b$=Right(a$,8) c$ =Mid(a$,1,8) MsgBox a$ ,, b$ ,c$,1 End SubA.software and hardwareB.softwareC.hardwareD.1
[单选题]在窗体上有一个名称为Command1的命令按钮,并编写有如下事件过程:记录类型定义如下:下列叙述中正确的是( )。A. 记录类型animal不能在Form1中定义,必须在标准模块中定义B. 如果文件c:/vbTest.dat不存在,则Open命令执行失败C. 由于Put命令中没有指明记录号,因此每次都把记录写到文件的末尾D. 语句“Put#1,,rec”将animal类型的两个数据元素写到文件中