如何在VB6中减少文本框中的值
我是VB的新手，我需要知道它是如何完成的。 已经三年没学VB了，我记不太清楚了。 文本框中有一个值（5.43），需要减少0.34 但代码是这样的： TextBox3.Text=Val（TextBox3.Text）-0.34 我该怎么做？如何在VB6中减少文本框中的值,vb6,textbox,type-conversion,Vb6,Textbox,Type Conversion,我是VB的新手，我需要知道它是如何完成的。 已经三年没学VB了，我记不太清楚了。 文本框中有一个值（5.43），需要减少0.34 但代码是这样的： TextBox3.Text=Val（TextBox3.Text）-0.34 我该怎么做？ 这是VB 6顺便说一句，没有尝试过，但可能是： TextBox3.Text=Cdbl（TextBox3.Text）-0.34像这样 TextBox3.Text=Double.Parse（TextBox3.Text）-0.43这将在C语言中工作# 双精度数字=Co
这是VB 6顺便说一句，没有尝试过，但可能是： TextBox3.Text=Cdbl（TextBox3.Text）-0.34像这样 TextBox3.Text=Double.Parse（TextBox3.Text）-0.43这将在C语言中工作# 双精度数字=Convert.ToDouble（textBox1.Text）
数字=数字-.34 以下代码将执行此操作：
TextBox3.Text = Cstr(CDbl(TextBox3.Text) - 0.34)
Const DECREMENT_VALUE As Double = 0.34
Dim isDouble As Boolean
isDouble = IsNumeric(TextBox3.Text)
If isDouble Then
Dim newValue As Double
newValue = CDbl(TextBox3.Text)
newValue = newValue - DECREMENT_VALUE
TextBox3.Text = CStr(newValue)
Else
MsgBox "The Value was not a Double! Could not Decrement!"
End If
TextBox3.Text=CDbl（TextBox3.Text）-0.34Val（）0Val（“abcd”）试试这个。。这可能会奏效
Dim TxtValue as Integer
TxtValue = TextBox3.Text
由于TxtValue是整数，小数将自动删除。好的，我已经尝试过了，但它会返回到0。无论如何，谢谢你。帮助？在VB中尝试过，但仍然不喜欢：（我刚刚看到你对成为VB6的评论。是的，对不起。我该怎么办？他无法升级。谢谢你的帮助。那么你对Val（TextBox1.Text）有什么错误？如果我没记错的话，Val应该足够了。我上面的一个人发布了这个…TextBox3.Text=Cstr（CDbl（TextBox3.Text）-0.43）。这看起来也对。谢谢你的回答。但仍然没有。顺便说一下，这是VB6。对于VB6，请使用
CDbl（）IsNumeric（）