单项选择题

下列程序运行时输出的结果是( )。 Option Base 1 Const a=10 Private Sub Form Click() Dim x(a) As Integer k=-1 For i=1 To a x(i)=ik k=(-1)k Next i For i=1 To 10 Print x(i) Next i End Sub

A．1 3 5 7 9 10
B．-1-3-5-7-9
C．-1 2-3 4-5 6-7 8-9 10
D．1-2 3-4 5-6 7-8 9-10

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个名称为“Command1”，标题为“计算”的命令按钮，再画7个标签，其中5个标签组成名称为Label1的控件数组；名称为Label2的标签用于显示计算结果，其Caption属性的初始值为空：标签Label3的标题为“计算结果”。运行程序时会自动生成5个随机数，分别显示在标签控件数组的各个标签中。单击“计算”按钮，则将标签数组各元素的值累加，然后计算结果显示在Label2。下列为“计算”按钮的事件过程，请为下划线处选择合适的语句( )。 Private Sub Command1_Click() Sum=0 For i=0 To 4 Sum=Sum+______ Next ______=Sum End Sub

A．Label1(.Caption Label2.Caption
B．Label1(.Caption Label3.Caption
C．Label1.Caption Label2.Caption
D．Label1.Caption Label3.Caption

单项选择题

在窗体上画一个名称为Text1的文本框，然后画3个单选按钮，并用这3个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，请选择空白处合适的语句( )。 Private Sub Option1_Click(Index As Integer) Select Case Case 0 a=“宋体” Case 1 a=“黑体” Case 2 a=“楷体_GB2312” End Select Text1. =a End Sub

A．Option Text
B．Index Text
C．Index Font
D．Option Font

相关试题