|
网站首页
|
业界新闻
|
小组
|
威客
|
人才
|
下载频道
|
博客
|
代码贴
|
在线编程
|
编程论坛
|
登录
注册
短消息
我发表的主题
我参与的主题
我收藏的贴子
我上传的附件
我下过的附件
编辑个人资料
我的博客
用户控制面板
搜索
道具
恢复默认风格
碧海青天
秋意盎然
棕红预览
粉色回忆
蓝雅绿
紫色淡雅
青青河草
e点小镇
橘子红了
红红夜思
水晶紫色
雪花飘飘
新年快乐
风格
短消息
论坛展区
帮助
编程论坛
→
开发语言
→
『 VB6论坛 』
→ 这段代码怎么解释啊
我的收件箱(0)
欢迎加入我们,一同切磋技术
用户名:
密 码:
共有
501
人关注过本帖
标题:
这段代码怎么解释啊
只看楼主
加入收藏
a13582220882
等 级:
新手上路
帖 子:15
专家分:0
注 册:2013-9-20
结帖率:
0
楼主
收藏
问题点数:0 回复次数:3
这段代码怎么解释啊
alfsec = ((ss - 15) / 30) * Pi '设置秒针每次转动的角度
alfmin = ((mm + ss / 60 - 15) / 30) * Pi '设置分针每次转动的角度
alfhour = ((hh + mm / 60 + ss / 3600 - 15) / 6) * Pi '设置时针每次转动的角度
PicTime.Refresh '刷新图片
搜索更多相关主题的帖子:
图片
2013-09-21 19:52
举报帖子
使用道具
赠送鲜花
lanyingjie
等 级:
新手上路
帖 子:20
专家分:7
注 册:2013-10-31
第
2
楼
收藏
得分:0
大概是一个控制表针的程序吧,我也不知道太多。
2013-10-31 11:04
举报帖子
使用道具
赠送鲜花
风吹过b
等 级:
贵宾
威 望:
364
帖 子:4947
专家分:30084
注 册:2008-10-15
第
3
楼
收藏
得分:0
alfsec = ((ss - 15) / 30) * Pi '设置秒针每次转动的角度
ss 是当前秒
, 0 秒时,指针在正上方,
而 坐标系里, 0 的方向在 水平方向,
水平方向变为正上方,需要减掉 15 秒。
完整的公式是
((ss*-15)/60) * (Pi*2)
秒
一圈
一周
是把每秒走动的角度换成弧度。计算机里全是用 弧度。360度=2Pi 弧度
alfmin = ((mm + ss / 60 - 15) / 30) * Pi '设置分针每次转动的角度
同样计算分针的角度,需要增加秒针进去进行修正。
alfhour = ((hh + mm / 60 + ss / 3600 - 15) / 6) * Pi '设置时针每次转动的角度
同理
PicTime.Refresh '刷新图片
授人于鱼,不如授人于渔
早已停用QQ了
2013-10-31 17:03
举报帖子
使用道具
赠送鲜花
liugongaoo
等 级:
论坛游民
帖 子:8
专家分:15
注 册:2012-12-26
第
4
楼
收藏
得分:0
a
l
f
s
e
c
=
(
(
s
s
-
1
5
)
/
3
0
)
*
P
i
'
設
置
秒
針
每
次
轉
動
的
角
度
s
s
是
當
前
秒
,
0
秒
時
,
指
針
在
正
上
方
,
而
坐
標
系
里
,
0
的
方
向
在
水
平
方
向
,
水
平
方
向
變
為
正
上
方
,
需
要
減
掉
1
5
秒
。
完
整
的
公
式
是
(
(
s
s
*
-
1
5
)
/
6
0
)
*
(
P
i
*
2
)
秒
一
圈
一
周
是
把
每
秒
走
動
的
角
度
換
成
弧
度
。
計
算
機
里
全
是
用
弧
度
。
3
6
0
度
=
2
P
i
弧
度
a
l
f
m
i
n
=
(
(
m
m
+
s
s
/
6
0
-
1
5
)
/
3
0
)
*
P
i
'
設
置
分
針
每
次
轉
動
的
角
度
同
樣
計
算
分
針
的
角
度
,
需
要
增
加
秒
針
進
去
進
行
修
正
。
a
l
f
h
o
u
r
=
(
(
h
h
+
m
m
/
6
0
+
s
s
/
3
6
0
0
-
1
5
)
/
6
)
*
P
i
'
設
置
時
針
每
次
轉
動
的
角
度
同
理
P
i
c
T
i
m
e
.
R
e
f
r
e
s
h
'
刷
新
圖
片
2013-11-01 21:21
举报帖子
使用道具
赠送鲜花
4
1/1页
1
快速回复:
这段代码怎么解释啊
数据加载中...
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.014220 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved