A.上海
B.北京
C.天津
D.重庆
[单选题]窗体上有一个列表框,编写下列程序: Private Sub Command1_Click() ListRemoveItem3 End Sub Private Sub Form_Load() ListAddItem "拉瓦锡" ListAddItem "道尔顿" ListAddItem "汤姆森" ListAddItem "门捷列夫" End Sub 程序执行时,单击Commandd1,则在列表框中将不再出现 ______。A.拉瓦锡B.道尔顿C.汤姆森D.门捷列夫
[单选题]在窗体上有一个命令按钮Command1,编写下列程序:Private Sub Command1_Click()Print pp1(3,7)E.nd SubPublic Function pp1(x As Single,n As Integer)As SingleIf n=0 Thenpp1=1E.lseIf n Mod 2=1 Thenpp1=x*x+nE.lsepp1=x*x-nE.nd IfE.nd IfE.nd Function程序运行后,单击该命令按钮,屏幕上显示的是( )。A.2B.1
[单选题]在窗体上有一个命令按钮Command1,编写如下程序: Private Sub Command1_Click() Print pp1(3, 7) End Sub Public Function pp1(x As Single, n As Integer) As Single If n = 0 Then pp1= 1 Else If n Mod 2 = 1 Then pp1 =x*x+n Else pp1 =x*x-n End If End If End Function 程序运行后,单击该命令按
[单选题]在窗体上有一个命令按钮Command1,编写如下程序: Private Sub Command1_Click() Print pp1(3,7) End Sub Public Function pp1(x As Single,n As Integer)As Single If n=0 Then pp1=1 Else If n Mod 2=1 Then pp1=x*x+n Else pp1=x*x-n End If End If End Function 程序运行后,单击该命令按钮,屏幕上显示的是(
[单选题]在窗体上画一个命令按钮,然后编写下列程序 Private Sub Command3_Click( ) Tcl 2 Tcl 3 Tel 4 End Sub Sub Tcl(a As Integer) Static x As Integer x=x + a Print x; End Sub 程序运行后,单击命令按钮,输出结果为A.2 3 4B.2 5 9C.3 5 4D.2 4 3
[单选题]在窗体上画一个命令按钮,然后编写下列程序 Private Sub Command3_Click() Tcl 2 Tcl 3 Tcl 4 End Sub Sub Tcl(a As Integer) Static x As Integer x=x+a Print x; End Sub 程序运行后,单击命令按钮,输出结果为A.2 3 4B.2 5 9C.3 5 4D.2 4 3
[单选题]在窗体上画一个命令按钮Command1,然后编写下列代码:Private Sub Command1_Click()D.im Arr1(10) As Integer,Art2(10) As Integern=3F.or i=1 To 5A.rr1(i)=iA.rr2(n)=2*n+iNext iPrint Arr2(n);Arr1(n)E.nd Sub运行程序后,单击命令按钮,输出结果是( )。A.11 3B.3 11C.13 3D.3 13
[单选题]窗体上有一个列表框和一个文本框,编写下列两个事件过程:Private Sub Form. Load()List1.Addltem"北京"List1.Addltem"天津"List1.Addltem"上海"Text1.Text=""E.nd SubPrivate Sub List1 Click()Print Text1.Text+List1.TextE.nd Sub程序运行后,在文本框中输入“中国”,然后单击列表框中的“北京”,则输出结果是( )。A.中国北京B.中国天津C.中国上
[单选题]窗体上有一个命令按钮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