Code:
Label1.Caption = Data2.Recordset(0)