亚洲在线久爱草,狠狠天天香蕉网,天天搞日日干久草,伊人亚洲日本欧美

為了賬號安全,請及時綁定郵箱和手機立即綁定
已解決430363個問題,去搜搜看,總會有你想問的

為什么這段代碼會發生錯誤呢?如下所示:

為什么這段代碼會發生錯誤呢?如下所示:

慕碼人2483693 2023-04-22 18:14:19
其功能:Erase語句用來重新初始化靜態數組的元素,或者釋放動態數組的存儲空間。Private Sub Form_Click()Dim a() As IntegerReDim a(5)a(5) = 50Print a(5)Erase aDim b() As IntegerReDim b(5)b(5) = 100Print a(5)Print b(5)End Sub
查看完整描述

2 回答

?
白衣非少年

TA貢獻1155條經驗 獲得超0個贊

Private Sub Form_Click()
Dim a() As Integer
ReDim a(5)
a(5) = 50
Print a(5)
Erase a 這時已經刪除a了,
Dim b() As Integer
ReDim b(5)
b(5) = 100
Print a(5) 這里你還用a,當然會出錯
Print b(5)
End Sub

查看完整回答
反對 回復 2023-04-25
?
慕萊塢森

TA貢獻1810條經驗 獲得超4個贊

第二個Print a(5)出錯,Erase 釋放動態數組所使用的內存。在下次引用該動態數組之前,程序必須使用ReDim語句來重新定義該數組變量的維數。需在第二個Print a(5)前使用redim.

查看完整回答
反對 回復 2023-04-25
  • 2 回答
  • 0 關注
  • 201 瀏覽

添加回答

舉報

0/150
提交
取消
微信客服

購課補貼
聯系客服咨詢優惠詳情

幫助反饋 APP下載

慕課網APP
您的移動學習伙伴

公眾號

掃描二維碼
關注慕課網微信公眾號