男子110米栏加油稿:做VB一个时钟

来源:百度文库 编辑:高校问答 时间:2024/05/12 19:41:41
要求:绘制一个时钟(有时针,分针,秒针),在时钟上可以调整时间,调整后,屏幕上显示“XXXX年XX月XX日,HH:MM:SS”自动更新

用VB做

答案满意的话,再加50分,不骗人!
关键是怎样调节指针,使之变化而不一定跟系统时间一样

我给你发邮箱了,满意地话给我加分!

具体代码我就不想写了,可以提供思路

绘制钟

设置一个 钟的圆点(x1,y1)

时钟 r1 =3 (半径)
分钟 r1 =4
秒钟 r1 =5

取出系统时间,然后分解出来 小时h=h1,分 m=m1 ,秒 s=s1
pi=3.1415926
时钟线,一个顶点再圆点(x1,y1) 另外一个点在 x2= x1+r1*cos((h*3600+m*60+s1)*pi/(12*3600)),y2=y1+r1*sin((h*3600+m*60+s1)*pi/(12*3600));
根据这2点划一条线就可以了line(x1,y1)-(x2,y2)

分针 x3= x1+r2*cos((m*60+s1)*pi/(12*60)),y3=y1+r2*sin((m*60+s1)*pi/(12*60));

秒钟 x4= x1+r3*cos(s1*pi/60),y4=y1+r3*sin(s1*pi/60);

这样就可以画好时钟,

XXXX年XX月XX日,HH:MM:SS 这个太简单了,不说了。

ftp://222.23.244.2/到这里看看