VB 代碼計算能被3或者5整除數(shù)三位數(shù)之和
VB 代碼計算能被3或者5整除數(shù)三位數(shù)之和
Dim i As Integer,x As Integer
For i = 100 To 999
If i Mod 3 = 0 And i Mod 5 = 0 Then
x = x + i
End If
Next i
Label1.Caption = x
應(yīng)該是x=x+i出問題了
Dim i As Integer,x As Integer
For i = 100 To 999
If i Mod 3 = 0 And i Mod 5 = 0 Then
x = x + i
End If
Next i
Label1.Caption = x
應(yīng)該是x=x+i出問題了
其他人氣：441 ℃時間：2020-01-29 00:51:25
優(yōu)質(zhì)解答
x要定義長整數(shù) 就是long沒明白什么意思。。。dim x as longinteger只能到32767 你這個編碼中X超出這個值了 用LONG吧
我來回答
類似推薦
- VB程序求出各位數(shù)為6且能被3整除的三位數(shù)共有多少個?
- vb程序 個位數(shù)為6,能被3 整除,且十位數(shù)是偶數(shù)的三位數(shù)共有多少個 要數(shù)字顯示出來的
- 從1、2、3、4、5、6這六個數(shù)字中任取3個組成三位數(shù),其中能被6整除的有幾個 用VB程序怎么編
- vb程序設(shè)計,找出所有三位數(shù)中,能同時被3和7整除.
- 用VB求100到999之間個位數(shù)是3且能被7整除的數(shù)并輸出
- 加點字讀音全都相同的一項是（ ） A．商酌 燒灼 著迷 遠見卓識 B．喧鬧 渲染 漩渦 頭暈?zāi)垦?/a>
- 袋子里的紅球是白球的3倍,從袋子里取出白球和紅球,每次取出白球3個、紅球5個.取了若干次后,白球剛好取玩,紅球還剩44個,問有白球和紅球各幾個?
- y''=f（x,y'）這里括號代表什么意思,關(guān)于x y‘的函數(shù)?
- 李大爺用51.4米長的籬笆圍成一個半圓形雞舍,雞舍的面積有多大? (急呀!)
- 蒼穹的近義詞
- 一堆木頭,堆放成了梯形,下層堆放了12根,上層堆放了5根,一共堆放了5層,一共有幾根?
- 如何知道地核主要由高密度的鐵鎳合金組成?
猜你喜歡
- 1學(xué)會忘記是生活的技術(shù),學(xué)會微笑是生活的藝術(shù)!
- 2怎樣求絕對值
- 3求 給心理老師的一封信 為題寫一封信
- 4成語對對子 粗茶淡飯（ ） 流芳百世（ ) 雪中送炭（ ）伶牙俐齒（）眉開眼笑（）精雕細刻
- 5為什么大象用鼻子吸水不會嗆著?
- 6一個能裝下500g水的瓶子能否裝下500g的酒精,若不能裝下最多能裝下多少克酒精
- 71.1995×1996.1996-1996×1995.1995
- 8在實驗中,如果不能確定電流表的量程,則應(yīng)該采用()法
- 9一個數(shù)的5倍等于2.4,求這個數(shù)是多少?解方程
- 10可逆反應(yīng)的定義
- 11如圖 D是BC延長線上一點,角ABC,角ACD的平分線交與E,求證角E=1/2角A
- 12物體只受一個力（比如只受重力）在做什么運動?