chalisen 2016-01-31 09:02 采纳率: 0%
浏览 1420

此代码错在哪里?好像不容易解决啊!大家来试试!见下图

大家看,星期错了,今天应该星期天!我的代码错在哪里呢?
请朋友们贴出具体代码,谢谢了!
我把代码贴出来,便于大家修改:
Private Sub Command1_Click()
Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday)
End Sub

Private Sub Command2_Click()
Unload Me
End Sub

Private Sub Form_Load()
Text1.Text = Date
Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday)
End Sub

图片说明

  • 写回答

5条回答

  • Go 旅城通票 2016-01-31 09:49
    关注

    使用系统默认的就好了。不要指定vbMonday

    http://www.zhujiangroad.com/program/VbScript/56458.html

    评论

报告相同问题?

悬赏问题

  • ¥15 seatunnel-web使用SQL组件时候后台报错,无法找到表格
  • ¥15 fpga自动售货机数码管(相关搜索:数字时钟)
  • ¥15 用前端向数据库插入数据,通过debug发现数据能走到后端,但是放行之后就会提示错误
  • ¥15 python天天向上类似问题,但没有清零
  • ¥30 3天&7天&&15天&销量如何统计同一行
  • ¥30 帮我写一段可以读取LD2450数据并计算距离的Arduino代码
  • ¥15 C#调用python代码(python带有库)
  • ¥15 飞机曲面部件如机翼,壁板等具体的孔位模型
  • ¥15 vs2019中数据导出问题
  • ¥20 云服务Linux系统TCP-MSS值修改?