amir00700 66 ارسال شده در 3 آبان، ۱۳۹۵ اشتراک گذاری ارسال شده در 3 آبان، ۱۳۹۵ من این متن(\u062a\u0633\u062a) که نمیدونم چه نوعی هم هست رو میخوام به string قابل فهم تبدیل کنم میدونم الان این "تست" هستش ولی توی بیسیک چطور بنویسم تبدیل شه لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
porya 959 ارسال شده در 3 آبان، ۱۳۹۵ اشتراک گذاری ارسال شده در 3 آبان، ۱۳۹۵ در 23 دقیقه قبل، amir00700 گفته است : کار نکرد متاسفانه چرا بنده تست کردم که جواب داد... اصلا اونو بیخیال شو بیا از این تابع استفاده کن. Sub Activity_Create(FirstTime As Boolean) Dim str As String = "\u062a\u0633\u062a" Log(UnescapeUnicode(str)) End Sub Sub UnescapeUnicode(s As String) As String Dim sb As StringBuilder sb.Initialize Dim i As Int Do While i < s.Length Dim c As Char = s.CharAt(i) If c = "\" And i < s.Length - 1 And s.CharAt(i + 1) = "u" Then Dim unicode As StringBuilder unicode.Initialize i = i + 2 Do While i < s.Length Dim cc As String = s.CharAt(i) Dim n As Int = Asc(cc.ToLowerCase) If (n >= Asc("0") And n <= Asc("9")) Or (n >= Asc("a") And n <= Asc("z")) Then unicode.Append(s.CharAt(i)) Else i = i - 1 Exit End If i = i + 1 Loop sb.Append(Chr(Bit.ParseInt(unicode.ToString, 16))) Else sb.Append(c) End If i = i + 1 Loop Return sb.ToString End Sub لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
porya 959 ارسال شده در 3 آبان، ۱۳۹۵ اشتراک گذاری ارسال شده در 3 آبان، ۱۳۹۵ سلام به این متن ها اگه اشتباه نکنم کارکترهای unicode میگن برای تبدیل اونها به string از کد زیر استفاده کن فقط کتابخونه JavaObject رو تیک بزن. Dim jo As JavaObject jo.InitializeContext Dim s As String = "\u062a\u0633\u062a" Log(jo.RunMethod("convertToString",Array As Object(s))) #if java public String convertToString(String Str){ String str1 = Str.split(" ")[0]; str1 = str1.replace("\\",""); String[] arr = str1.split("u"); String text = ""; for(int i = 1; i < arr.length; i++){ int hexVal = Integer.parseInt(arr[i], 16); text += (char)hexVal; } return text; } #end if لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
amir00700 66 ارسال شده در 3 آبان، ۱۳۹۵ سازنده اشتراک گذاری ارسال شده در 3 آبان، ۱۳۹۵ در 8 دقیقه قبل، porya گفته است : سلام به این متن ها اگه اشتباه نکنم کارکترهای unicode میگن برای تبدیل اونها به string از کد زیر استفاده کن فقط کتابخونه JavaObject رو تیک بزن. Dim jo As JavaObject jo.InitializeContext Dim s As String = "\u062a\u0633\u062a" Log(jo.RunMethod("convertToString",Array As Object(s))) #if java public String convertToString(String Str){ String str1 = Str.split(" ")[0]; str1 = str1.replace("\\",""); String[] arr = str1.split("u"); String text = ""; for(int i = 1; i < arr.length; i++){ int hexVal = Integer.parseInt(arr[i], 16); text += (char)hexVal; } return text; } #end if کار نکرد متاسفانه لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
amir00700 66 ارسال شده در 3 آبان، ۱۳۹۵ سازنده اشتراک گذاری ارسال شده در 3 آبان، ۱۳۹۵ عالی بود دکمه تشکر کافی نبود واقعا ممنون ازتون عزیز لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
سوال
amir00700 66
من این متن(\u062a\u0633\u062a) که نمیدونم چه نوعی هم هست رو میخوام به string قابل فهم تبدیل کنم
میدونم الان این "تست" هستش
ولی توی بیسیک چطور بنویسم تبدیل شه
لینک ارسال
به اشتراک گذاری در سایت های دیگر
4 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.