استفاده از این محتوا رایگان میباشد

چارا برای خلق ارزش و توسعه مهارت های درونی و رشد استعدادها و جایی برای انجام پروژهای برنامه نویسی هست، هدف ما پیاده سازی ایده شما و توسعه مهارت های فردی کاربران برای ارتقا و اجرای هدفمندانه کسب و کارها میباشد بیشتر آموزش های سایت به صورت رایگان در اختیار شما هستند اما برای دسترسی به همه آموزش ها نیازمند تهیه عضویت ویژه سایت ما میباشید.

افزایش اتوماتیک نام فایل ها بیسیک فور اندروید

اگه یه فایلی رو با گوگل کروم دانلود کرده باشین و اونو قبلا ذخیره داشتین به اسم فایل جدید یک عدد اضافه میشه.به اسم اون فایل قبلی و اینجور Replace نمیشه دیگه 

Sub checkfilename(dir As String,filename As String, lastint As Int,lastfilename As String) As String

Dim filename2(2) As String = Regex.Split(“\.”,filename)
Dim filename3 As String = filename
If File.Exists(dir,lastfilename) = True Then
lastint = lastint +1

lastfilename = filename2(0) & “(” & lastint & “)” & “.” & filename2(1)

checkfilename(dir,filename3,lastint,lastfilename)

Else

Return lastfilename

End If

غیر فعال کردن استاتوس بار بیسیک فوراندروید
فهمیدن اجرای سرویس بیسیک فور اندروید
, , ,

دیدگاهتان را بنویسید

نشانی ایمیل شما منتشر نخواهد شد. بخش‌های موردنیاز علامت‌گذاری شده‌اند *

این قسمت نباید خالی باشد
این قسمت نباید خالی باشد
لطفاً یک نشانی ایمیل معتبر بنویسید.
شما برای ادامه باید با شرایط موافقت کنید

فهرست