vbe6ext.olb file (extensibility) for VB6 & VB2010

ajetrumpet said:

thanks.

actually Here's what I have for VBA, which is something I wrote long ago:

Code:

Function CountVbaLines()

On Error GoTo ErrorHandler

Dim TotalLines As Double
Dim vbEditor As VBIDE.VBE
Dim VBProj As VBIDE.VBProject
Dim VBobj As VBIDE.VBComponent

Set vbEditor = Application.VBE
Set VBProj = vbEditor.ActiveVBProject

   For Each VBobj In VBProj.VBComponents

      TotalLines = TotalLines + VBobj.CodeModule.CountOfLines
   
   Next VBobj
   
      CountVbaLines = TotalLines

ErrorHandler:
   Set vbEditor = Nothing
   Set VBProj = Nothing

End Function

I want to write the equivalent in VB6, but I have that at work and I'm testing this junk on VB2010 express at home because I can't find VB6 anymore to download.

Do you possibly know, off hand, what has changed in vb2010 in terms of the above referenced code? What I'm finding is that there is no CodeModule for the VBComponent in 2010. That seems to be the only thing I'm missing here.

Thanks again.

Click to expand...