PDA

View Full Version : تبدیل ASCII به HEX



SASAN-BSE
پنج شنبه 17 فروردین 1391, 13:53 عصر
سلام ،
برنامه من میگیره اول یه فایل رو به HEX تبدیل میکنه و یه تغییراتی توش انجام میده و بعد باید دوباره به ASCII تبدیل بشه

قسمت تبدیل ASCII به HEX رو درست کردم
فقط مونده HEX به ASCII

چچجوری اینکارو بکنم؟

ممنون

SASAN-BSE
پنج شنبه 17 فروردین 1391, 18:17 عصر
دوستان من فقط میخوام HEX رو به ASCII تبدیل کنم
مثلا تبدیل A1 به ، و B1 به ±

tstsst
پنج شنبه 17 فروردین 1391, 18:42 عصر
سلام

Public Function hex2ascii(ByVal hextext As String) As String
For y = 1 To Len(hextext)
num = Mid(hextext, y, 2)
Value = Value & Chr(Val("&h" & num))
y = y + 1
Next y
hex2ascii = Value
End Function

Hybrid
پنج شنبه 17 فروردین 1391, 18:44 عصر
دوستان من فقط میخوام HEX رو به ASCII تبدیل کنم
مثلا تبدیل A1 به ، و B1 به ±

سلام بر شما دوست عزیز ،


Label1.Text = ChrW(Convert.ToInt32("B1", 16))


Label1.Text = System.Convert.ToChar(System.Convert.ToUInt32("B1", 16)).ToString()

موفق باشید./

SASAN-BSE
دوشنبه 21 فروردین 1391, 19:47 عصر
دوستان چرا با این دستور ها ناقص تبدیل میشه؟
مثلا کد HEX 89 رو اول به C289 تبدیل میکنه و بعد ASCII
یعنی 89 رو به جای که به ‰ تبدیل کنه به "‰" تبدیل میکنه