با استفاده از تابع زیر به راحتی میتوانید اعداد انگلیسی موجود در یک متن را به اعداد فارسی تبدیل کنید : تابع: Public Sub PersianNumbers(Text As String) As String Dim s As String = Text s = s.Replace("0","۰") s = s.Replace("1","۱") s =...