Question

VB设计 简易日历 答辩 急！！！！！

我们要的计算机VB考试要求设计一个简易日历。还需要答辩 每一个步骤需要知道是怎么来的。下面是网上找的编写的简易日历的VB。请高手给出每个步骤的答辩：
一、设计思路
1.要达到的目的
①窗体加载自动提取并显示当前日期
②能选择1960-2060之间的任一年份
③单击确定后显示所选日期
④节日等在选定日期后以MsgBox形式提示
⑤单击退出关闭窗体
⑥根据所选年份和月份，确定显示天数的个数
⑦年月日及下方的显示只可读不可输入
⑧选择某一日期后凹陷显示并在窗体下方显示所选择的日期及其星期
2.关键问题的解决
①根据所选年份和月份，确定显示天数的个数
②显示节日——利用MsgBox等函数
③选择某一日期后凹陷显示并在窗体下方显示所选择的日期及其星期——修改Label的BorderStyle属性
④年月日及下方的显示只可读不可输入——修改ComboBox的BorderStyle属性和TextBox的Locked属性
二、模块之间的调用关系，或程序流程图

还有相对独立的bnyes,bnexit模块
三、部分程序关键源代码及注释
Private Sub checkdate(month%, year%)
Dim i%, value%, datebn$

For i% = 28 To 32
datebn$ = (Str$(month%) + "/" + Str$(i%) + "/" + Str$(year%))
If IsDate(datebn$) Then
value% = i%
Else
Call visualnumber(value%)
Exit Sub
End If
Next i%
End Sub
Private Sub visualnumber(number%)
Dim i%
For i% = 28 To 30
bndate(i%).Visible = False
Next i%
For i% = 28 To number% - 1
bndate(i%).Visible = True
Next i%

End Sub ’ 根据所选年份和月份，确定显示天数的个数

Answer 1

1.这个用date time函数就能获取当前的日期时间，在分别赋予控件就是了
2.这个用updown控件，最大最小设好就是了。
8.按钮有两个样式，一个平面的 按钮就是陷阱去的样子

Answer 2

可以制作 联系我好了···原创代码+详细注解··