7,763
社区成员
发帖
与我相关
我的任务
分享在VB中调用cos()怎么不显示0
1 在VB中调用cos()怎么不显示0 比如说cos(3.14)它只显示-.99999873172754 为什么不显示为-0.99999873172754 怎么改？怎么做？
2 我在一个函数里定义形参变量为Variant型，在数学运算中会不会出错？
2 我在一个函数里定义形参变量为Variant型，在数学运算中会不会出错？
...全文
请发表友善的回复…
发表回复
luolovegui 2004-01-03
- 打赏
- 举报
这种问题自已可以写程序呀
rainstormmaster 2004-01-03
- 打赏
- 举报
用format函数或FormatNumber解决问题
langzimaomao 2004-01-01
- 打赏
- 举报
我知道接近-1，但是它不显示0！
northwolves 2004-01-01
- 打赏
- 举报
1.
Private Sub Command1_Click()
Dim pi As Double
pi = 4 * Atn(1)
MsgBox Cos(pi)
End Sub
2.一般不要紧，也有可能出错，建议少用VARIANT。
Private Sub Command1_Click()
Dim pi As Variant
pi = 4 * Atn(1)
MsgBox Cos(pi)
End Sub
Private Sub Command1_Click()
Dim pi As Double
pi = 4 * Atn(1)
MsgBox Cos(pi)
End Sub
2.一般不要紧，也有可能出错，建议少用VARIANT。
Private Sub Command1_Click()
Dim pi As Variant
pi = 4 * Atn(1)
MsgBox Cos(pi)
End Sub
jpinglee 2004-01-01
- 打赏
- 举报
3.14只是近视值,只接近于-1
