统计vb代码行数的问题? 谢谢activeL(activeL) (20M)如果再有代码,那就太好了 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我也要一份。我的email是[email protected] 以前我是自己写的,根据文件的扩展名为.frm、.cls、.bas和开始行的标志统计,以文本文件的方式计算就可以了。不过,有工具我也要看看.mail:[email protected] Gulang68(Gulang):你能把你的代码给我吗(统计vb代码行数的)?[email protected] 我也要一份。谢谢![email protected] 能给我看看么?[email protected] 我也想要一份可以给我一份吗?[email protected][email protected]谢谢 我也要啊!!!![email protected][email protected] 谁给我分。我给你们编一个自己删除注释的[email protected] 把代码复制到WORD中不就可以统计了自己做的话for x=1 to len(tmpstr)If Mid$(tmpStr,x,1)=chr(13) then回车elseif Mid$(tmpStr,x,1)="'" then注释end ifnext 可是一个project中有很多文件啊。 activeL(activeL)大侠,我也要[email protected] 可以给我一份么?[email protected] 请问高人rundll32能启动用vb编写的dll吗? 紧急求助!!!求时间 如何禁止改IP地址,急 问个关于控件注册的问题. 急!添加数据时有时无法添加,修改数据时第一字段无法修改! 在DATAGRID中怎么定位记录号? 这是什么道理? 关于在word工具栏中添加按钮的问题,请教。 如何限制可变大小窗口的缩小? 一个很有难度的问题,真正的高手 COME IN !参与有分 关于Treeview控件:父节点带有image,子节点不带image,这时子节点的text前边就有一块空白,如何去掉这块空白? 谁有调试VB控件(dll/ocx)的好方法,进来交流一下!
[email protected]
[email protected]
[email protected]
[email protected]
谢谢
[email protected]
[email protected]
我给你们编一个自己删除注释的
[email protected]
自己做的话
for x=1 to len(tmpstr)
If Mid$(tmpStr,x,1)=chr(13) then
回车
elseif Mid$(tmpStr,x,1)="'" then
注释
end if
next
[email protected]