A.-56
B.0
C.103
D.190
[单选题]有如下程序: Private Sub Form_CHck() Dim i As Integer,sum As Integer sum=0 For i=2 TO 10 If Mod 2 <>And i Mod 3=0 Then sum=sum+i End If Next i Print sum End Sub 程序运行后,单击窗体,输出结果为______。A.12B.30C.24D.18
[单选题]编写如下事件过程: Private Sub Form. Click() Dim Char As String,i As Integer Const ch$="#" msg$= "Enter a String:" char=InputBox$(msg$) n=Len(Char) For i=1 To n If Mid$(char,i,1)=ch$ Then Exit For End If Next i Print i - 1 End Sub 其中InputBox函数的功能是弹出一个输入对话
[单选题]编写如下事件过程和函数过程: Private Sub Command1_Click() Dim num(1 To 6) As Single num(1)=103: num(2)=190: num(3)=0 hum(4)=32:num(5)=-56: num(6)=100 Print Print p2(6,num()) End Sub Private Function p2(ByVal n As Integer, number() As Single) As Integer p2=number(1
[单选题]编写如下事件过程: Private Sub Form-MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Shift=6 And Button=2 Then Print"Hello" End If End Sub 程序运行后,为了在窗体上输出“Hello”,应在窗体上执行以下( )操作。A.同时按下Shift键和鼠标左键B.同时按下Shift键和鼠标右键C.同时按下Ctrl、Alt键和鼠标左键D.同
[单选题]编写下列事件过程和函数过程:Private Sub Commandl Click()D.im num(1 To 6)As Singlenum(1)=103:num(2)=190:num(3)=0num(4)=32:num(5)=-56:num(6)=100PrintPrint p2(6,num())E.nd SubPrivate Function p2(ByVal n As Integer,number()As Single)As Integerp2=number(1)F.or j=2 To n
[单选题]编写如下事件过程: Private Sub Form. MouseDown(Button As Integer,Shift As Integer,X As Single, Y As Single) If Shift=6 And Button=2 Then Print "BBBB" End If End Sub 程序运行后,为了在窗体上输出“BBBB”,应执行的操作为 ______。A.同时按下Shift键和鼠标左键B.同时按下Shift键和鼠标右键C.同时按下Ctrl、Alt键和鼠标左键D.
[单选题]编写如下事件过程:Private Sub Form_ MouseDown(Button As Integer,Shift As Integer,X As Single, Y As Single) If Shift=6 And Button=2 Then Print "BBBB" End IfEnd Sub程序运行后,为了在窗体上输出“BBBB”,应执行的操作为______。A.同时按下Shift键和鼠标左键B.同时按下Shift键和鼠标右键C.同时按下Ctrl、Alt键和鼠标左键D.同时按下
[单选题]有如下事件过程:Private Sub Form. Click()D.im n As Integerx=0n=InputBox(”请输入一个整数”)F.or i=1 To iF.or j=1 To ix=x+1Next jNext 1Print xE.nd sub程序运行后,单击窗体,如果在输入对话框中输入5,则在窗体上显示的内容是( )。A.13B.14C.15D.16
[单选题]编写如下事件过程: Private Sub Form. KeyDown(KeyCode As Integer,Shift As Integer) If(Button And 3)=3 Then Print "AAAA" End If End Sub 程序运行后,为了在窗体上输出"AAAA",应按下的鼠标键为 ______。A.左B.右C.同时按下左、右D.按什么键都不显示
[单选题]编写如下事件过程:Private Sub Form_ KeyDown(KeyCode As Integer,Shift As Integer) If (Button And 3)= 3 Then Print "AAAA" End IfEnd Sub程序运行后,为了在窗体上输出“AAAA”,应按下的鼠标键为______。A.左B.右C.同时按下左、右D.按什么键都不显示