| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 557 人关注过本帖
标题:求助:用最容易让新手理解的方法编一个多功能计算器
只看楼主 加入收藏
dolphinbay
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2010-3-20
结帖率:0
收藏
已结贴  问题点数:20 回复次数:2 
求助:用最容易让新手理解的方法编一个多功能计算器
图片附件: 游客没有浏览图片的权限,请 登录注册

谁能按这个帮我设计一个容易让我这个才开始学习的新手理解的程序
最好别用自定义函数   最好用高中生《算法与程序设计》这本叔上有的内容编写程序,如果没看过这本书
那就用最初等的编程方式谢了
搜索更多相关主题的帖子: 多功能 计算器 
2010-03-22 21:15
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4943
专家分:30067
注 册:2008-10-15
收藏
得分:10 
我在重写 一个计算器 ,这个计算器 支持 表达式计算,目前的进度是 四则混各运算,但还不能支持括号.
等支持括号后再发给大家看看吧.
----------------------------------
楼上这个要求,做完一个立即公布吧.

dim yy as long         '运算符 ,1-4,0代表无运算
dim x1 ,x2             '两个操作数
dim tmps as string     '输入的数,每次输入数,都先给它,

select case key            '每次输入一个字符
    case "*"
        x2=val(tmps)
        x1=计算1(x1,x2,yy)                     '计算1,为一个自定义函数,
        x2=""
        yy=3
        tmps=""
    case "\"        '与乘处理相同
    case "+"
    case "-"
    Case "1", "2", "3", "4", "5", "6", "7", "8", "9", "0"    '按下数字键
      tmps=tmps & key
end select

我刚写的混和运算的 核心过程就是这样的.你参考一下.


Public Function 计算1(cs1 As String, cs2 As String, cs3 As Long) As Double

Select Case cs3
    case 0
        计算1= val(cs1)
    Case 1
        计算1 = Val(cs1) + Val(cs2)
    Case 2
        计算1 = Val(cs1) - Val(cs2)
    Case 3
        计算1 = Val(cs1) * Val(cs2)
    Case 4
        计算1 = Val(cs1) / Val(cs2)
End Select
End Function




授人于鱼,不如授人于渔
早已停用QQ了
2010-03-23 16:03
qwe644800529
Rank: 2
等 级:论坛游民
帖 子:1
专家分:10
注 册:2010-3-23
收藏
得分:10 
我是新手,还看不懂这么深的,闪啦
2010-03-23 17:26
快速回复:求助:用最容易让新手理解的方法编一个多功能计算器
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.014178 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved