This dialog shows the computer's physical memory free and percent of system resources free.

Private Declare Function ShellAbout Lib "shell32.dll" Alias _
    "ShellAboutA" (ByVal hwnd As Long, ByVal szApp As _
    String, ByVal szOtherStuff As String, ByVal hIcon As _
    Long) As Long

Private Sub cmdShellAbout_Click()
    ShellAbout Me.hwnd, "MyApplication", _
        "After Copyright", ByVal 0&
End Sub