Question

怎样在VB中将文本转换成数值

假如你输入(1+23)^3/9-(0.5*6)点一下按钮，就会输出结果。

Answer 1

1、首先在电脑中找到并打开VB软件，找到一句输出的函数。

2、然后在其数组变量中，套上一个Str函数。

3、这里注意函数的关键字，是没有区分大小写的。

4、然后函数是可以多个嵌套使用。

5、最后点击运行按钮，这样就可以成功运行测试，如下图所示，转换就完成了。

Answer 2

可以使用一个函数来计算。

Function Eval(ByVal str As String) As Double
Set Mssc = CreateObject("MSScriptControl.ScriptControl")
Mssc.Language = "vbscript"
Eval = Mssc.Eval(str)
End Function

调用方法：

将以上代码放入通用中；

在相应事件(click)中加入以下代码：

text2.text = eval(text1.text)

'注：text1为输入算式的文本框，text2为输出文本框。

Answer 3

在VB中，我给出几个常用转换函数。
（1）Val（字符串函数）：将字符串转换为数值，如;2+Val("12")的结果是14
（2）Str（数值）：将数值转换为字符串，如：Str（5）的结果为“5”
（3）Asc（字符）：求字符对应的字符代码，如：Asc（A)的结果为65
（4）Cint（表达式）：将表达式的结果转换为整数，小数部分四舍五入，如：Cint（3.1415926535*2)的结果为6

Answer 4

这涉及到表达式计算了，不是简单一两行代码就搞得定的。
记得以前做过一个简单的表达式计算的，你一定要的话我去找找

Answer 5

根据你的假如，这个问题实际已经不仅仅是将文本转换成数值那样简单了。