Hi Johnny, > If I only can read all the text in one module at once, that would do > it just fine. If there is a simple one-liner that reads just one > function or subroutine, that's a bonus, and if I can read a dialogue > that's even better…
Have you tried:
Sub Test()
Dim oLibs as Object
Dim oLib as Object
Dim sLib as String
Dim mTmp()
Dim i as Integer
Dim s as String
sLib = "Standard"
oLibs = GlobalScope.BasicLibraries
If Not oLibs.hasByName(sLib) Then
MsgBox "Error reading " & sLib
EndIf
oLib = oLibs.getByName(sLib)
mTmp() = oLib.getElementNames()
For i = 0 To uBound(mTmp())
s = s + mTmp(i) & Chr(13)
Next i
MsgBox s
MsgBox oLib.getByName(mTmp(0))
End Sub
Regards
Oliver
--
GnuPG key 0xCFD04A45: 8822 057F 4956 46D3 352C 1A06 4E2C AB40 CFD0 4A45
signature.asc
Description: OpenPGP digital signature
