在窗体上有一个命令按钮Commandl,编写事件代码如下: Private

在窗体上有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl Click(  ) Dim Y As Integery=0 Doy=InputBox(”y=”)If(Y Mod l0)+Int(y/10)=10 Then Debug.Print Y; LoopUntil y=0End Sub打开窗体运行后,单击命令按钮,依次输入10、37、50、55

问题:

[单选] 在窗体上有一个命令按钮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

参考答案:D

参考解析:

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

联系我们

联系我们

查看联系方式

邮箱: 2643773075@qq.com

工作时间:周一至周五,9:00-17:30,节假日休息

关注微信
微信扫一扫关注我们

微信扫一扫关注我们

返回顶部