填空题

下列程序段运行结果是______。
Dim c As Integer, num As Integer
num=29483
Do
c=num Mod 10
Print c：
num=num \10
Loop While num＜＞0

【参考答案】

3 8 4 9 2

<上一题目录下一题>

热门试题

填空题

11，在程序的空白处填写适当的语句(一个空白处只能填写一条语句)，使程序完成相应的计算。程序计算Sn的值，Sn=a+aa+aaa+…+aaa…a，其中最后一项为n个。例如，a=5，n=4时，则： Sn=5+55+555+5555 Dim a As Integer, n As Integer, Cout As Integer Dim Sn As Long，Tn As Long Count=1:Sn=0.Tn=0 A=InputBox( 请输入a的值： ) ______ Do Tn=Tn+a Sn=Sn+Tn Count=Count+1 Debug.Print a，n，Sn

填空题

在程序的空白处填写适当的语句(一个空白处只能填写一条语句)，使程序完成相应的操作。窗体上有文本框Text1和若干复选框，其中复选框Check1设置文本框Text1上显示的文本是否加下画线。Check1的单击事件过程如下： Private Sub Check1_Click() ______ Text1.FontUnderLine=True Elself______ Text1.FontUnderLine=False End If End Sub

相关试题