رفتن به مطلب
بیسیک فور ایکس
  • اطلاعیه ها

    • H@mid.RS

      جذب نیرو   پنجشنبه, 10 فروردین 1396

      درود به دوستان عزیز به چند نفر مدیر برای بخش های php و گرافیک نیازمندیم درصورت تمایل درخواست خود را در پیام خصوصی بفرستید  
    • H@mid.RS

      تغییر نام کاربری   دوشنبه, 28 فروردین 1396

      درود دوستانی که نام کاربری انها با ایمل شان یکی بود تغییر کرد مثلا نام کاربری sss@tmail.com به sss تغییر کرد دوستانی که مشکل ورود دارند @ به بعد را پاک کنند
    • H@mid.RS

      کسب درآمد   پنجشنبه, 31 فروردین 1396

      دوستانی که میخواهند با انجمن خودشون همکاری کنند و از محیط انجمن درآمد کسب کنند به بنده پیام خصوصی بفرستند
    • H@mid.RS

      راه اندازی وبلاگ برای انجمن   دوشنبه, 18 اردیبهشت 1396

      درود به همه دوستان عزیز از این پس کاربران ویژه  - همکاران - و مدیران میتوانند در انجمن برای خود وبلاگ بسازند

مبتدی

کاربر عادی
  • تعداد ارسال ها

    9
  • تاریخ عضویت

  • آخرین بازدید

درباره مبتدی

  • تاریخ تولد تعیین نشده
  1. جدا سازی لینک با توابع string

    Dim m As Matcher m = Regex.Matcher("dat=(\S+)",s) If m.Find Then Dim result as String = Regex.("?", m.Group(1)) Return result(0) End If
  2. مشکل در راه اندازی دیتابیس

    احتمالا کوئریتون خروجی نداره
  3. وارد کردن کاراکتر فارسی در دیتابیس

    شما هر چی به دیتابیس بدید همون رو ذخیره می کنید عموما هم utf8 ذخیره می شه، پس باید اعداد فارسی رو خودتون به دیتابیس منتقل کنید. برای همین اعداد انگلیسی را به فارسی تبدیل کنید و سپس اقدام به ذخیره سازی اون کنید ولی در حال حاضر اطلاعاتتون که در بانک ذخیره شده را هم میتوانید با یه فونت فارسی به راحتی در برنامه خودتون نمایش بدید این تابعی رو که دوستمون قرار دادند، دقیقا نیاز شما رو مرتفع می کنه و اعداد لاتین رو به فارسی تبدیل می کنه Sub CovertLatin2Persian(Str As String) As String Dim te As String = Str te = te.Replace("1","۱") te = te.Replace("2","۲") te = te.Replace("3","۳") te = te.Replace("4","۴") te = te.Replace("5","۵") te = te.Replace("6","۶") te = te.Replace("7","۷") te = te.Replace("8","۸") te = te.Replace("9","۹") te = te.Replace("0","۰") Return te End Sub
  4. ارور code1 در فراخوانی از دیتابیس

    پیغام خطا واضحه و میگه چنین تیبلی وجود نداره شما باید در ابتدا دلیل ساخته نشدن اون تیبل رو بررسی کنید. احتمال خیلی زیاد فایل دیبتابیس جدیدتون که تیبلهای جدید ساختید در گوشیتون بروز رسانی نشده پس در ابتدا برنامه را حذف و مجدد اقدام به گرفتن خروجی و نصب برنامه کنید و یا فایل دیتابیس جدید رو جایگزین قبلی کنید
  5. فاکتوریل

    dim result_fac, num as int result_fac=1 num=txt_num_1.Text For i=1 To num result_fac=result_fac*i Next Msgbox(result_fac,"")
  6. force close برنامه

    فعلا با این حل شد Sub Globals Dim stayawake As PhoneWakeState End Sub Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("whatever") stayawake.KeepAlive(True) End Sub Sub Activity_Resume stayawake.KeepAlive(True) End Sub Sub Activity_Pause (UserClosed As Boolean) stayawake.ReleaseKeepAlive End Sub
  7. force close برنامه

    باسلام خدمت اساتید محترم برنامه ای که الان مشکل داره به یک دیتابیس وصله و در ابتدای اکتیویتی کوئری ران شده و کرسر آن همواره فعاله وقتی که گوشی به منبع تغذیه وصله و به حالت خواب میره (در صورتی که برنامه فعاله) پس از دقایقی که مجدد گوشی را روشن می کنم در ابتدا صفحه ی کلین مستر (نشان دهنده میزان شارژ و...) ظاهر شده و پس بستن آن لاک گوشی و پس از آن، صفحه برنامه را که می خواهد نمایش دهد، force close می دهد همین تست را با یکی از بازیهای ایرانی انجام دادم، و مشاهده کردم برنامه مورد نظر مجدد از ابتدا اجرا شد و مشکلی پیش نیامد. بفرمایید فکر می کنید مشکل از کجاست!؟ البته در حالت دیباگ هیچ مشکلی مشاهد نشد و فورس کلوز هم داده نشد و برنامه به طور طبیعی کار می کنه باسپاس
  8. تشخیص یک کلمه در رشته

    http://basic4x.ir/topic/981-%D8%AA%D8%B4%D8%AE%DB%8C%D8%B5-%DB%8C%DA%A9-%DA%A9%D9%84%D9%85%D9%87-%D8%AF%D8%B1-%D8%B1%D8%B4%D8%AA%D9%87/#entry4245 پست قبلی به خوبی پاسخ سوال شما رو داده...
×