pravite sub command1_Click()
dim n%
n=inputbox("請輸入一個(gè)整數(shù)","輸入整數(shù)")
if n mod 3=0 and n mod 7=0 then
print "A"
else
print "B"
end if
end sub
vb輸入1個(gè)整數(shù) 判斷能否被3和7整除,若能輸出A 不能輸出B
vb輸入1個(gè)整數(shù) 判斷能否被3和7整除,若能輸出A 不能輸出B
我需要正確的代碼.
我需要正確的代碼.
其他人氣：281 ℃時(shí)間：2019-09-09 18:02:41
優(yōu)質(zhì)解答
我來回答
類似推薦
- vb 編程 計(jì)算100~300之間所有能被3和7整除的數(shù)之和,求代碼
- vb程序設(shè)計(jì),找出所有三位數(shù)中,能同時(shí)被3和7整除.
- vb中用inputbox函數(shù)輸入一個(gè)整數(shù)后,判斷次數(shù)能同時(shí)被3和5整除,還是只被其中之一整除.
- 用VB,輸出1到100之間能被3或7整除,但不能同時(shí)被3和7整除的整數(shù),且每七個(gè)數(shù)換一行.
- vb中通過inputbox輸入一個(gè)整數(shù)后,判斷此數(shù)能同時(shí)被3和5整除,還是只被其中之一整除
- 但是現(xiàn)在上初2了 沒有太多的時(shí)間去購物了 用英語怎么說?
- 希望小學(xué)舉行“慶國慶60周年征文”比賽,五年級有14人參加,六年級有21人參加,比賽結(jié)束后,
- 英語翻譯
- 請幫出百分?jǐn)?shù)方程10題
- 英語翻譯
- 關(guān)于細(xì)胞質(zhì)的結(jié)構(gòu)和功能
- 如圖，已知四邊形中的兩條邊的長度，求四邊形的面積．
猜你喜歡
- 1正6邊形的面積計(jì)算公式,誰知道說一下,
- 2入射角和反射角不相等的原因?在什么情況下,入射角不等于發(fā)射角?
- 3鋁鐵在濃硝酸中鈍化表面所形成的氧化物薄膜主要是由什么物質(zhì)構(gòu)成的,其結(jié)構(gòu)是怎樣的?
- 4蘇軾評價(jià)
- 5英語翻譯
- 6兩小無猜,具體怎么解釋
- 7誰給我一份原子團(tuán)化合價(jià)表
- 8英語中什么叫“懸垂修飾語”?
- 9(1)在一幅比例尺是1:2500000的地圖上,量得天津到北京的距離是4.8厘米.天津到北京的實(shí)際距離大約是多少千米?
- 10初一3個(gè)班為小學(xué)捐書,
- 11x²+1＜ax+a分之x a不等于 解不等式
- 12世界人均占有森林面積大約是0.65公頃，相當(dāng)于我國人均占有森林面積的5倍．我國人均占有森林面積大約是多少公頃？（列方程解答）