在窗体上有一个命令按钮Commandl，编写事件代码如下：Private SuB cormmandl_Click() Dim y As Integer y=0 Doy=Input Box(“y=”)IF(y Mod 10)+Int(y/10)=10 Then DeBug.print y; Loop Until y=0End SuB打开窗体运行后，单击命令按钮，依次输入10、37、50、55、64、20、28、19、－19、0，立即窗口上输出的结果是