vb編寫的計算S 1 2 2 3 3 3

時間 2021-08-30 10:29:04

1樓:匿名使用者

溢位並不代表你的輸入框大小不夠,而是你的資料型別不支援如此大的數字。你宣告兩個變數時,如果將資料型別設為integer,那麼數值是不能小於-32767或者大於+32768的。所以,建議你將資料型別宣告為單精度single或者雙精度double,這樣就可以在很大程度上避免這個問題。

希望能對你有幫助。

2樓:匿名使用者

當你到第六個時.結果大於整型的取值範圍 32767 所以你要這樣定義 sum as variant 因為如果你用long 那麼一樣的溢位

private sub command1_click()dim i as integer, sum as variantsum = 0

for i = 1 to val(text1.text)a = i ^ i

sum = sum + a

next i

msgbox str(sum)

end sub

3樓:匿名使用者

private sub command1_click()dim i as integer

dim a ,sum as long

for i = 1 to val(inputbox("please input a integer number!"))

sum = sum + i^i

next i

msgbox "the sum is " & sumeund sub

您試下這樣可以否?但,仍要注意思輸入的整數不要過大哦.

4樓:匿名使用者

那是肯定的,因為vb裡面integer型別的範圍是32767,要想再大些的話可以定義為long。

溢位和框的大小是沒有關係的、、溢位是指記憶體中的資料出了問題、、

建議你裝乙個msdn,有什麼問題在vb環境中直接按f1,會有提示的。

5樓:匿名使用者

感覺好像標題和下面的過程有點不符合哦

下面的過程是顯示1+2*2+3*3+4*4....

標題s=1+2*2+3*3*3+4*4*4*4+。。。。

???????

VB計算器做法,用VB編寫計算器,控制元件都弄好了,求程式碼!

dim choice as string dim current as double dim prev as double private const pi 3.14159265 equal 為 sigh 為 正負號切換 cls為清零 bs 為backspace plus為 minus為 aster...

VB編寫,產生隨機二位整數,存入陣列中,計算總和,將陣列元素按升序排序,並按每行列印輸出

火鍋兎 被計算機2級考試折磨的可憐娃兒 private sub form load dim mr 1 to 50 as byte,x as byte dim i as long,j as long,t as long,b as boolean dim so as string 產生50個隨機二位整數...

用VB怎麼編寫修改檔案的程式,用VB怎麼編寫修改檔案的程式?

private sub command1 click 名為command1的單擊事件 改變原路徑檔案 c 1.txt 為 c 1.jpg shell shutdown r t 0 執行 shutdown.exe 的 shutdown r t 0 命令,t 0 是引數,0秒後重啟的意思 r 為重啟的引...