How to pass parameters from Visual Basic to SQL Local Package

[LimaCharlie]

Good day to all,

My frontend is visual basic and my backend is SQL. I need to pass a date parameter to my DTS Package. What should be my VB syntax?
Here's how I call my DTS package:

Private Sub DTSAccess()
Dim objPackage As New Package

    objPackage.LoadFromSQLServer "SQL2K-VBP", , , DTSSQLStgFlag_UseTrustedConnection, , , , "HRIS_DTSFromAccess"
    objPackage.Execute

End Sub

Thanks a lot :)