コーディング規約

コードを書くときのルールのドレが良いかはさておき、何らかのルールを定め・守ることは非常に重要だと思いますが、その内容があまりにひどいのはつらいところですね。
変数名や関数名にスコープや型に即した名前付けと連番が指定されています。

Private Dim Rules As Collection
Public Function GetValue(Key As String) As String
  GetValue = Rules( Key )
End Function

 ↓

Public Function pubfuncstrGetValue0010101(ByVal valstrKey as String) As String
  pubfuncstrGetValue0010101 = memvalcolRules( valstrKey )
End Function

こんな感じですね。他にも、

'2003/12/02 Lady.BUG (modify begin)
' 修正前の
' ソースコードは
' すべてコメントで
' 保存すること

  修正後のソース。
 前後は指定の形式のコメントではさむ
'2003/12/02 Lady.BUG (modify end)

みたいな規則があったり...多人数であれば多人数であるほど、こういう人間的な管理は不具合が発生した場合のリカバリーにかかるコストが莫大になっていくので、やめたほうがいいんですけどね。これが発展すると、

'2003/12/02 Lady.BUG (modify begin)
' 修正理由
' 修正理由
' 修正理由
' 修正内容
' 修正内容
' 修正内容
'2003/12/02 Lady.BUG (modify comment)
' 修正前のソースコード
' 修正前のソースコード
' 修正前のソースコード
  修正後のソースコード
  修正後のソースコード
  修正後のソースコード
'2003/12/02 Lady.BUG (modify end)

みたいな形式になるのかしら(苦笑
そして、このコードを誰かがさらに修正したら・・・?