تکه کد کاربردی برعکس کردن متن یا Reverse
و گرفتن خروجی از ساب به صورت زیر می باشد :
✨ نکات مهم:
• کد آماده و تستشده (2 قطعهکد)
• کپی و استفاده مستقیم در پروژه B4A
🚀 نحوه استفاده:
کد زیر را کپی کنید و در Sub یا ماژول مناسب پروژه خود قرار دهید؛ کتابخانههای اعلامشده را تیک بزنید.
| دستهبندی | تکه کدها |
| تاریخ انتشار | ۲۷ شهریور ۱۴۰۵ - ۰۱:۵۲ |
| تعداد بازدید | ۱ |
| تعداد فروش | ۰ |
| فرمت تحویل | فایل دانلودی (بعد از پرداخت آنی فعال میشود) |
| پشتیبانی | تیکت پشتیبانی در پنل کاربری |
ویژگیهای کلیدی
- تکهکد آماده B4A
- کاملاً رایگان
- کد تستشده با توضیح فارسی
هنوز نظری ثبت نشده است. اولین نفر باشید!
برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال میشود)
Sub Reverse (T As String) As String
Dim s As String
For i = T.Length - 1 To 0 Step -1
s = s & T.CharAt(i)
Next
Return s
End Sub
Log(Reverse("YAHOO98")) 'خروجی: ۸۹OOHAY