1樓：歡妖紅
dim 體重 as single, 身高 as single, p as single
private sub command1_click()
體重 = val(
身高 = val(
p = 體重 * 100000 / 身高 ^ 3
if p < 1 then = 體型太瘦"
if p >=1 and p < then = 有點瘦"
if p >=and p < then = 標準"
if p >=and p < then = 有點胖"
if p > then = 太胖"
end sub
private sub command2_click()
unload me
end sub
2樓：匿名使用者
dim h,w,p as integerh=w=
p=w*100000/(h*h*h)
if p< then
= 太瘦！"
end if
if p< and p>= 有點瘦！"
end if
if p>= and p< thenmsgbox("標準")
end if
if p >=and p< =有點胖！"
end if
if p>= then
= 太胖！"
end if
3樓：哀健柏
好好去研究書本吧 樓主 這個問題確實很操蛋了。好好學習。
資訊科技vb練習題求解
4樓：craig_男人
一處填 end if
題目中的第二個if是第一個if的子語句 也就是說第二個if是在ph>的前提下的。
所以第一個if還缺少一個endif
5樓：網友
好像少個。
end if
您填上試試。
資訊科技有哪些分類，資訊科技的分類有哪些？
1 按表現形態的不同，資訊科技可分為硬技術 物化技術 與軟技術 非物化技術 前者指各種資訊裝置及其功能，如顯微鏡 機 通訊衛星 多 電腦。後者指有關資訊獲取與處理的各種知識 方法與技能，如語言文字技術 資料統計分析技術 規劃決策技術 計算機軟體技術等。2 按工作流程中基本環節的不同，資訊科技可分為資...
資訊科技與課程整合的實質是什麼，資訊科技與課程整合的內涵是什麼？
資訊科技 與課程整合的實質 1 資訊化。資訊科技與課程整合作為一種課程研製理論和實踐，其資訊化含義有 1 整合以一定的哲學理論心理學理論和資訊科技作為基礎，這些基礎滲透著資訊化的理念和特徵 2 整合關涉著作為課程系統要素的教師 學生 內容和環境及其結構方式，它們是以資訊科技為手段和媒介的 3 整合不...
資訊科技有哪些特徵，資訊科技包括哪些方面的內容 現代資訊科技的主要特徵是什麼
資訊科技 information technology，縮寫it 是主要用於管理和處理資訊所採用的各種技術的總稱。它主要是應用電腦科學和通訊技術來設計 開發 安裝和實施資訊系統及應用軟體。它也常被稱為資訊和通訊技術 information and communications technology,...