Private Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) _ As Long' Returns True if a Network is found (read-only)Function IsNetworkInstalled() As Boolean Const SM_NETWORK = 63 IsNetworkInstalled = GetSystemMetrics(SM_NETWORK)End Function
![VP Climate](https://www.devx.com/wp-content/uploads/VP-Climate-300x171.jpg)
![VP Climate](https://www.devx.com/wp-content/uploads/VP-Climate-300x171.jpg)