ExcelTip.Net留存知识帖 ---【注:附件之前被网盘供应商清空后,现已修复-现已修复-现已修复为本地下载!】
现在位置:首页 > 我的酷贴 > Excel VBA > 浅谈代码的缩进

浅谈代码的缩进

作者:绿色风 分类: 时间:2022-08-18 浏览:105
楼主
杨开科
  所谓代码缩进,是指通过在代码左端键入空格(Space)或制表符(Tab)的方式,表示代码之间的层次关系。

  没有缩进的代码是糟糕的,规范的缩进格式是一种良好的习惯,使得代码更加容易阅读、纠错和日后的维护,还有助于清晰地体现代码的层次结构和逻辑关系。

  例如,下面的代码,通篇没有缩进,看起来有些让人生畏。而且在运行时,出现编译错误Next没有For的错误提示。
  1. Sub MySum()

  2. Dim i As Integer, j As Integer

  3. For i = 1 To 10

  4. For j = 1 To 5

  5. If Cells(i, j).Value = 100 Then

  6. Cells(i, 6).Value = Cells(i, 4).Value + Cells(i, 5).Value

  7. Next j

  8. Next i

  9. End If

  10. End Sub

  将代码重新排版缩进后的结果如图所示。


 
  可见,外层循环的For i对应End If,内层循环的For j对应Next i,If也对应到了Next j。显然,整个逻辑关系是错误的。End If到了内层循环之外,问题就出在If没有End If,表面看来,它确实与错误提示Next没有For没多少关系。缩进后正确的代码如下所示:


 

  在开发过程中,通常使用空格(Space)或制表符(Tab)缩进,显然会影响开发效率,这里介绍一款用于VBA代码缩进的小软件Smart Indenter v3.5。
  可从http://www.oaltd.co.uk/Indenter/Default.htm下载,下载得到的文件名为IndenterVBA.exe。






2楼
天南地北
看看,感谢元老级人物推荐
3楼
YESS95
感谢大侠分享
4楼
xyf2210
学习
5楼
独行客
下载了,好用!

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素, 经与ExcelTip.Net站长Apolloh商议并征得其同意, 现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示, 供有需要的人士查询使用,也慰缅曾经的论坛时代。 所示各个帖子的原作者如对版权有异议, 可与本人沟通提出,或于本站点留言,我们会尽快处理。 在此,感谢ExcelTip.Net站长Apolloh的支持,感谢本站点所有人**绿色风(QQ:79664738)**的支持与奉献,特此鸣谢!
------本人网名**KevinChengCW(QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表
sitemap