Excel worksheet.value to VB6 Label.caption

[jctgt]

Hello,
I have this:

Private Sub Form_Load()
Dim oXLApp As Excel.Application 'Declare the object variables
Dim oXLBook As Excel.Workbook
Dim oXLSheet As Excel.Worksheet
Set oXLApp = New Excel.Application  'Create a new instance of Excel
Set oXLBook = oXLApp.Workbooks.Open("D:\Billard8") 'Open an existing workbook
Set oXLSheet = oXLBook.Worksheets.Add
oXLSheet.Name = Date

I want to get worksheet.cells value unto a Label.Caption

I don't know how to do it. Help please