不用錯誤分支語句：
Sub 分數(shù)統(tǒng)計（）
Dim a%
For a = 2 To 8
If Cells（a, 2） = "未考" Or Cells（a, 3） = "未考" Then
Cells（a, 4） = ""
Else
Cells（a, 4） = Cells（a, 2） + Cells（a, 3）
End If
Next
End Sub
@ 倒背如流的派 Sub 分數(shù)統(tǒng)計（）
Dim i%
For i = 2 To 8
If Cells（i, 2） = "未考" Or Cells（i, 3） = "未考" Then
Cells（i, 4） = ""
Range（"a" & i & ":d" & i）.Interior.ColorIndex = 3
Else
Cells（i, 4） = Cells（i, 2） + Cells（i, 3）
End If
Next
End Sub
承擔因您的行為而導致的法律責任，
本站有權(quán)保留或刪除有爭議評論。
參與本評論即表明您已經(jīng)閱讀并接受
上述條款。