Private Sub Command1_Click()
Dim bj As Single
Dim zz As Single
Dim mj As Single
bj = CSng(Text1.Text)
If bj
输入半径,用VB编写计算圆面积和圆周长的程序
输入半径,用VB编写计算圆面积和圆周长的程序
为保证程序运行的正确,对输入的半径进行合法检查,数据检查调用ISNUMERIC函数,利用MSGBOX先是出错信息,结果保留两位小数.要求面积和周长用两个COMMAND完成.半径用一个标签控制输入.
为保证程序运行的正确,对输入的半径进行合法检查,数据检查调用ISNUMERIC函数,利用MSGBOX先是出错信息,结果保留两位小数.要求面积和周长用两个COMMAND完成.半径用一个标签控制输入.
其他人气:918 ℃时间:2020-02-06 11:45:43
优质解答
我来回答
类似推荐
猜你喜欢
- 1词的适当形式填空By the time I got to the cinema, the film ________________ (begin)
- 2如图,△ABC中,AD是∠CAB的平分线,且AB=AC+CD,求证:∠C=2∠B.
- 3汽车和火车的速度比是4:7.两车同时从两地相向而行,在离中点15千米处相遇,这是火车行了()千米,两地相
- 4修一段公路,甲队独修要6天完成,乙队独修要4天完成.两队合修( )天完成.
- 5六(1)班的学生有50人,今天的出勤率为98%,今天缺勤几人?
- 6Imagine and describe the new students in your class
- 7怎样区分阴离子与阳离子?
- 8英语句子的变一般疑问句,还有一些词的过去式,一些词的ing形式.谢谢好心的人.
- 9为什么充满氧气的集气瓶要正放
- 10It takes me (two hours )read books every day.对括号里的提问