Goede middag,
Via de seriele poort lees ik data in, deze wordt echter voor sommige tekens onjuist weergegeven in een Rich text box.
De onderstaande "text" zou omgezet moeten worden naar ISO-8859-1.
Heeft iemand een idee of dit mogelijk is?
Het zou zoiets als in onderstaand voorbeeld moeten worden
Via de seriele poort lees ik data in, deze wordt echter voor sommige tekens onjuist weergegeven in een Rich text box.
De onderstaande "text" zou omgezet moeten worden naar ISO-8859-1.
Heeft iemand een idee of dit mogelijk is?
Code:
Dim text As String
If rdbHEX.Checked = True Then
Me.rtbReceived.Text &= (Hex(Asc(text))) 'Display received data as HEX
End IfHet zou zoiets als in onderstaand voorbeeld moeten worden
Code:
Dim text As String
If rdbHEX.Checked = True Then
Me.rtbReceived.Text &= (Hex(Asc(text))) "Encoding.Convert to ISO-8859-1 'Display received data as HEX ISO-8859-1 encoded
End If
