' 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


Different Types of Data Models Explained with Examples
In the modern world, data is everything and everywhere. With so much access to technology, data has become a valuable resource for any business. Albeit a complex one. Data is