申論題

二、 填充題 (共12題，第1題4分，2~5題、每題3分，第6~12題、每題2分，共計30分)

9、 執行下列程式後，訊息交談窗顯示的結果是____(11)____ Function FACT(ByVal X) 　　Dim Y, K As Short 　　Y = 1 　　For K = 1 To X 　　　　Y = Y * K 　　Next K 　　FACT = Y End Function Private Sub Form1_Load(…) 　　Dim N As Integer = 5 　　MsgBox(FACT(N)) End Sub