Public Class Form1
    Inherits System.Windows.Forms.Form

#Region " Windows Form Designer generated code "
#End Region

    Private Sub Form1_Load(ByVal sender As System.Object,
                 ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object,
                ByVal e As System.EventArgs) Handles Button1.Click
        Dim WS As New com.ibm.alphaworks.dwdemos.VersionService()

        Dim s1 As String

        s1 = WS.getVersion()
        txtVersionInfo.Text = s1

    End Sub

End Class