执行了下面的程序后,组合框中数据项的值是( )。 PrivateSubForm_Click() Fori=1 To 6 Comb01.Addltem i Nexti Fori=1 To 3 Combol.Removeltem i Nexti End Sub
A: 1 5 6
B: 1 3 5
C: 4 5 6
D: 2 4 6
A: 1 5 6
B: 1 3 5
C: 4 5 6
D: 2 4 6
举一反三
- 执行下面的程序,消息框的输出结果是______。 option Base 1 PrivateSubCommandl_Click() Dima(10),P(3)As Integer K=5 Fori=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(i*i) NextI Fori=1 To 3 k=k+p(i)*2 Ncxti MsgBoxk End sub
- 执行语句Fori=1To3:i=i+1:Nexti后,变量i的值是(). A: 3 B: 4 C: 5 D: 6
- 下面程序运行后,输出结果是( )。 Private Sub mysub(b()As Integer,OptionalByValnAsInteger=2) ForI=1 to 4 b(I)=n*I NextI End Sub Private Sub Commandl_Click() Dima(1 to 4)As Integer,I As Integer Callmysub(a(),5) Mysuba() ForI=1 to 4 Print a(i); Next End Sub A: 5101520 B: 2468 C: 出错 D: 0000
- 在窗体上添加一个命令按钮,然后编写如下事件过程: Phvate Sub Commanl_Click() Dima(10)As Integer Dimp(3)As InteSer k=5 Fori=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(i*i) Nexti Fori=1 To 3 k=k+p(i)*2 Nexti Printk End Sub 该程序的运行结果为( )。 A: 35 B: 33 C: 31 D: 29
- 下面程序运行后,输出结果是( )。#include ;main( ){ int a[10]={1,2,3,4,5,6},i,j; for(i=0;i { j=a[i];a[i]=a[5-i];a[5-i]=j;} for(i=0;i}[/i][/i] A: 1 5 4 3 2 6 B: 1 5 3 4 2 6 C: 6 5 4 3 2 1 D: 1 2 3 4 5 6