在窗体上有一个命令按钮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
2023-04-24
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是求出十位上的数。
2023-04-24 计算机考级
2023-04-24 计算机考级
2023-04-24 计算机考级
一个Word文档有10个段落,在没有插入任何分节符的情况下,这个文档共有( )。
2023-04-24 计算机考级
在Word 2000的编辑状态下,对图片不能进行图文混排的环绕方式是( )。
2023-04-24 计算机考级
2023-04-24 计算机考级
2023-04-24 计算机考级
热门标签