• 2022-06-16 问题

    单击命令按钮时,下列程序代码的执行结果为( )。 Private Sub Procl(nAs Integer,ByValmASInteger) n=nMod 10 m=m\10 End Sub PrivateSubCommandl_Click() Dimx As Integer Dimy As Integer x=12 y=34 CallProcl(x,y) Printx;y End Sub A: 12 34 B: 2 34 C: 2 3 D: 12 3

    单击命令按钮时,下列程序代码的执行结果为( )。 Private Sub Procl(nAs Integer,ByValmASInteger) n=nMod 10 m=m\10 End Sub PrivateSubCommandl_Click() Dimx As Integer Dimy As Integer x=12 y=34 CallProcl(x,y) Printx;y End Sub A: 12 34 B: 2 34 C: 2 3 D: 12 3

  • 2021-04-14 问题

    下列程序输入公元年号,判断该年是否闰年。判断闰年可以参考以下规则:⑴能被4整除,但不能被100整除,如1996年是闰年;⑵能被400整除,如2000年。PrivateSubForm_Click()Dimy%y=InputBox("y=")(______)Print"是闰年"ElseIfyMod100=0ThenPrint"不是闰年"Else(______)Print"不是闰年"ElsePrint"是闰年"(______)EndIfEndIfEndSub(10.0分)

    下列程序输入公元年号,判断该年是否闰年。判断闰年可以参考以下规则:⑴能被4整除,但不能被100整除,如1996年是闰年;⑵能被400整除,如2000年。PrivateSubForm_Click()Dimy%y=InputBox("y=")(______)Print"是闰年"ElseIfyMod100=0ThenPrint"不是闰年"Else(______)Print"不是闰年"ElsePrint"是闰年"(______)EndIfEndIfEndSub(10.0分)

  • 1