//方法1,date命令返回当前系统日期。跟踪日期//方法2,按“立即向导”命令,根据计算机系统设置的日期和时间返回当前日期和时间值。去掉后面的时间得到date =nowMyPos = Instr (date," ")TracePrint mid (date,1,mypos-1)//方法3,得到网络时间的命令得到的值和现在一样,也需要处理。返回值= lib.network. Get网络时间MyPos = Instr(返回值," ")TracePrint mid(返回值,1,mypos-1)//方法4,获取网络时间。这个方法需要访问带有时间和日期的URL。返回值= Lib。网络。获取网络time _ enhanced版本(" "/空,填写北京时间URL MyPos = Instr(返回值," ")。