vb中可以使用+連接字符串,
成都創(chuàng)新互聯(lián)公司憑借專業(yè)的設(shè)計團隊扎實的技術(shù)支持、優(yōu)質(zhì)高效的服務(wù)意識和豐厚的資源優(yōu)勢,提供專業(yè)的網(wǎng)站策劃、成都網(wǎng)站建設(shè)、成都網(wǎng)站設(shè)計、網(wǎng)站優(yōu)化、軟件開發(fā)、網(wǎng)站改版等服務(wù),在成都十年的網(wǎng)站建設(shè)設(shè)計經(jīng)驗,為成都上千家中小型企業(yè)策劃設(shè)計了網(wǎng)站。
也可以使用連接字符串,
建議使用連接字符串,以區(qū)別數(shù)學運算符+。
調(diào)用 腳本解析引擎,
textbox2.text=Eval(textbox1.text).ToString()
Function?Eval(ByVal?Expressions?As?String)?As?Double
Dim?Mssc?=?CreateObject("MSScriptControl.ScriptControl")
Mssc.Language?=?"vbscript"
Return?CDbl(?Mssc.Eval(Expressions))
End?Function
不喜歡上面提示的警告的話
textbox2.text=EvalString(textbox1.text)
Function?EvalString(ByVal?Expressions?As?String)?As?String
dim?oType?=?System.Type.GetTypeFromProgID("MSScriptControl.ScriptControl")
Dim?o?=?System.Activator.CreateInstance(oType)
oType.InvokeMember("Language",?System.Reflection.BindingFlags.SetProperty?,?Nothing,?o,New?Object(){?"vbscript"})
Return?oType.InvokeMember("Eval",?System.Reflection.BindingFlags.InvokeMethod,?Nothing,?o,?New?Object(){Expressions}).ToString()
End?Function
Eval 在VB中使用,剛找到的_vb吧_百度貼吧
先幫你糾正幾個錯誤,l += l相當于 l = l+1,但是,
l += l + “4”肯定是錯的,你可以寫成
l = l + 1 + 4,也可以寫成l = l + 5(如果你要表達這個意思的話)
因為你之前將l定義為integer類型,就可以用l直接和整數(shù)進行計算,而在vb.net中,引號""里的內(nèi)容一般是被識別為string型的,integer型和string型是不能進行計算的,string是字符串型,在vb.net中字符串的連接是用 符號,例如:
dim i as string
i = "1" "4"
那么i的結(jié)果就是"14",而這個“14”是字符串型的
string類型不能隱式轉(zhuǎn)換為integer,所以當進行運算
dim l as integer
l = l+"4"時,會報錯,解決方法:將"4"轉(zhuǎn)換為integer類型;更簡單的解決方法:把"4"的引號去掉!
哈哈哈,看完了的話你就厲害,我就是喜歡說些廢話