Imports System.IO.Ports
Imports System.IO
Public Class Scale
    Private WithEvents SerialPort As New SerialPort()
    Private Const COM_PORT As String = "COM5" ' Change this to your COM port
    Public Sub New()
        ' Constructor logic here if needed
        With SerialPort
            .PortName = COM_PORT
            .BaudRate = 9600
            .ReadTimeout = 1000
            .Parity = Parity.None
            .DataBits = 8
            .StopBits = StopBits.One
        End With
    End Sub
    Public Function ReadScale() As String
        Dim _scaleValue As String
        SerialPort.Open()
        _scaleValue = SerialPort.ReadLine
        SerialPort.Close()
        Return _scaleValue
    End Function
End Class

Public Sub mac()
dim myScale as New Scale
End Sub

I am getting "Expected Identifier" Error. What's wrong?

 

how is your project setup?
i created new Winforms project for .NET and got no complaints until i tried accessing it. and since i have no COM5 port of course it got stuck...

 

Imports System.IO.Ports
Imports System.IO
Public Class Scale
    Private WithEvents SerialPort As New SerialPort()
    Private Const COM_PORT As String = "COM5" ' Change this to your COM port
    Public Sub New()
        ' Constructor logic here if needed
        With SerialPort
            .PortName = COM_PORT
            .BaudRate = 9600
            .ReadTimeout = 1000
            .Parity = Parity.None
            .DataBits = 8
            .StopBits = StopBits.One
        End With
    End Sub
    Public Function ReadScale() As String
        Dim _scaleValue As String
        SerialPort.Open()
        _scaleValue = SerialPort.ReadLine
        SerialPort.Close()
        Return _scaleValue
    End Function
End Class

Public Sub mac()
dim myScale as New Scale
End Sub

I am getting "Expected Identifier" Error. What's wrong?

Show a screenshot of the error, I guess this is Visual Studio, so show me the error, its a syntax error so what line etc? you won't get much help asking a question like this and not giving details.

 

C:\Windows\Microsoft.NET\Framework64\v4.0.30319\RegAsm.exe C:\Users\arrow\source\repos\Gowtham\Scale_Project\bin\Debug\Scale_Project.dll /tlb /codebase

did the Magic

 

C:\Windows\Microsoft.NET\Framework64\v4.0.30319\RegAsm.exe C:\Users\arrow\source\repos\Gowtham\Scale_Project\bin\Debug\Scale_Project.dll /tlb /codebase

did the Magic

Wow, ancient history, that's pretty old stuff you're doing there.

 

Wow, ancient history, that's pretty old stuff you're doing there.

That's what exactly is the requirement