[ Bojan11 @ 11.05.2006. 17:05 ] @
Pozdrav grupi, trebam pročitat sa serijskog porta 14 hex-a znamenki, pokušavam sa ovom procedurom , ali neide baca mi nekakve čudne znakove ovako : "005E97B2" To bi trebale biti samo brojke bez ovih slova....gdje griješim? HVALA #Region "ČITANJE INDUKTIVE KARTICE" 'ČITANJE KARTICE INDUKTIVNE Delegate Sub InvokeDelegate() Public Sub InvokeMethod() Dim strSerialPortData As String = SerialPort1.ReadExisting TextBox2.Text = (strSerialPortData) End Sub Private Sub textbox(ByVal sender As System.Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived TextBox2.BeginInvoke(New InvokeDelegate(AddressOf InvokeMethod)) End Sub #End Region |