单选题

二元函数Z=f(x,y)中自变量x，y为100以内正整数，在Excel中Z...

Question

二元函数Z=f(x,y)中自变量x，y为100以内正整数，在Excel中Z，x，y所在单元格分别为"Z"，"X"，"Y"，若使用VBA求出z的最大值，则代码可写为（ ）

A. Sub Optimum() For x = 1 To 100 Range("X") = x If Range("Z").Value > Z Then Z = Range("Z").Value End If Next For y = 1 To 100 Range("Y") = y If Range("Z").Value > Z Then Z = Range("Z").Value End If Next MsgBox " Z的最大值为" & Z End Sub

B. Sub Optimum() For x = 1 To 100 For y = 1 To 100 Range("X") = x Range("Y") = y If Range("Z").Value > Z Then Z = Range("Z").Value End If Next Next MsgBox " Z的最大值为" & Z End Sub

C. Sub Optimum() For x = 1 To 100 Range("X") = x For y = 1 To 100 Range("Y") = y If Range("Z").Value > Z Then Z = Range("Z").Value Else: Range("Z").Value = Z End If Next x Next y MsgBox " Z的最大值为" & Z End Sub

D. Sub Optimum() For x = 1 To 100 Range("X") = x For y = 1 To 100 Range("Y") = y Z = Application.WorksheetFunction.Max(Range("Z")) Next x Next y MsgBox " Z的最大值为" & Z End Sub