晓彬计算器
- 软件大小：58.0 KB
- 版本类型：免费版
- 更新时间：2020-11-29
- 版本号：1.0
- 软件语言：简体中文
- 软件厂商：
- 适用系统：Windows XP 及以上
- 软件授权：免费
晓彬计算器安装教程
晓彬计算器是一款只能加减乘除的计算器，简单好用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
使用方法
该计算器执行简单的加、减、乘、除计算功能
使用方法
：
在计算数据中输入要计算的数据，符号中输入+、-、*、/符号，
点击计算，即可输出结果
注意：
不可在计算数据中输入符号
