VB的年份判定combo1 为 年份 combo2 为 月份 combo3 为 日比如单击combo1选择list 20
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/07/22 17:00:43
VB的年份判定
combo1 为 年份 combo2 为 月份 combo3 为 日
比如单击combo1选择list 2011 or 2012 判定是否是闰年 是的话 combo2 list 2月则 combo3 的list 只有28天 不是闰年则 有29天
combo2的月份大小!1月大二月小……combo3的日数变化!
combo1 为 年份 combo2 为 月份 combo3 为 日
比如单击combo1选择list 2011 or 2012 判定是否是闰年 是的话 combo2 list 2月则 combo3 的list 只有28天 不是闰年则 有29天
combo2的月份大小!1月大二月小……combo3的日数变化!
Private Sub Combo2_Click()
Dim ri, i As Integer
Select Case Combo2.ListIndex + 1
Case 1, 3, 5, 7, 8, 10, 12
ri = 31
Case 4, 6, 9, 11
ri = 30
Case 2
i = CInt(Combo1.Text)
If i Mod 400 = 0 Or (i Mod 4 = 0 And i Mod 100 0) Then ri = 29 Else ri = 28
End Select
Combo3.Clear
For i = 1 To ri
Combo3.AddItem i
Next
End Su
Dim ri, i As Integer
Select Case Combo2.ListIndex + 1
Case 1, 3, 5, 7, 8, 10, 12
ri = 31
Case 4, 6, 9, 11
ri = 30
Case 2
i = CInt(Combo1.Text)
If i Mod 400 = 0 Or (i Mod 4 = 0 And i Mod 100 0) Then ri = 29 Else ri = 28
End Select
Combo3.Clear
For i = 1 To ri
Combo3.AddItem i
Next
End Su
输入一个年份,判断该年是否为闰年,输出该年2月份的天数
请教下面VB 代码的意思 Private Sub Command1_Click() If Combo1.Text ""
编写一个程序,判断输入的年份是否为闰年
如何辨别年份是否为闰年
闰年是指能被4整除但不能被100整除的年份,或者能被400整除的年份,编写一个程序,判断输入的年份是否为闰年..
闰年是指能被4整除但不能被100整除的年份,或者能被400整除的年份,编写一个程序,判断输入的年份是否为闰年
两条语句的区别?If Combo1.Text = "进价" Or Combo1.Text = "数量" Or Combo
英语年份咋简写英语的年份比如,1889年,
输入一个年份,判断它是否为闰年,并输出是否为闰年的相关信息
月份前面的介词用in 还是on 季节 年份呢?年份+季节呢 年份+月份呢
C语言判断一个年份是否为闰年*/
用vb设计一个随即抽取幸运数字的程序,单击"开始"按钮,在文本框中随机产生7为数字,并不断滚动.单击"暂停"按钮,文本框