StrComp Function
แแแแ แแแก แแ แกแขแ แแแแก แแ แแแ แฃแแแแก แแแขแแแแ แแก แแแแจแแแแแแแแก แ แแแแแแช แฌแแ แแแแแแแก แจแแแแ แแแแก แจแแแแแก.
แกแแแขแแฅแกแ
StrComp (Text1 As String, Text2 As String[, Compare])
แแแแ แฃแแแแฃแแ แแแแจแแแแแแแ:
Integer
Parameter:
แขแแฅแกแขแ1: แแแแแกแแแแ แ แกแขแ แแแแฃแแ แแแแแกแแฎแฃแแแแ
แขแแฅแกแขแ2: แแแแแกแแแแ แ แกแขแ แแแแฃแแ แแแแแกแแฎแฃแแแแ
Compare: แแแ แแแแขแ แ แ แแแแแแช แแงแแแแแก แจแแแแ แแแแก แแแแแแก. แแฃ Compare = 1, แกแขแ แแแแแแแก แจแแแแ แแแ แแแแแ แฉแแแก แแแ แแ แแแขแแ แ แแกแ-แแแจแแแแก. แแฃ Compare = 0, แจแแแแ แแแ แแ แแแแ แฉแแแก แแแ แแ แแแขแแ แ แแกแ-แแแจแแแแก.
แแแแ แฃแแแแฃแแ แแแแจแแแแแแแ:
-
แแฃ Text1 < Text2 แคแฃแแฅแชแแ แแแ แฃแแแแก -1
-
แแฃ Text1 = Text2 แคแฃแแฅแชแแ แแแ แฃแแแแก 0
-
แแฃ Text1 > Text2 แคแฃแแฅแชแแ แแแ แฃแแแแก 1
แแแแแแแแ:
Sub ExampleStrComp
Dim iVar As Single
Dim sVar As String
iVar = 123.123
sVar = Str$(iVar)
MsgBox strcomp(sVar , Str$(iVar),1)
End Sub