24fig03

ijfe check2 - Microsoft Visual Basic [design]

File Edit View insert Run Tools Ądd-lns Help

1035.11 ^0 7435 % 4425

5 frmCheck

Object: Form

Proc:

Load

' poern.

Newline = Chr$(13) + Chr$(10)

¹ Fili the label with the poern ¹ and concatenate the newline characters lblPoern = "Visual Basic is the best." lblPoern = lblPoern fi Newline

lblPoern = lblPoern fi "It's much better than the res lblPoern = lblPoern fi Newline

IblPoein = IblPoem & ⁿI± you ever hear differently

lblPoern = lblPoern fi Newline

lblPoern = lblPoern fi "Give thern major misery!" End Sub

il_l