StrComp Function
λ λ¬Έμμ΄μ λΉκ΅νκ³ λΉκ΅ κ²°κ³Όλ₯Ό λνλ΄λ μ μ κ°μ λλ € μ€λλ€.
ꡬ문:
StrComp (Text1 As String, Text2 As String[, Compare])
λ°ν κ°:
Integer
λ§€κ° λ³μ:
Text1: μμμ λ¬Έμμ΄ μμ λλ€.
Text2: μμμ λ¬Έμμ΄ μμ λλ€.
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