大虾，下面程序运行结果为什么是0

liu0033546 发布于 2013-04-10 13:16， 1005 次点击

Private Sub Command1_Click()
θ = π * Rnd
Print θ

End Sub

11 回复

Artless2013-04-10 13:17

π=?

liu00335462013-04-10 15:43

回复 2楼 Artless

π是圆周率，是常数哦

seafish0112013-04-10 17:12

vb6没有定义π的常量，但是你可以用Atn函数来得出π的值π=4*atn(1)

dim π as double
π = 4*atn(1)

风吹过b2013-04-10 17:14

这个常数你在哪里定义的？？？

定义的值是多少？？

你程序选项里开了变量强制申明吗？？

liu00335462013-04-10 18:17

回复 5楼风吹过b

在数学层面上π就是个常数哦

qq3725058552013-04-10 18:39

抱歉，VB里面没有这个常数，over

liu00335462013-04-10 19:40

回复 4楼 seafish011

谢谢，有用了

liu00335462013-04-10 19:41

回复 7楼 qq372505855

哦，谢谢

#10

ZaneYork2013-04-14 04:32

程序代码：

Private Sub Command1_Click()
dim PI as double,Result as double
PI=3.141592654
Result = PI * Rnd
Print Result
End Sub

不要试图直接用那些数学符号来声明变量（它们在编程里什么都不是），输入法再牛叉也没用……

#11

wp2319572013-04-14 06:37

有意思

#12

lanyingjie2013-10-31 11:40

Const PI = 3.1415927
'定义常量