十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
vb中可以使用+连接字符串,
成都创新互联公司凭借专业的设计团队扎实的技术支持、优质高效的服务意识和丰厚的资源优势,提供专业的网站策划、成都网站建设、成都网站设计、网站优化、软件开发、网站改版等服务,在成都十年的网站建设设计经验,为成都上千家中小型企业策划设计了网站。
也可以使用连接字符串,
建议使用连接字符串,以区别数学运算符+。
调用 脚本解析引擎,
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直接和整数进行计算,而在vb.net中,引号""里的内容一般是被识别为string型的,integer型和string型是不能进行计算的,string是字符串型,在vb.net中字符串的连接是用 符号,例如:
dim i as string
i = "1" "4"
那么i的结果就是"14",而这个“14”是字符串型的
string类型不能隐式转换为integer,所以当进行运算
dim l as integer
l = l+"4"时,会报错,解决方法:将"4"转换为integer类型;更简单的解决方法:把"4"的引号去掉!
哈哈哈,看完了的话你就厉害,我就是喜欢说些废话