• Comp

Result = Comp ( String1 AS String , String2 AS String [ , Mode AS Integer ] ) AS Integer

2つの文字列を比較して返します。

1. 2つの文字列が等しい場合は0
2. String1が厳密にString2より大きい場合は1。
3. String1がString2よりも厳密に小さい場合は-1。

 

Modeパラメーターは、Comparison methods ページで定義された任意の組み合わせにすることができます。

Examples

Dim command As String = "open"
If Comp(command, "open") = 0 Then Print "open_file"

 

Dim UserName As String

Print "Please Enter Your User Name:";
Input UserName

If Comp(UserName, "Akiti") = 0 Then
Print "You Can Enter"
Else
Print "Sorry, You Cannot Enter"
Endif

 

'これは例示的な例です。
'ファイルを実際に削除するには、適切なコードを書く必要があります。

Dim answer As String

Print "Do you want to delete the file? [y/n]"
Input answer

If Comp(answer, "y", gb.IgnoreCase) = 0 Then

'......（ファイルを削除するためのコード）
 '......
 '......

'成功すると、次のメッセージが表示されます。
 Print "File Deleted"

Else
Print "File Not Deleted"
Endif

See also

• String.Comp

• String Functions

• Comparison methods