40.下列程式的執行結果為何? Function FACT(ByRef X)  Dim Y, K As Integer  Y = 1  For K = 1 To X   Y = Y * K  Next  FACT = Y End Function Private Sub Form1_Activated(…)…  Dim N As Integer = 5  MsgBox(FACT(N)) End Sub
(A)0
(B)5
(C)24
(D)120

答案:登入後查看
統計: A(2), B(2), C(3), D(1), E(0) #1081444