单项选择题
执行下列程序段后,输出的结果是______。
For k1=0 To 4
y=20
For k2=0 To 3
y=10
For k3=0 To 2
y=y+10
Next k3,k2,k1
Print y
A) 90
B) 60
C) 40
D) 10
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个命令按钮和两个文本框,其名称分别为Command1、Text1和Text2,在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下程序: Dim S1 As String,S2 As String Private Sub Form Load() Text1.Text= Text2.Text= Text1.Enabled=False Text2.Enabled=False End Sub Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) S2=S2& Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) S1=S1&Chr(KeyAscii) End Sub Private Sub Command1_Click() Text1.Text=S1 Text2.Text=S2 S1= S2= End Sub 程序运行后,先后按a、b、c键,然后单击命令按钮,在文本框Text1和Text2中显示的内容分别为______。
A) 空白
B) abc和ABC
C) 出错
D) ABC和abc
点击查看答案&解析
单项选择题
设有以下函数过程: Function fun(a As Integer,b As Integer) Dim c As Integer If a<b Then c=a:a=b:b=c End If c=0 Do c=c+a Loop Until c Mod b=0 fun=c End Function 若调用函数fun时的实际参数都是自然数,则函数返回的是______。
A) a、b的最大公约数
B) a、b的最小公倍数
C) a除以b的余数
D) a除以b的商的整数部分
点击查看答案&解析
相关试题
Combo1.Text
NOT EOF(1)
Combo1.ListCount
For Input
Show