蘑菇游戏软件站:安全、绿色、放心的专业下载站! 首页|最近更新|专题集合|站内导航
晓彬计算器v1.0免费版

晓彬计算器v1.0免费版

  • 软件大小:58KB
  • 更新日期:2021-02-06 14:52:54
  • 软件语言:简体中文
  • 软件类别:电脑软件
  • 评分等级:
  • 插件情况:无插件请放心使用
  • 软件官网:www.17mogu.com
  • 适用平台:winAll
软件介绍 相关下载 人气软件

晓彬计算器是一款只能加减乘除的计算器,简单好用VB6.0写的,便于生活中的加减乘除,附带源,欢迎大家优化更改!

晓彬计算器

软件源码

  Private Sub close_Click()

  End

  End Sub

  Private Sub jisuan_Click()

  Dim a As Double

  Dim b As String

  Dim c As Double

  a = shu1.Text

  b = fuhao.Text

  c = shu2.Text

  Call jisuanguocheng(a, b, c)

  End Sub

  Private Sub jisuanguocheng(a, b, c)

  If b = "+" Then

  jieguo.Text = a + c

  ElseIf b = "-" Then

  jieguo.Text = a - c

  ElseIf b = "" Then

  jieguo.Text = a c

  ElseIf b = "/" Then

  If c = 0 Then

  jieguo.Text = "除数为0,请检查输入数据"

  Else

  jieguo.Text = a / c

  End If

  End If

  End Sub

使用方法

  该计算器执行简单的加、减、乘、除计算功能

  使用方法:

  在计算数据中输入要计算的数据,符号中输入+、-、*、/符号,

  点击计算,即可输出结果

  注意:

  不可在计算数据中输入符号