'UPGRADE_WARNING: Couldn't resolve default property of object

I am upgrading my VB app from VB6 to VB.Net

here is the code complaining the error ( warning)
i am new to VB and how to resolve the problem?

oTask = goPackage.Tasks.New(gsDTSExecuteSQLTask) givs the problem

code :

Public Sub Task_Sub1(ByVal goPackage As Object)

Dim oTask As DTS.Task
Dim oLookup As DTS.Lookup

Dim oCustomTask1 As DTS.ExecuteSQLTask2

'UPGRADE_WARNING: Couldn't resolve default property of object goPackage.Tasks. Click for more: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"'

oTask = goPackage.Tasks.New(gsDTSExecuteSQLTask)
oTask.Name = gsCreateTable & sTalDbtbl & gsTask
oCustomTask1 = oTask.CustomTask

Explain a little more of what it's supposed to do, and use CODE TAGS so we can read code snippets.

Are you passing a query?

I suppose you are passing a DTSPackage object to the goPackage. If that is the case then you would need to declare goPackage as the same type.