'Primer 21a: poziv forme koja na osnovu zadatog rednog broja pasusa aktivnog dokumenta 
'ispisuje broj karaktera, reci i recenica tog pasusa (Label, TextBox i CommandButton) 
Option Explicit

Sub testForme21()
    frmPrimer21.Show vbModeless
End Sub