Question

请问一个非常简单的VB程序问题，请问这个程序为什么错了？谢谢

希望能告诉我为什么错了，而不是仅仅告诉我什么样是正确的。我知道不应该定义单精度型，可是为什么不能定义呢？
求圆面积，窗口上已经有Text1,Text2两个文本框，还有一个command1 按钮
如下：
Private Sub command1_click()
dim r as single
s as single
r=val(text.text1)
s=3.14*r*r
Text2.text=s

Answer 1

这个错误的地方在于你定义变量类型的取值范围。各个变量类型的取值范围不一样，其值的结果也不一样（精确度）。具体的要看你想要得到的值的精度。也就是要保留小数点后几位数。

Answer 2

dim r as single
s as single

vb中不能这样定义

dim r as single
dim s as single

Answer 3

你这儿有好几个问题：
第一个问题：dim r as single
s as single
不能这样声明，而应该是
Dim r ,s as Single
或者是
Dim r as Single
Dim s as Single
第二个问题：
r=val(text.text1)
这儿写错了，应当是
r=val(text1.text)