How do I call a stored procedure (ASP.net) using the IBM provided OLE DB driver.  I'm getting an error message.

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        Dim cnn As New OleDbConnection("Provider=IBMDADB2.DB2COPY1;Data Source=TM_REPORTING_00004;Persist Security Info=True;Password=123456;User ID=rfuser")
        Dim cmd As New OleDbCommand("FTC.LOOKUP_STATE_FOR_ZONE", cnn)
        cmd.CommandType = CommandType.StoredProcedure
        
        cmd.Parameters.Add("IN_ZIP", OleDbType.WChar)
        With cmd.Parameters("IN_ZIP")
            .Direction = ParameterDirection.Input
            .Size = 10
            .Value = TextBox1.Text
        End With
        cmd.Parameters.Add("OUT_STATE", OleDbType.WChar)
        With cmd.Parameters("OUT_STATE")
            .Direction = ParameterDirection.Output
            .Size = 4
            .Value = " "
        End With
        
 
        Try
            cnn.Open()
            cmd.ExecuteNonQuery()
            Label1.Text = cmd.Parameters("OUT_STATE").Value
 
        Catch ex As Exception '
 
            Label1.Text = "There was an error. " & ex.Source & " " & ex.Message
 
        Finally
            
            cnn.Close()
            cnn.Dispose()
 
        End Try
    End Sub