
简单VFP表单计时器代码问题!找不到错误,帮忙指出!在线等...
已经设置全局变量a,b,c,d,都等于0计时器代码如下:a=a+1ifa>=100b=b+1a=0endififa<10aa='0'+str(a)elseaa=str(a...
已经设置全局变量a,b,c,d,都等于0
计时器代码如下:
a=a+1
if a>=100
b=b+1
a=0
endif
if a<10
aa='0'+str(a)
else
aa=str(a)
endif
if b>=60
c=c+1
b=0
endif
if b<10
bb='0'+str(b)
else
bb=str(b)
endif
if c>=60
d=d+1
c=0
endif
if c<10
cc='0'+str(c)
else
cc=str(c)
endif
if d<10
dd='0'+str(d)
else
dd=str(d)
endif
thisform.sj.value=dd+':'+cc+':'+bb+':'+aa
return
找不出错误的地方,纠结中!
帮助指出,并讲解下如何更正,谢谢! 展开
计时器代码如下:
a=a+1
if a>=100
b=b+1
a=0
endif
if a<10
aa='0'+str(a)
else
aa=str(a)
endif
if b>=60
c=c+1
b=0
endif
if b<10
bb='0'+str(b)
else
bb=str(b)
endif
if c>=60
d=d+1
c=0
endif
if c<10
cc='0'+str(c)
else
cc=str(c)
endif
if d<10
dd='0'+str(d)
else
dd=str(d)
endif
thisform.sj.value=dd+':'+cc+':'+bb+':'+aa
return
找不出错误的地方,纠结中!
帮助指出,并讲解下如何更正,谢谢! 展开
1个回答
展开全部
if c<10
cc='0'+str(c)
else
cc=str(c)
endif
改成 cc = Padl(Alltrim(str(c)),2,'0')
aa = Padl(Alltrim(str(a)),2,'0')
bb = Padl(Alltrim(str(b)),2,'0')
cc='0'+str(c)
else
cc=str(c)
endif
改成 cc = Padl(Alltrim(str(c)),2,'0')
aa = Padl(Alltrim(str(a)),2,'0')
bb = Padl(Alltrim(str(b)),2,'0')

2024-09-19 广告
随着AI技术的飞速发展,如今市面上涌现了许多实用易操作的AI生成工具1、简介:AiPPT: 这款AI工具智能理解用户输入的主题,提供“AI智能生成”和“导入本地大纲”的选项,生成的PPT内容丰富多样,可自由编辑和添加元素,图表类型包括柱状图...
点击进入详情页
本回答由AiPPT提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询