有没有一种简单的方法可以与ignorecase ON进行比较?
If file.Extension = ".Lnk" Then MsgBox(file.Extension)
我要做的是获取所有“.lnk”或“.LNK”或“.lNk”或“”.Lnk“等......
我知道这可能与RegEx有关但是......这个例子有一个简单的方法吗?
谢谢你的阅读
答案 0 :(得分:4)
使用ToLower将扩展名转换为小写,然后比较
If file.Extension.ToLower = ".lnk" Then MsgBox(file.Extension)
忘了正则表达式。这真的有点过分和不恰当
答案 1 :(得分:2)
将此用于忽略大小写比较
If String.Compare(file.Extension, ".lnk", True) = 0 Then MsgBox(file.Extension)
对于区分大小写的比较,将true更改为false
答案 2 :(得分:2)
使用String.Equals
进行字符串比较。忽略案例使用CurrentCultureIgnoreCase
或InvariantCultureIgnoreCase
。
If String.Equals("AAA", "aaa", StringComparison.InvariantCultureIgnoreCase) Then
'more code
End If
答案 3 :(得分:0)
模块测试
Sub Main()
Dim userString As String = Nothing
Dim finalString As String = "Jacob"
Console.WriteLine("Enter username")
userString = Console.ReadLine()
If String.Compare(finalString, userString, True) = 0 Then
Console.WriteLine("Access Granted")
Else
Console.WriteLine("Access Denied")
End If
Console.ReadLine()
End Sub
结束模块