wincc上作一个时针显示

转载——

有三种方法，可供楼主选择：

1、变量管理器->创建SYSTEM INFO通道，创建字符串内部变量，选择对应的日期格式以及时间格式即可。

2、文本对象->属性->文本，使用C脚本，触发周期1S：
#pragma code("kernel32.dll")
BOOL GetLocalTime(LPSYSTEMTIME);
#pragma code()
char szReturn[255];
SYSTEMTIME sysTime;
GetLocalTime(&sysTime);
//sprintf(szReturn,"%d年%d月%d日",sysTime.wYear,sysTime.wMonth,sysTime.wDay); //日期
sprintf(szReturn,"%d:%d:%d",sysTime.wHour,sysTime.wMinute,sysTime.wSecond); //时间
return szReturn;

3、文本对象->属性->文本，使用VBS脚本，触发周期1S：
Dim tNow
tNow = Now()
'Text_Trigger = CStr(Year(tNow)) & "年" & CStr(Month(tNow)) & "月"  & CStr(Day(tNow)) & "日" '#日期
Text_Trigger = CStr(Hour(tNow)) & ":" & CStr(Minute(tNow)) & ":"  & CStr(Second(tNow))  '#时间