寻找一种vb计算器最好能固定小数点后15位的还有sin和开方功能的像图片这种的

如题所述

举报该文章

相关建议 2016-06-01

vb计算器实现如下：能够固定小数点后15位，还有sin和开方功能，如图：

主要功能概述：

1、用户根据0-9数字键盘输入对应的操作数，也可以操作键盘上的数字键来书输入

2、点击sin，cos，tan，平方，开方，1/x可以完成特定运算，比如：

输入30，点击sin，结果如下：

3、点击清除可以消除文本框的内容，如：

4、点击退出，就关闭计算器。

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/2fv2q7fp7.html

其他看法

第1个回答 2013-01-14

这个简单，VB 都有现成函数了，下面是个参考
Option Explicit
Private Sub Command1_Click(Index As Integer)
Select Case Index
Case 0 '正弦
Text2.Text = Format(Sin(Text1.Text * (3.14 / 180)), "0.000000000000000")
Case 1 '余弦
Text2.Text = Format(Cos(Text1.Text * (3.14 / 180)), "0.000000000000000")
Case 2 '正切
Text2.Text = Format(Tan(Text1.Text * (3.14 / 180)), "0.000000000000000")
Case 3 '平方
Text2.Text = Format(Text1.Text * Text1.Text, "0.000000000000000")
Case 4 '开方
Text2.Text = Format(Sqr(Text1.Text), "0.000000000000000")
Case 5 '1/x
If Text1.Text <> 0 Then
Text2.Text = Format(1 / Text1.Text, "0.000000000000000")
Else
MsgBox "除数不能为0"
Text1.Text = ""
End If
Case 6 '清空
Text1.Text = ""
Text2.Text = ""
Case 7 '退出
End
End Select
End Sub追问

把代码复制去那里，怎么弄呢

第2个回答 2016-06-09

在哪下载？

相似回答

大家正在搜

寻找一种vb计算器 最好能固定小数点后15位的 还有sin和开方功能的 像图片这种的

寻找一种vb计算器最好能固定小数点后15位的还有sin和开方功能的像图片这种的