Foxtable(狐表)用户栏目专家坐堂 → 窗口中怎么让英文状态下的星期几变成汉子?


  共有1505人关注过本帖树形打印复制链接

主题:窗口中怎么让英文状态下的星期几变成汉子?

帅哥哟,离线,有人找我吗?
kljbdjz
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:42 积分:462 威望:0 精华:0 注册:2018/6/3 16:05:00
窗口中怎么让英文状态下的星期几变成汉子?  发帖心情 Post By:2018/6/26 16:29:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:22.png
图片点击可在新窗口打开查看


当日期更改时,自动得到星期几,代码如下:
Dim tbx As WinForm.DateTimePicker = e.Form.Controls("日期") '定义输入的文本变量
Dim str As Date = tbx.Value

Dim wek As WinForm.TextBox = e.Form.Controls("TextBox83")
wek.Value = tbx.Value.DayOfWeek

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/6/26 18:10:00 [只看该作者]

试试

 

Dim d as date = "2018-06-26"
msgbox(format(d, "dddd"))


 回到顶部