Visual Basic

Steven St. John wrote:

Will the app fail to run because there is a reference to the Microsoft Word 11.0 library? Or will the app run but throw a run-time error at the "log" variable declaration?

Public Class SolutionLog
    Dim log As Word.Application
    Dim m_WordVer As String
    Dim m_CanUseWord As Boolean

    Public Sub New()
        Dim regKey As Microsoft.Win32.RegistryKey = Microsoft.Win32.Registry.ClassesRoot
        Dim regWord As Microsoft.Win32.RegistryKey = regKey.OpenSubKey("Word.Application")
        If Not (regWord) Is Nothing Then
            Dim regWordVer As Microsoft.Win32.RegistryKey = regWord.OpenSubKey("CurVer")
            m_WordVer = regWordVer.GetValue("")
            If m_WordVer = "Word.Application.11" Then m_CanUseWord = True
        Else
            m_WordVer = "Word Not Installed"
            m_CanUseWord = False
        End If
    End Sub

If Not(m_CanUseWord) Then
    Throw New Exception
Else
    log=New Word.Application
End If

Dim log As Word.Application

If I'm Right Then
   Thank you all very much!
Else
   There must be some way to do this
End If