怎样用vb表示英文月份

Question

怎样用vb表示英文月份，如一月是January、二月是February……以此类推 用vb怎么表示

Answer 1

你说的是汉化的vb？还是没有汉化的vb？
如果是英文版的就只能显示january，
如果是已经汉化过了的vb显示january好像是不可能吧，因为汉化了以后january都被“一月”代替了。 答案补充 Private Sub Command1_Click()
MsgBox Format(Now, "mmmm")
End Sub
这个语句是输出现在月份的英文形式。（mmm是英文简写）（mm是数字形式）
format是按照格式输出数据。 答案补充 那就是Private Sub Command1_Click()
lblmonthen = Format(Now, "mmmm")
print lblmonthen
End Sub

Answer 2

不知道你要在VB中应用到哪个方面。比如显示在状态栏的数据。还是别样的。
如果是这样的话可以用“资源编辑器”。 答案补充 Format(date, "mmmm")也可以显示出你想要的英文。 答案补充 private sub Form1_load()
lblmonthen = Format(date, "mmmm")
end sub 答案补充 Private Sub Form_Load()
lblmonthen.Caption = Format(Date, "mmmm")
End Sub

Answer 3

直接用 Format函数就可以取得英文月份了，比如取现在时间的英文月份：

英文长月份：Format(now,"mmmm")

英文短月分：Format(now,"mmm")

Answer 4

自己写一个方法

用if else

或 别一种类似于if else的

然后返回对应的英文

Answer 5

Dim sDate(1 To 3) As String, sMonth As String
sDate = Split(Format(Now, ”yyyy/mm/dd”), ”/”)
Select Case sDate(2)
Case ”01”
sMonth = ”January”
Case ”02”
sMonth = ”February”
Case ”03”
sMonth = ”March”
Case ”04”
sMonth = ”April”
Case ”05”
sMonth = ”May”
Case ”06”
sMonth = ”June”
Case ”07”
sMonth = ”July”
Case ”08”
sMonth = ”August”
Case ”09”
sMonth = ”September”
Case ”10”
sMonth = ”October”
Case ”11”
sMonth = ”November”
Case ”12”
sMonth = ”December”
End Select
Print sMonth本回答被网友采纳