Public Sub SetEditText( _
   ByVal Num As Long, _
   ByVal Value As String _
)