1樓：匿名_熱心網友
這個是郵箱嗎？？我發給你，只是我自己編的
private sub command1_click()dim shengao as integer, tizhong as integer
dim biaozhun%, shuchu$shenggao = val(text1.text)tizhong = val(text2.text)biaozhun = shenggao - 105if tizhong > biaozhun * 1.
1 thenshuchu = "偏胖，注意節食"
elseif tizhong < biaozhun * 0.9 then
shuchu = "偏瘦，增加營養"
else
shuchu = "正常，繼續保持"
end if
2樓：匿名使用者
timer1裡面寫了什麼？
實際上不是宕機，是因為
if text1.text <> "664409957650520225587754460" then
這個條件一直不滿足，所以一直在goto pp處理中。
幾乎不可能成立的條件
我遇到VB的問題，想請大師幫忙解決，謝謝
private sub timer1 timer timer1.enabled falseif label1.left 1000 then 這裡的 1000根據你的label1的長度來定.label1.left me.widthelse label1.left label1.left 20 20表示...
DOTA感覺BAT不好用啊，挺吃技術的，我SF路人局都超過神，不是手殘，但是用BAT感覺真心用不來，求解啊
五星小豬豬 看你不是新手，我就說一下思路吧。蝙蝠精髓在c，靠意識。兩級去打野，拉三波野，不斷潑油，然後開燒，這是打野思路。然後刷出跳刀配合隊友殺人，開e跳過去f住，不斷潑油，不死的話，用油粘著打他，保持好距離。團戰的話跳刀拉住對面主力，或者lion類的脆皮控制，用推推推回去，秒掉。裝備路線，先跳刀，...
關於vb的問題，請大神幫忙基本內容就是每個v都對應c 已知的v有，對應的c也知道
岔路程式緣 dim c 10 as single,v 10 as single private sub command1 click dim i as integer,j as integer form1.autoredraw true clsprint 原始資料是 print v space 3 ...