July 31, 1999

‘ Returns a value >0 if Node1 is a parent (or grandparent) of Node2’ Returns a value

‘ Convert to uppercase, lowercase, or propercase the text that is’ currently selected in the active code windowSub ConvertSelectedText(VBInstance As VBIDE.VBE, Optional conversion As Long = _ vbUpperCase) Dim startLine

Every now and then you need to fill a TreeView control with some random data, for example when you want to test a routine and you don’t want to write

‘ Returns the nesting level of a TreeView’s Node object’ (returns zero for root nodes.)Function NodeNestingLevel(ByVal Node As Node) As Integer Do Until (Node.Parent Is Nothing) NodeNestingLevel = NodeNestingLevel +

‘ the name of a control given the corresponding VBControl object’ (accounts for items in control arrays)Function VBControlName(vbc As VBIDE.VBControl) As String Dim index As Long index = vbc.Properties(“Index”) If

Internet Information Server (IIS), by default, uses an apartment-threaded, or single-threaded, threading model. This design choice was made because many Web sites still used Access as the database backend. Access,