1.一个TEXTBOX控件 命令组 为两个 一个名称为24小时制 一个名称为12小时制
2.点击按钮24小时制 系统以24小时计时,TEXTBOX显示为如23:05:35,点击按钮12小时制,系统以12小时制计时,TEXTBOX显示为如11:05:35
3.系统为一数字时钟,计时最小单位为秒.

(1)24小时制的命令按钮的CLICK()过程:
SET HOURS TO 24

(2)12小时制的命令按钮的CLICK()过程:
SET HOURS TO 12

(3)TIMER1.TIMER()过程:
THISFORM.TEXT1.VALUE=SUBSTR(TTOC(DATETIME(),2),1,8)

有人抢先告诉你了啊
这种简单问题
只要你有VFP篇程的书上面都会有的
学篇程重要的是自己动手
简单问题自己想办法解决才行的

对了
上面那位叫Tiger5392的很厉害很热心嘛
能交个朋友
互相沟通吗？

[此贴子已经被作者于2006-5-19 18:32:33编辑过]

谢谢你能这样评价我，其实是愧不敢当。
大家能在这里本身就是缘分，既然是VFP的爱好者，就不免有些问题来探讨。自己知道的何不分享之?
有什么问题可写出来，自己贡献了问题，别人也得到高手的答案。我觉得这样的论坛比聊天室好很多了。
我十分愿意成为你的朋友，不知道我们就这样交流算不算朋友?