ignorecase を ON にしてこの比較を行う簡単な方法はありますか?
If file.Extension = ".Lnk" Then MsgBox(file.Extension)
私がやろうとしているのは、すべての「.lnk」または「.LNK」または「.lNk」または「.Lnk」などを取得することです...
これはおそらくRegExを使用していることは知っていますが...その例の簡単な方法はありますか?
読んでくれてありがとう
ignorecase を ON にしてこの比較を行う簡単な方法はありますか?
If file.Extension = ".Lnk" Then MsgBox(file.Extension)
私がやろうとしているのは、すべての「.lnk」または「.LNK」または「.lNk」または「.Lnk」などを取得することです...
これはおそらくRegExを使用していることは知っていますが...その例の簡単な方法はありますか?
読んでくれてありがとう
ToLower を使用して拡張子を小文字に変換し、比較します
If file.Extension.ToLower = ".lnk" Then MsgBox(file.Extension)
そして、これについては正規表現を忘れてください。それは本当にやり過ぎで不適切です
String.Equals
文字列比較に使用します。大文字と小文字を区別しない場合はCurrentCultureIgnoreCase
、またはを使用しますInvariantCultureIgnoreCase
。
If String.Equals("AAA", "aaa", StringComparison.InvariantCultureIgnoreCase) Then
'more code
End If
大文字と小文字の比較を無視するためにこれを使用します
If String.Compare(file.Extension, ".lnk", True) = 0 Then MsgBox(file.Extension)
大文字と小文字を区別する比較のために true を false に変更します
モジュールテスト
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
エンドモジュール