杭州交通信息网罗斯和威少哪个高:VB改错题
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/05 21:50:30
下面程序计算圆面积，其中圆半径需从文本框中输入；
private sub form_click()
Const PI=3.14159
dim s , r as Integer
r=val(text1.caption)
s=PI*r*r
print r, s
end sub
private sub form_click()
Const PI=3.14159
dim s , r as Integer
r=val(text1.caption)
s=PI*r*r
print r, s
end sub
private sub form_click()
Const PI=3.14159
dim s , r as Integer
r=val(text1.caption) //改成 r=val(text1.text)
s=PI*r*r
print r, s
end sub
输入要用文本框控件text
caption是显示用的
r=val(text1.caption)
改为
r＝val(text1.text)
就可以了。