һַȽϽֵ

StrComp(string1, string2[, compare])

string1 
ѡЧַʽ 
string2 
ѡЧַʽ 
Compare 
ѡָʾڼַʱʹõıȽ͵ֵʡԣִжƱȽϡйֵġá֡ 

compare ֵ

 ֵ  
vbBinaryCompare 0 ִжƱȽϡ 
vbTextCompare 1 ִıȽϡ 

ֵ
StrComp ·ֵ

 StrComp  
string1 С string2 -1 
string1  string2 0 
string1  string2 1 
string1  string2 Ϊ Null Null 

˵
ʾ StrComp ַȽϵĽΪ 1 ִıȽϣΪ 0 ʡִжƱȽϡ

Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd"   '
MyComp = StrComp(MyStr1, MyStr2, 1)   '  0
MyComp = StrComp(MyStr1, MyStr2, 0)   '  -1
MyComp = StrComp(MyStr2, MyStr1)   '  1
Ҫ
汾 1
