Office中国论坛/Access中国论坛

标题: 菜鸟求助!很急的问题,多谢老师们指导。 [打印本页]

作者: oltgzf    时间: 2009-6-24 23:09
标题: 菜鸟求助!很急的问题,多谢老师们指导。
1、如何在窗体中加载一个能一打开本窗体就能显示当日是星期几啊?
我按照教材中的方法,建立了一个空的文本框,之后在该文本框的事件过程旁选择了代码生成器,按照教材中教的,输入了如下代码:(该文本框名称为“星期”)
    Private Sub Form_Load()
    Select Case Weekday(Date)
         Case 1
                Me.txt星期 = "星期一"
         Case 2
                Me.txt星期 = "星期二"
         Case 3
               Me.txt星期 = "星期三"
         Case 4
                Me.txt星期 = "星期四"
         Case 5
                Me.txt星期 = "星期五"
         Case 6
                Me.txt星期 = "星期六"
         Case 7
                Me.txt星期 = "星期日"
    End Select
    End Sub



输入完之后,返回窗体该文本框没有任何显示,或在代码生成器中运行该编码,就弹出宏的选择器,总而言之就是无法达到自动显示当日是“星期几”的目的。
请各位老师帮忙详细指点、指导一下,学生跪谢!
作者: asklove    时间: 2009-6-25 15:00
“文本框”=WeekdayName(Weekday(Date()))
作者: oltgzf    时间: 2009-6-25 18:25
非常感谢asklove老师的指导,按您教的方法问题解决了,万分感谢!




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3