Re: VB6.0 的溢位問題
※ 引述《DRAGONLL (要研不要延)》之銘言:
: 在VB6.0中如果產生溢位的話 會跳出錯誤的訊息
: 但是我想照樣把值算出來
: 請問有辦法處理嗎??
: code======
: Private Sub Command1_Click()
: Dim c As Integer
: a = Val(Text1.Text): b = Val(Text2.Text)
: c = a + b
: Text3.Text = c
: End Sub
: ===젩
為什麼不把c宣告成long(32-bit integer)?
如果要算64bit或以上, 請自行把Text1和Text2的值先割成有最大固定
長度(這長度看你要用Integer或是Long了...), 再自行implement
"Add with carry"功能. (只是要做加數的話應不會太難...)
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 219.73.77.181
推
10/14 16:46, , 1F
10/14 16:46, 1F
→
10/14 16:47, , 2F
10/14 16:47, 2F
→
10/14 16:48, , 3F
10/14 16:48, 3F
→
10/14 16:49, , 4F
10/14 16:49, 4F
→
10/14 19:22, , 5F
10/14 19:22, 5F
推
10/14 19:33, , 6F
10/14 19:33, 6F
→
10/14 19:34, , 7F
10/14 19:34, 7F
→
10/14 19:50, , 8F
10/14 19:50, 8F
→
10/14 19:51, , 9F
10/14 19:51, 9F
討論串 (同標題文章)
Programming 近期熱門文章
PTT數位生活區 即時熱門文章