再请教版主一个最大值问题

结果的进入事件中加入下面的代码

Private Sub 结果_Enter()
If Abs(A) <= F Or Abs(B) <= F Or Abs(C) <= F Or Abs(E) <= F Or Abs(最大差) <= F Then
 结果 = "不合格"
End If
If Abs(A) >= G Or Abs(B) >= G Or Abs(C) >= G Or Abs(E) >= G Or Abs(最大差) >= G Then
 结果 = "合格"
End If
End Sub