Sub 过程名（）
Dim RS As Integer
RS = 1
Do While Cells（RS, 2） <> ""
RS = RS + 1
If Cells（RS, 2） >= 90 Then Cells（RS, 3） = "对"
Loop
End Sub
Dim RS As Integer
RS = 1
Do While Cells（RS, 2） <> ""
RS = RS + 1
If Cells（RS, 2） >= 90 Then Cells（RS, 3） = "对"
Loop
End Sub
本站有权保留或删除有争议评论。 参与本评论即表明您已经阅读并接受上述条款。