請問VB問題

[News Server]

以下程式要計算出 3^700 的值，請問該怎麼解決溢位的問題?? 謝謝大家

Private Sub Form_Load()

Dim Index As Integer
Dim Number As Variant
'請問 Number 應該設為什麼資料型態，才不會發生溢位的情形
'^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

Number = 1
Index = 1

For Index = 1 To 700
Number = Number * 3
Next

Answer.Text = Number
'Answer 是 TextBox 的 Name

End Sub

[即將留級的廢物]

※ 引述《"News Server" <b550...@ms.cc.ntu.edu.tw>, 看板: oop》之銘言：
: 以下程式要計算出 3^700 的值，請問該怎麼解決溢位的問題?? 謝謝大家

: Private Sub Form_Load()
: Dim Index As Integer
: Dim Number As Variant
: '請問 Number 應該設為什麼資料型態，才不會發生溢位的情形
: '^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

用VB內建應該的資料型態應該都無法避免
請用陣列作大數
: Number = 1

: Index = 1
: For Index = 1 To 700
: Number = Number * 3
: Next
: Answer.Text = Number
: 'Answer 是 TextBox 的 Name
: End Sub

--
※ Origin: 程式設計樂園 ◆ From: statexp.math.fju.edu.tw