This example finds the first field on the screen and prints its row, column, length, and text.
Sub FindAndPrintHostFieldValue() Dim hostfieldvar As HostField Set hostfieldvar = ThisIbmScreen.FindField1(1, 1, FindOption_Forward) Debug.Print hostfieldvar.toString End Sub