PDA

View Full Version : نمایش اعداد به صورت فارسی در حالت چپ به راست



yasamini
یک شنبه 05 مهر 1383, 11:42 صبح
وقتی با فونت tahoma کار میکنم و مثلا توی یک textbox متنی تایپ میشه وقتی از راست به چپ تایپ میشه اعداد فارسی هستند چطور میشه در حالت چپ به راست هم اعداد به صورت فارسی نشون داده بشن؟

Microsoft.net
دوشنبه 06 مهر 1383, 08:11 صبح
دوست عزیز وقتی خاصیت right to left اون شی true باشه این عمل اتفاق می افته

kamran_dotnet
سه شنبه 07 مهر 1383, 07:19 صبح
اگر منظورت عکسیه که گذاشتم باید این کار رو بکنی

Function numberConverter(ByVal inputString As String, ByVal outputString As TextBox) As String
Dim iCnt As Integer
Dim iCode As Integer
Dim strReturn As String
Dim tmpGetChar As String

iCode = 1776

For iCnt = 1 To inputString.Length
tmpGetChar = Mid(inputString, iCnt, 1)
If IsNumeric(tmpGetChar) Then
strReturn &= ChrW(iCode + (AscW(tmpGetChar)) - AscW("0"))
Else
strReturn &= tmpGetChar
End If
Next
outputString.Text = strReturn
End Function