| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 443 人关注过本帖
标题:请问这句代码错在哪里呀?
只看楼主 加入收藏
ictest
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:333
专家分:114
注 册:2010-2-17
结帖率:70%
收藏
 问题点数:0 回复次数:1 
请问这句代码错在哪里呀?
在我编写的程序中,有这么一句,运行时提醒 “编译错误,过程太大”,请问错在哪里?
Print #1, Date & "|" & " 设备-1    运行了:" & " " & Format((Val(i1) \ 3600), "00") & ":" & Format(((Val(i1) Mod 3600) \ 60), "00") & ":" & Format((Val(i1) Mod 60), "00") & " " & "    " & " 停止了:" & " " & Format((Val(b1) \ 3600), "00") & ":" & Format(((Val(b1) Mod 3600) \ 60), "00") & ":" & Format((Val(b1) Mod 60), "00") & " " & "    " & " 班运行率为(12小时):" & FormatPercent(i1 / 43200) & " " & 日运行率为(24小时):" & FormatPercent(i1 / 86400)

如去掉最后一句“ & " " & 日运行率为(24小时):" & FormatPercent(i1 / 86400) ”则运行正常

就算是把上语句改变为如下也出现提醒 “编译错误,过程太大”:
Print #1, Date & "|" & " 603B-1    运行了:" & " " & Format((Val(i1) \ 3600), "00") & ":" & Format(((Val(i1) Mod 3600) \ 60), "00") & ":" & Format((Val(i1) Mod 60), "00") & " " & "          " & " 停止了:" & " " & Format((Val(b1) \ 3600), "00") & ":" & Format(((Val(b1) Mod 3600) \ 60), "00") & ":" & Format((Val(b1) Mod 60), "00")
Print #1, "                     " & " 班运行率为(12小时):" & FormatPercent(i1 / 43200) & "          " & " & FormatPercent(i1 / 86400)"
去掉最后一句“ & "          " & " & FormatPercent(i1 / 86400)" ”则运行正常

搜索更多相关主题的帖子: 代码 
2010-08-07 18:40
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4947
专家分:30084
注 册:2008-10-15
收藏
得分:0 
重点检查这句。
Print #1, "                     " & " 班运行率为(12小时):" & FormatPercent(i1 / 43200) & "          " & " & FormatPercent(i1 / 86400)"

i1 这个变量,你前面运算中,都是使用 val 函数强制转为 数值 ,为什么最后一节不需要转换??
建议你转换时间的格式的定义为一个子函数,每次使用时进行调用,而不是到输出时,再写表达式来运行,会增加出错的可能性。

 Format((Val(i1) \ 3600), "00") & ":" & Format(((Val(i1) Mod 3600) \ 60), "00") & ":" & Format((Val(i1) Mod 60), "00")

凡是在程序里,二个或二个以上地方都使用到的运算、处理过程,都建议定义为 函数 或过程。 尽可能的使用模块结构,以提高程序的健康度。
--------------------------------
还有,print 命令中, 字符串 连续输出,不建议使用 & 字符串的连接符号,而是建议使用
print 连续输出分格符 ; 半角分号.

第一行输出后,最后用 分号 结尾,那么下面的输出将还是接着前面的输出位置

不带符号 结尾,那么将换行。

--------------------------------

授人于鱼,不如授人于渔
早已停用QQ了
2010-08-07 20:31
快速回复:请问这句代码错在哪里呀?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.028628 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved