主题：窗口空间计算问题

上传项目,在窗口控件TextBox1的KeyDown事件中输入下面的代码

Dim zf As String = Val(e.Sender.Text)
Dim gt As Double = Val(e.Form.Controls("TextBox2").Text)
If zf <> "" Then
    e.Form.Controls("TextBox3").Text = Format(zf * gt,"n")
Else
    e.Form.Controls("TextBox3").Value = ""
End If

e.Form.Controls("TextBox3").Value = ""当TextBox1控件数值都清除点后这行代码的条件一直达不到,请教老师要怎么改代码?

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目26.zip