ปรึกษาหน่อยครับ เขียนโปรแกรม VB6 ติดต่อกับสาย USB TO PARARELL

ผมเขียนโปรแกรมตามนี้ code ผิดหรือเปล่าครับ ไม่มีสัญญาณออกมาจา D7 เลยครับ
ต้องแก้ไขตรงไหนครับ

Private Declare Sub Out Lib "DllPort.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)

Public Value As Integer

Private Sub Form_Load()
pwrite = &H378
End Sub

Private Sub Command1_Click()
Out pwrite, &H80
End Sub

ขอบคุณครับ