我输入的选择结果是“ABCD“，我用什么函数或者方法可以判断和正确结果”A，B，C，D“是否相同呢？

取字符串
如
Dim AnStr
AnStr="A,B,C,D"
Dim QuStr
Dim QuTStr
QuStr="ABCD"
Dim i
For i=1 To Len(QuStr)
QuTStr=Mid(QuStr,1,i)&","
Next
QuTStr=Mid(QuTStr,1,Len(QuTStr)-1)
IF QuTStr=AnStr Then
Response.Write "答案正确"
Else
Response.Write "答案错误"
End iF

Dim AnStr
AnStr="A,B,C,D"
Dim QuStr
QuStr="ABCD"
AnStr=Replace(AnStr,",","")
IF QuStr=AnStr Then
Response.Write "答案正确"
Else
Response.Write "答案错误"
End iF

楼上的也应该可以这样写的。