بینید این یک فایل دیتابیس در اکسس هست توی هر رکورد چند لغت هست
بین لغتها فاصله هست.کسی میتونه کدی بنویسه که با فشردن یک دکمه برنامه به دیتابیس
اتصال پیدا کنه و در هر رکورد
لغت اول رو بزاره و بقیه لغتهارو پاک کنه؟ یعنی به space اول در رکورد که رسید شروع به حذف کردن کنه.
حجم 7 کیلوبایت http://www.4shared.com/file/48698503...db_online.html
من فکر می کنم اگر از تابع split استفاده کنید، مشکل حل بشه:
a = split ( your string)
a(0) = first wordدر این کد اولین کلمه در a(0) قرار می گیرد. حالا که اولین کلمه رو دارید می شه با replace بقیه رشته رو پاک کرد.
خوب این مسئلله چه ربطی به دیتابیس داره ؟!!
این موضوع مربوط میشه به کار با توابع رشته ای که مثال های زیادی در سایت موجود هست و برای راهنمایی من استفاده از تابع Mid رو پیشنهاد می کنم ...
خب دوسته عزیز میشه بیشتر توضیح بدید؟؟!!!نوشته شده توسط PCM2008
لا اقل بیشتر راهنمایی کنید شما که با تابع midکار کردین
این کد رو نیگاه کن
a = Mid(Text1.Text, 1, 3)
Text1.Text = a
اگه نفهمیدی بگو بیشتر توضیح بدم
ببینید من زیاد وارد نیستم من فقط اگه میشه میخوام بدونم چه دستوری بین این دو خط بزارم که این کارو انجام بده.اولم به دیتابیس متصل شه
privaite sub command_click1
end sun
اگه فکر می کنی با تابع Mid کارت راه بیوفته توضیح میدم واست:
mid(text,start,length)
این تابع برای کار با رشته است. یک رشته رو بعنوان پارامتر ورودی دریافت میکنه و شما می تونی قطعه خاصی از این رشته رو بعنوان خروجی بگیری . مثلا اگر ما 3 کاراکتر از اول رو احتیاج داشته باشیم مقدار start=1 , length=3 خواهد بود .
شما برای کاری که می خوای بکنی با این تابع کاراکترهای مختلف رشته ات رو پیمایش کن و بعد هم با space مقایسه کن اگه درست بود کاری که می خوای با رشته انجام بده.
سلام
اين دستور Sql رو اجرا كن مشكلت حل ميشه
Update Table1 Set FieldName = Left(FieldName, iif(Instr(FieldName & '', ' ')-1>1, Instr(FieldName & '', ' ')-1,Len(FieldName & ''))
اگر من و شما هر كدوم يك چيز ياد داشته باشيم و به هم ياد بديم، حالا هر كدوم دو تا چيز ياد داريم !http://www.ArminaCo.com
قوانین ایجاد تاپیک در تالار
پاسخ با نقل قول