Fórum Dificuldades em Chamar a Função ou Metodo acbrBAL.Porta no VB.NET no AcbrFrameWork.dll #572078

Olá a Todos! Minha Dificuldade é Chamar o Metodo ou Funções: acbrBAL.Porta, acbrBAL.Modelo ,acbrBAL.Device.Baud, acbrBAL.Ativar() .
No Meu Caso Estão Tentando Pegar o Peso da Balança Toledo PRIX 9098, EM MEU PROJETO JÁ CONSUMI A DLL (AcbrFrameWork.dll) problema é apenas em Chamar a Função.

Imports System
Imports System.Windows
Imports System.Windows.Forms
Imports ACBrFramework.BAL
Imports ACBrFramework.BAL.ACBrBAL

Public Class Form1

Public Sub Ativar()
Try
Erro aqui ------ acbrBAL.Modelo = DirectCast(modeloComboBox.SelectedItem, ModeloBal)
Erro aqui ------ acbrBAL.Porta = DirectCast(portaComboBox.SelectedItem, String)
Erro aqui ------ acbrBAL.Device.Baud = CInt(velocidadeComboBox.SelectedItem)
Erro aqui ------ acbrBAL.Ativar()

ativarCheckButton.Checked = True
ativarCheckButton.Text = "Desativar"

messageToolStripStatusLabel.Text = "Ativo"
descriptionToolStripStatusLabel.Text = String.Empty
Catch exception As Exception
ativarCheckButton.Checked = False

messageToolStripStatusLabel.Text = "Exception"
descriptionToolStripStatusLabel.Text = exception.Message
End Try
End Sub


Private Sub acbrBAL_OnLePeso(sender As Object, e As LePesoEventArgs)
If Me.InvokeRequired Then
Me.Invoke(New EventHandler(Of LePesoEventArgs)(AddressOf acbrBAL_OnLePeso), sender, e)
Else
Me.pesoValueLabel.Text = String.Format("{0:n3}", e.Peso)
End If
End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim peso As Decimal = ACBrBAL.LePeso()
Me.pesoValueLabel.Text = String.Format("{0:n3}", peso)
End Sub

End Class



Se Posuirem um outro Codigo que emplemente essa Função pra le o Peso da Balança Com ACBRFRAMEWORK.DLL Postem a Solução em C# ou VB.NET. Grato!!!