VB程序题:输入半径,计算圆周长和圆面积,如下图所示。

进一步要求,为了保证程序运行的正确,对输入的半径要进行合法性检查,数据检查调用IsNumeric函数,参阅教材例2.5;若有错,利用MsgBox显示出错信息,如下图所示。通过Focus方法定位于出错的文本框处,重新输入;计算结果保留2位小数。

数据输入结束有两种方法,分别编写事件过程对数据进行检验:

1.按Tab键,检查数据的合法性,这时利用Text1_LostFocus事件。

2.按Enter键,利用Text1_KeyPress事件,返回参数“KeyAscii”的值为13表示输入结束。

解题:

Private Sub Command1_Click()

Label2 = Format(Val(Text1) * Val(Text1) * 3.14, "0.00")

End Sub

Private Sub Command2_Click()

Label3 = Format(Val(Text1) * 3.14 * 2, "0.00")

End Sub

Private Sub Text1_LostFocus()

If IsNumeric(Text1.Text) = False Then MsgBox "有非法数字字符,请重新输入!"

End Sub

程序运行效果如下图所示。

Visual Basic程序设计教程(第3版) (龚沛曾等编)课后实验源码

来源:济亨网

php编程已知半径求圆周长面积,VB程序题:输入半径,计算圆周长和圆面积,如下图所示。...相关推荐

  1. C语言已知三边求三角形的面积

    #include<stdio.h> #include<math.h> int main() { double a,b,c,p;scanf("%lf%lf%lf&quo ...

  2. 税收问题的分析:已知税后收入求税前、年终奖一元陷阱的分析

    早上家里来了个客人,聊天中得知了他的税后收入于是蛮好奇他的税前收入是多少. 顺便开了一下脑洞,想证明一下当前年终奖税收模型下,是否存在合理的税率及税收安排,使得"一元陷阱"得以避免 ...

  3. C语言初步-顺序结构-已知三边求三角形面积-余弦定理

    已知三边求三角型的面积,作为C语言程序设计课程的一个题目,必然是不超纲的. 在数学上,学生应该能够用高中的知识加以解决. 如下图所示,已知三角形三条边a.b.c,只要知道 c 边上的高h,那么面积 s ...

  4. c语言编程题输入两个直角边,C语言编程 直角三角形已知两边求第三边

    C语言编程题 求大神解答 好久没写C了,不知道对不对:intsum=0;intindex=0;for(;indexsum+=a[2][index];}returnsum; C语言编程题,求分段函数 刚 ...

  5. 已知序列求蝶形运算_数字信号处理习题集

    数字信号处理习题集 一.单项选择题1数字信号的特征是 A.时间离散.幅值连续 B.时间离散.幅值量化C.时间连续.幅值量化 D.时间连续.幅值连续2若一线性移不变系统当输入为 xnn 时,输出为 yn ...

  6. 已知序列求蝶形运算_在N=32的基 2 时间抽取发 FFT 运算流图中,从 到 需______级蝶形运算过程。 (4.0分)_学小易找答案...

    [单选题]互相关函数性质正确的是: [计算题]两个有限长的复序列 x[n] 和 h[n] ,其长度分别为 N 和 M ,设两序列的线性卷积为 y[n]=x[n]*h[n] ,回答下列问题: (1) 序 ...

  7. C - Cardboard Container Gym - 102007C(已知体积求表面积)

    C Cardboard Container Fidget spinners are so 2017; this years' rage are fidget cubes. A fidget cube ...

  8. c语言已知xy求z,C语言运算已知x=3.2,y=7,z=2,计算y 3*x-2的值并输出

    x>=y>=z c语言 z>=y>=x;的意思是先求z>=y的值也就是4>=4;这个结果是真,也就是1然后求1>=x也就是1>=3,结果是假.就是0只要 ...

  9. java类求圆的面积周长_java编程 1. 设计一个求圆的面积和周长的类,要求:1计算当半径r,JAVA编程题。编写一个应用程序计算圆的周长和面积,设圆的半...

    问题标题 java编程 1. 设计一个求圆的面积和周长的类,要求:1计算当半径r,JAVA编程题.编写一个应用程序计算圆的周长和面积,设圆的半 2019-5-23来自ip:15.196.194.53的 ...

最新文章

  1. 无线AP与无线交换机的区别
  2. Python面试题大全(五):测试、大数据、数据结构、架构
  3. 【留言板 Message Board】
  4. 在线验证json字符串
  5. 测网速还能拿奖励?测速 App 的新玩法
  6. oracle 修改子分区,Oracle子分区(sub partition)操作
  7. 阿里发力硬件,先做路由器再造电视机
  8. unity3d的下载与安装
  9. oracle中累计求和_oracle累计求和
  10. [UE4] LogicDriver状态机基于管线(Conduit)的状态选择器
  11. 教你从0开始部署华为云服务器_华为云服务器搭建
  12. 最新安卓官方api文档完整版
  13. 小米平板4 Plus简单刷成开发版获取Root超级权限的流程
  14. aso标题关键词可以重复吗
  15. OUC_SE_Group04_Blog3
  16. Mybatis反射实现装载Mapper
  17. 一个本土科技精英的近况
  18. 在ppt中加入python_在ppt中加入python下载
  19. manjaro怎么启动mysql_Manjaro 入门使用教程
  20. 部署卡巴斯基网络版6.0:客户端推拉测试

热门文章

  1. 小程序canvas画圆
  2. 《Delving Deep into Rectifiers: Surpassing Human-Level Performance on ImageNet Classification》阅读笔记与实现
  3. 八戒帮扶v5-1.3.8悬赏平台程序源码下载,打造私域流量池
  4. 如何向linux云主机上传文件,云主机上传文件具体步骤
  5. 电脑突发故障应急处理方法
  6. IBA公司亚太区总裁SIGI、中核质子董事长孙月飞等一行人参观访问杭州医药港小镇
  7. 大数据中的数据的价值的大小的度量
  8. 初次发现 ondblclick( ) 方法
  9. html的radio源代码,htmlradio-radio,html
  10. cnKiTTY 0.76.0.13.1—KiTTY 0.76.0.13中文版本简单说明~~