[填空題] 運行下列程序： Dim t As Integer Private Sub Form_Click()t = 2x=Val(InputBox("輸入
2021-07-20
[填空題] 運行下列程序：
Dim t As Integer
Private Sub Form_Click()
t = 2
x=Val(InputBox("輸入一個整數(shù)5"))
Print funl(x); t
End Sub
Private Function fun1(y)
If y＞0 Then
fun1 = 1： t=10
Else If y=0 Then
fun1 = 0： t=20
Else
fun1 = -1： t=30
End If
End Function
從鍵盤為變量x輸入數(shù)據5，輸出的結果是 【8】 。
正確答案：1 10解析：[分析]： t為模塊級變量，在子函數(shù)中計算的結果10改變了主函數(shù)中的t值，fun1函數(shù)名返回的值為1。
詞條內容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領域），建議您咨詢相關領域專業(yè)人士。