2、在Visual Basic的程式中，定義了一個遞迴函數X如下所示，則MsgBox(X(5))的結果為何_______(2)_______？（沒有演算過程，不予計分） Function X(N) 　　If N = 0 Then 　　　　X = 0 　　Else 　　　　X = X(N - 1) + N 　　End If End Function

6、請填入空白處，使程式能依據輸入的身分證字號來判斷性別， Sub Check_id(ByVal S_id As String) 　 Dim gender As Integer 　　gender = mid( __(6)___, 2, 1) 　　If gender = 1 Then 　　　　MsgBox("男性", , "判斷性別") 　　ElseIf gender = 2 Then 　　　　MsgBox("女性", , "判斷性別") 　　End If End Sub Private Sub Form1_Activated(…) Handles Me.Activated 　　Dim id As String 　　id = InputBox("請輸入身分證字號：", "判斷性別") 　　Call _____(7) ___ End Sub

題組內容

2、在Visual Basic的程式中，定義了一個遞迴函數X如下所示，則MsgBox(X(5))的結果為何_(2)_？（沒有演算過程，不予計分） Function X(N) 　　If N = 0 Then 　　　　X = 0 　　Else 　　　　X = X(N - 1) + N 　　End If End Function

其他申論題

題組內容

2、 在Visual Basic的程式中，定義了一個遞迴函數X如下所示，則MsgBox(X(5))的結果為何_______(2)_______？（沒有演算過程，不予計分） Function X(N) If N = 0 Then X = 0 Else X = X(N - 1) + N End If End Function

其他申論題

2、在Visual Basic的程式中，定義了一個遞迴函數X如下所示，則MsgBox(X(5))的結果為何_(2)_？（沒有演算過程，不予計分） Function X(N) 　　If N = 0 Then 　　　　X = 0 　　Else 　　　　X = X(N - 1) + N 　　End If End Function