当前位置:IT认证>计算机二级

问题:

[单选] 在窗体上有一个命令按钮Commandl,编写事件代码如下:
Private Sub Commandl Click(  )
Dim Y As Integer
y=0 Do
y=InputBox(”y=”)
If(Y Mod l0)+Int(y/10)=10 Then Debug.Print Y;
LoopUntil y=0
End Sub
打开窗体运行后,单击命令按钮,依次输入10、37、50、55、64、20、28、19、-19、0,立即窗口上输出的结果是(  )。

A . 375564281919
B . 105020
C . 1050200
D . 3755642819

软件测试的目的是(  )。 评估软件可靠性。 发现并改正程序中的错误。 改正程序中的错误。 发现程序中的错误。 在长度为n的线性表中,降序排列,则寻找最大项最少需要的软(  )次。 1。 n。 n2。 n/Z。 在窗体上有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl Click(  ) Dim dl As Date Dim d2 As Dated1=#12/25/2009#d2=#1/5/2010#MsgBox DateDiff(”ww”,d1,d2)End Sub打开窗体运行后,单击命令按钮,消息框中输出的结果是(  )。 1。 2。 10。 11。 Access报表对象的数据源可以是(  )。 表、查询和窗体。 表和查询。 表、查询和SQL命令。 表、查询和报表 。 在窗体上有一个命令按钮Commandl,编写事件代码如下:
Private Sub Commandl Click(  )
Dim Y As Integer
y=0 Do
y=InputBox(”y=”)
If(Y Mod l0)+Int(y/10)=10 Then Debug.Print Y;
LoopUntil y=0
End Sub
打开窗体运行后,单击命令按钮,依次输入10、37、50、55、64、20、28、19、-19、0,立即窗口上输出的结果是(  )。
参考答案:

  参考解析

D。【解析】此sub的作用是输出个位上的数、十位上的数相加和为l0的数,其中Y Mod l0是求出个位上的数,y/10是求出十位上的数。

在线 客服