[填空題] 有一個(gè)過程如下： Sub Sub1(m As Integer，total As Long) Dim i AS Integer total=1
2021-07-20
[填空題] 有一個(gè)過程如下： Sub Sub1(m As Integer，total As Long) Dim i AS Integer total=1 For i=1 To m total=total*i Next End Sub 調(diào)用它的事件過程如下： Private Sub Command1_Click() Dim tot As Long，a As Integer a=Val(InputBox("請(qǐng)輸入數(shù)據(jù)")) Call Subl(a,tot) Print tot End Sub 則輸入數(shù)據(jù)5，運(yùn)行結(jié)果為______。
正確答案：120
參考解析：[命題目的] 考查考生對(duì)過程中參數(shù)傳遞方式的掌握情況。 [解題要點(diǎn)] 本題的難點(diǎn)是實(shí)參與形參的傳遞問題。total按ByRef參數(shù)傳遞。子過程的功能是計(jì)算n!，題中輸入5，因此5!=120。 [錯(cuò)解分析] 參數(shù)按傳值方式傳遞時(shí)，不改變實(shí)參中的值；按傳地址的方式傳遞時(shí)，實(shí)參和形參指向的內(nèi)容被改變。 [考點(diǎn)鏈接] 參數(shù)傳遞方式的概念和應(yīng)用。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。