devxlogo

Retrieving (from a VB6 program) the installed versions of the .NET Framework

Retrieving (from a VB6 program) the installed versions of the .NET Framework

' Return a collection of strings that identify the installed versions of the ' .NET Framework' Note: this function require the EnumRegistryKeys and EnumRegistryValues ' functions' Example:'   Dim version As Variant'   For Each version In GetDotNetFrameworkVersions'       Debug.Print version'   NextFunction GetDotNetFrameworkVersions() As Collection    Const HKEY_LOCAL_MACHINE = &H80000002    Dim keyName As String    keyName = "SoftwareMicrosoft.NETFrameworkpolicy"    Set GetDotNetFrameworkVersions = New Collection    Dim versions As Collection, version As Variant    ' get the collection of major.minor versions    Set versions = EnumRegistryKeys(HKEY_LOCAL_MACHINE, keyName)        Dim builds As Collection, build As Variant    ' for each version, get the installed builds, and finally get the complete     ' version string    For Each version In versions        Set builds = EnumRegistryValues(HKEY_LOCAL_MACHINE, _            keyName & "" & version)        For Each build In builds            GetDotNetFrameworkVersions.Add (Mid(version, 2) & "." & build(0))        Next    NextEnd Function

devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist