简单问题，才学 vb两个小时的菜鸟请教大家，就当是散分吧！

Question

请问下superdullwolf(超级大笨狼)怎么用啊
我不太明白
可否帮我改一下
我用的mscomct2.ocx里面的控件做的

Answer 1

If (MonthView1.Month = mvwJanuary) And (MonthView1.Day = 2) Then

Answer 2

Private Sub Command1_Click()
Dim strMsg As String
Dim currentMonth As Integer
Dim currentDay As Integer
currentMonth = MonthView1.Month
currentDay = MonthView1.DayIf currentMonth = 1 And currentDay = 2 Then
    strMsg = "today is your birthday! ：）"
    Label3.Caption = strMsg
Else
    strMsg = "Today will be a good day."
    strMsg = strMsg & "I wish you have a good time!:)"
    Label3.Caption = strMsg
End If
End Sub
还是不能显示不同信息，是不是要写change函数！？

Answer 3

每一句Label3.Caption = strMsg后都要加上一句:label3.refresh

Answer 4

还是不行 ，大家可否再考虑下
或者做个form出来，试试
我想应该不是refresh的问题   
我把输出的消息定位到一个消息窗口也不行！
是控件问题还是我的条件判断有问题？

Answer 5

你把每次选的日期显示出来（Label1.Caption = MonthView1.Value）就知道日期是根据每次的选择而变化的。
判断的问题： (MonthView1.Month = mvwJanuary) = ture And (MonthView1.Day = 2) = ture  =〉(MonthView1.Month = mvwJanuary) = true And (MonthView1.Day = 2) = true

Answer 6

虽然你的判断条件比较罗嗦，不过只要你读取的日期没有错误，这样写也是可以的。你可以参照wu_yongcai(RainBow) 的方法先看一下判断之前的日期是否是你选择的日期。我一般用MsgBox，比较醒目。
我没处理过时间，不过我看过点，好象Mouth和Date是取出月份和日期的，你不访试一下。

Answer 7

晕了，vb高手呢！？currentMonth = MonthView1.Month
currentDay = MonthView1.Day
我知道这是返回当前月份和当前日
然后我判断是否是1月2号
难道and不是“与“的意思！？当我把系统时间改为1月2号
他输出的依然是else语句块里面的msg

Answer 8

用
DAY(now())判断今天几号
用
MONTH(now())判断今天几月
用
year(now())判断今天是什么年
得出来得是数字型

Answer 9

告诉你一个简单的办法，把光标定位到第一个IF语句，按下F9功能键，然后再F5功能键进入调试状态，这样运行到IF的那段语句时就可以自动中断下来，接下来所有变量的值就都在你的掌握之中了，你想看一下 MonthView1.Month 的值到底是多少吗？你只要按一下 Ctrl+G,出现标题变蓝的窗口，接下来输入“?MonthView.Month”回车，哈哈，什么值你自己知道了，比较应不应该成功你也知道了，还有你想看一下某个表达式就是相等或者条件是否成立吗？也可以，直接选中你要查看的表示式，接下 Shift+F9, 方便吧。接下来你就知道什么原因让你困惑了，问题也就容易解决了

Answer 10

to: twinking()
Thanks for your help !to:all
Every problem have been solved.
I'll check out at once!
Thanks.

Answer 11

to :xiaoxinghappy(小星) 
呵呵，谢谢你的指导
继续学习！
顺，便说一下，我以前学习vc现在要用 vb做数据库，所以学习下，发现vb在某方面确实很好。
一开始if else还不会用呢，哈哈
还以为跟vc里面的一样，没想到还要加什么then。希望大家以后多多关照
谢谢！！