跪求VB高手幫忙

時間 2022-02-24 09:50:21

1樓:天天過節

private sub command1_click()a = mid(text1.text, 1, 1)b = mid(text1.text, 2, 1)c = mid(text1.

text, 3, 1)if a > b then t = a: a = b: b = tif a > c then t = a:

a = c: c = tif b > c then t = b: b = c:

c = ttext2.text = a & b & cend sub

2樓:匿名使用者

private sub command1_click()dim i, s, t as integerdim sum, b, c, d, e as integerdim a as variant

private sub form_load()e = val(text1.text)

b = e / 100

c = (e - a * 100) / 10這最後一句中的變數a出現的過早?

數學問題 跪求高手幫忙,數學問題 跪求高手幫忙

假設全部是甲種票,那麼總共應該是30 30 900元與實際相差900 815 85元 可見有乙種票85 30 25 17張,這是因為每張乙種票算成甲種票時多算了5元 於是甲種票有30 17 13張 甲13 乙17 由題意得 甲 乙 30,一式 30 甲 25 乙 815,二式 一式可算得 30 甲 ...

跪求高手幫忙組裝一臺電腦,跪求高手幫忙組裝一臺電腦

2k級高價效比 cpu intel 奔騰雙核 e2140 散 1 305 主機板 致銘 zm blg31d lm 1 269 記憶體 威剛 1gb ddr2 800g 遊戲威龍 1 105 硬碟 希捷 250gb 7200.12 8m 1 270 光碟機 建興 ihdp118 26 1 110 液晶...

物理高手幫幫忙!跪求次題,物理高手幫幫忙!跪求次題

mg m m a a m m g v at t v a vg m m v沙袋 gt vg 2 m m 設浮力為f 勻速下降時f mg 釋放沙袋後勻減速f m m g m m a 1 求出a代入公式v at可以求出時間 最後結果是t m m v mg 沙袋做豎直上拋運動,全過程看為勻減速運動 有公式v...