B4J Question Modal form with scrollable text

'Class module
Sub Class_Globals
    Private fx As JFX
    Private frm As Form
    Private helpTxt As Label
    Private closeButton As Button
End Sub

Public Sub Initialize (Parent As Form)
    frm.Initialize("frm", 600dip, 750dip)
    frm.Title = " LiveStats Analysis V4.6 - Help"
    frm.Icon = fx.LoadImage(File.DirAssets,"IMG_41.gif")
    frm.RootPane.LoadLayout("LiveStatsHelpV1")
    frm.SetOwner(Parent)   
End Sub

Public Sub Show As Paint
    helpTxt.text = "Navigate to the game of interest using the browser at the bottom of the screen to open the LiveStats boxscore" & CRLF & CRLF
    helpTxt.text = helpTxt.text & "When the 'Get Data' button is activated, click on it to download the game data. When the data download is complete, the 'Analyse', 'Boxscore' or 'PlayByPlay' buttons will be activated. Clicking on either will result in the following:" & CRLF & CRLF
    helpTxt.text = helpTxt.text & "Comments, suggestions and bug reports may be sent to Bryon Dunkley-Smith at bdunkley-smith@bigpond.com."
    frm.ShowAndWait
End Sub

Sub closeButton_MouseClicked (EventData As MouseEvent)
    frm.Close
End Sub