VB课程设计报告--科学计算器.docVIP

目 录 概要设计说明………………………………………3 总体设计分析………………………………………3 小组成员及分工方法………………………………3 -4 功能模块图…………………………………………4 负责模块的程序设计分析…………………………5 负责模快的程序源代码及流程图…………………5-12 公共系统使用说明及截图…………………………13-16 结束语、心得体会…………………………………17 课程设计结评分表…………………………………18-19 一、概要设计说明 本组设计的科学计算器具有科学型和标准型两种类型，适合不同需要。科学型中包含弧度与角度的计算，同时兼具2、8、10、16进制的运算。在标准型中，编辑菜单（edit）包含复制（copy）、粘贴（paste）。查看菜单包含标准型（standar）、科学型（scientific）。帮助菜单中包含关于（about）（内含开发制作者信息） 二、总体设计分析（含功能模块图） 一．小组成员分工 1 科学型角度弧度和进制的调用，由小组成员共同完成 2 科学计算器中，x^2,x^3,x^y,1/x,n！,Log按键，及八进制转二进制，八进制转十进制，由**负责。 3 科学计算器中，BackSpance、CE、C和运算符号+、-、*、/、.、-/+、=以及标准型计算器由***负责 4 科学计算器中，sin，cos，tan,Rnd,Exp,ATn按钮以sin/cos/tan计算时角度和弧度的转换由**负责。 5 科学行计算器中，Copy，Pst，Not，And，Xor，Int，Or，Abe，Exit按钮;将十进制转化为二进制，制转化为十进制，将二进制转化为八进制由**负责。 6 标准型菜单部分（查看菜单标准型（standar）、科学型（scientific）。帮助菜单中包含关于（about）（内含开发制作者信息））及标准型和科学型的数字键和科学型的16进制转换由李诗瑶负责。 二、功能模块图 负责模块的程序设计分析 sin、cos、tan、ATn按钮 分别求某个数值/角度/弧度的正弦、余弦、正切、反正切值。 2.Exp、Rnd按钮 分别返回e的x次幂和取[0，999999999）之间的随机数，而mod保证了随机数是整数。 3.角度、弧度按钮 计算sin、cos、tan、ATn时进行转换。 四、自己负责模块的程序源代码 （1）Sin、Cos、Tan、Rnd、Exp、Atn按钮程序代码 Sin： Private Sub m_Btn_sin_Click() If IsJd Then m_Tb_Out.Text = str(Sin((Val(m_Tb_Out.Text) / 180) * PI)) 由于sin只能进行对弧度的运算，所以在进行sin的运算时，如果是角度需要转换为弧度后进行sin运算。 Else m_Tb_Out.Text = str(Sin(Val(m_Tb_Out.Text))) End If If Left(m_Tb_Out.Text, 2) = . Then m_Tb_Out.Text = 0 + Right(m_Tb_Out.Text, Len(m_Tb_Out.Text) - 1) ElseIf Left(m_Tb_Out.Text, 2) = -. Then m_Tb_Out.Text = -0 + Right(m_Tb_Out.Text, Len(m_Tb_Out.Text) - 1) End If IsShowEd = True LastGame = sin IsLastOut = False End Sub Cos： Private Sub m_Btn_Cos_Click() If IsJd Then m_Tb_Out.Text = str(Cos((Val(m_Tb_Out.Text) / 180) * PI)) 由于cos只能进行对弧度的运算，所以在进行cos的运算时，如果是角度需要转换为弧度后进行cos运算。 Else m_Tb_Out.Text = str(Cos(Val(m_Tb_Out.Text))) End If If Left(m_Tb_Out.Text, 2) = . Then m_Tb_Out.Text = 0 + Right(m_Tb_Out.Text, Len(m_Tb_Out.Text) - 1) ElseIf Left(m_Tb_Out.Text, 2) = -. Then m_Tb_Out.Text = -0 + Right(m_Tb_Out.Text, Len(m_Tb_Out.Text) - 1) End If IsShowEd = True