小编Leo*_*eon的帖子

我使用的是Excel 2007，MS Visual Basic 6.0。我需要检查窗口操作系统日期格式（例如，是否使用 d/m/yyyy 还是 m/d/yyyy），以便使用以下代码。

Dim lastdateofmonth As Date
Dim lastwhichday As String
slastdayofmonth = "31"
'if the OS system is using m/d/yyyy then use this
lastdateofmonth = (sTxtMMM + "/" + slastdayofmonth + "/" + TxtYYYY)
lastwhichday = Weekday(lastdateofmonth)
'if th OS system is using d/m/yyyy then use this
lastdateofmonth = (slastdayofmonth+ "/" + sTxtMMM  + "/" + TxtYYYY)

任何人都可以帮忙吗？提前致谢

我正在使用microsoft visual basic 6.5和Excel

TxtMMM是String prompt keyyed in by user. In this case i hardcoded it as an example but it(TxtMMM)可以是"Jan","JAN","jAn"或"jan"等中的任何一个

我的问题是,我如何写入条件来检查TxtMMM,在检查时忽略区分大小写？

例如,如果用户输入 TxtMMM

• JAN
• 一月
• 一月

然后它会回来 "01"

sub casesense()    
Dim TxtMMM as String    
Dim sTxtMMM as String    
TxtMMM = "Jan"    
            If TxtMMM = "JAN" Then
                sTxtMMM = "01"
                csd = 1
            ElseIf TxtMMM = "FEB" Then
                sTxtMMM = "02"
                csd = 1
                .....
             End If
End sub

我想检查不同comp上的窗口版本,从而在MS word 2007 vba上执行不同的任务.我尝试了这个代码,我在ms excel 2007 vba上应用并且正在工作,但不是在MS word 2007 vba上.

Dim TheOS As String
Dim WinType As String
TheOS = Application.OperatingSystem
MsgBox ("TheOS ")

在ms word 2007 vba上,它重新编译了一个编译错误:找不到方法或数据成员.我需要什么？