我不知道是否有办法将整DayOfWeek收益直接转换为较喜欢星期一,星期二等这一天的字符串。

样品的编号:

MessageBox.Show(Date.Today.DayOfWeek)

这将返回6(如今天的)。有没有办法直接转换到这个Saturday,例如?我真的不关心什么是真正将其转换,但我想弄死我的选择案例:

Select Case Date.Today.DayOfWeek
     Case 0
         day = "Sunday"
     Case 1
         day = "Monday"
     Case 2
         day = "Tuesday"
     Case 3
         day = "Wednesday"
     Case 4
         day = "Thursday"
     Case 5
         day = "Friday"
     Case 6
         day = "Saturday"
     Case Else
         day = "Apocalypse: we're all boned."
 End Select

感谢:)

有帮助吗?

解决方案

一个更简单的方法:

Dim day As String = Date.Today.DayOfWeek.ToString()

其他提示

DateTimeFormatInfo.CurrentInfo。 GetDayName

有对于一个DateTime格式:DDDD

Dim date1 As Date = #08/29/2008 7:27:15PM#
date1.ToString("dddd", CultureInfo.CreateSpecificCulture("en-US"))

通过CultureInfo的,你可以得到它在一个特定的语言(这是可选)

有关的详细信息: http://msdn.microsoft.com/en-us/library/ 8kb3ddd4.aspx#ddddSpecifier

DateTime.DayOfWeek 不返回一个整数 - 它返回类型的枚举 DayOfWeek 。我期望能够自动转换成的名字,但也许这是一个用VB微妙;也许是与使用Date代替DateTime的?尝试这样:

MessageBox.Show(DateTime.Today.DayOfWeek.ToString())

这不会是文化敏感,但 - 它永远只是显示枚举值的名称,英文。如果这是对你不好,使用Zyphrax或itowlson的解决方案。

Date.Today.DayOfWeek.ToString会给你你在找什么。尼斯和容易。

以防万一他人看着这个例子。我相信它应该是星期天情况下为0。

Case 0 
    day = "Sunday"
许可以下: CC-BY-SA归因
不隶属于 StackOverflow
scroll top