单选题 下述程序的功能是______。
x=" ((a+B* A)-(a* b+C)"
n=Len(x)
m=0
For k=1 To n
p $=Mid(x, k, 1)
If p $="("Then
m=m-1
ElseIf p $=")"Then
m=m+1
End If
Next k
If m＞0Then
print ": - ("
Else
print ": - )"
End If