關於VB的問題,很急,大家幫幫忙啊

時間 2021-06-26 10:58:20

1樓:匿名使用者

24點還有括號吧,下面這個能解決。

public function mycalc(byval expression as string) as string

dim calc as object

set calc = createobject("msscriptcontrol.scriptcontrol")

calc.language = "vbscript"

on error goto calcerrmycalc = calc.eval(expression)exit function

calcerr:

mycalc = err.descriptionend function

private sub command1_click()msgbox mycalc(text1)

end sub

可以在text1中填寫(2+3)*5-1測試下當然,最好還是自己寫字尾表示式轉換:http://blog.

2樓:沙慧月

private sub command1_click()

select case text1

case is = "+"

label3.caption = val(label1.caption) + val(label2.caption)

case is = "-"

label3.caption = val(label1.caption) - val(label2.caption)

case is = "*"

label3.caption = val(label1.caption) * val(label2.caption)

case is = "/"

label3.caption = val(label1.caption) / val(label2.caption)

end select

end sub

大家幫幫忙了 關於古詩的,古詩問題,大家幫幫忙

春 1 天街小雨潤如酥,草色遙看近卻無。韓愈 早春呈水部張十八員外 2 碧玉妝成一樹高,萬條垂下綠絲絛。賀知章 詠柳 3 留連戲蝶時時舞,自在姣鶯恰恰啼。杜甫 江畔獨步尋花七絕句 4 沾衣欲溼杏花雨,吹面不寒楊柳風。志南 絕句 5 兩個黃鸝鳴翠柳,一行白鷺上青天。杜甫 絕句 6 西塞山前白鷺飛,桃花...

關於眼睛,大家幫幫忙,關於眼睛,大家幫幫忙。。。

雅非 翼 當然不對,弱視本身是一個發育型的眼病,也就是說在小孩出生以後,遇到了一些特殊的情況,最後就出現了弱視,並不是出生就弱視,比如講出生以後,小孩有中度或高度的遠視或者散光,或者是高度的,600度以上的近視,遠視是300度以上的遠視,這樣的小孩容易引起弱視,如果小孩一隻眼視覺發生偏斜也就是我們說...

大家幫幫忙啊 matlab問題!

這樣就可以了。for v 1 100 belta j end括號 在matlab有特殊用途,指cell矩陣。關於matlab的fgetl的問題,急求大家幫忙啊 問題是你開啟檔案根本就沒成功。對於檔案操作,不判斷開啟檔案是否成功就進行後續操作,是很不好的習慣。你前面的三行 寫的莫名其妙,filenam...