填空题

给定年份，下列程序用来判断该年是否是闰年，请填空。 　　Sub YN( ) 　　　　Dim X AS Integer 　　　　x＝Input Box("请输入年号") 　　　　If( x Mod 4=0 【 】 x Mod l00<　>0) 【 】 (x　Mod　400=0)Then 　　　　　　Print"是闰年" 　　　　Else 　　　　　　Print"不是闰年，是普通年份" 　　　　End If 　　End Sub

【参考答案】

And
<上一题 目录 下一题>
热门 试题

填空题
窗体上有两个按钮，则执行程序后按键盘Cancel键的输出结果是【 】。Private Sub Command1 _ Click( )Print 北京 ； End SubPrivate Sub Command2 _ Click( )Print 南京 ；End SubPrivate Sub Form _ Load( )Command2．Cancel＝TrueCommand1．Cancel=TrueEnd Sub
填空题
在窗体上加上一个文本控件PCSTextBox，画一个命令按钮，当单击命令按钮的时候将显示 “打开文件”对话框，设置该对话框只用于打开文本文件，然后在文本控件中显示打开的文件名。请填空。Private Sub Command1_Click()CommonDialog1．Filter=【 】 CommonDialog1．ShowOpenPCSTextBox．Text=【 】 End Sub
相关试题