אני מקבל בVB את השגיאה שבכותרת, ואני לא מצליח להבין מה היא אומרת...

Public Class Form1
  Private Declare Function InPort Lib "example3.dll" (ByVal portaddress As Integer) As Integer
  Private Declare Function OutPort Lib "example3.dll" (ByVal portaddress As Integer, ByVal data As Integer) As Integer

  Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

  End Sub

  Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click

    OutPort(888, 10) 'Val("&h" + TextBox2.Text), Val(TextBox1.Text)

  End Sub
  Private Sub TextBox1_TextChanged(sender As System.Object, e As System.EventArgs) Handles TextBox1.TextChanged


  End Sub

  Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
     TextBox3.Text = Str(InPort(Val("&h" + TextBox2.Text))) 
  End Sub

End Class

השגיאה מצביעה לי על השורה:

TextBox3.Text = Str(InPort(Val("&h" + TextBox2.Text)))

אתה משתמש ברכיב שהתרחשה בו חריגה