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