Question

下面程序运行的结果是1，为什么不是-1呢？谢谢。

Private Sub Command1_Click()
a = StrComp("ABCD", "AASDFGbcg")
Print a
End Sub

Answer 1

strComp（S1,S2）函数是对比函数： 当s1<s2时，返回值<0 当s1=s2时，返回值=0 当s1>s2时，返回值>0
两个字符串自左向右逐个字符相比（按ASCII值大小相比较）
比较至第二个字符"B”的ASCII>“A”的ASCII,返回1