نام کلوب :ویژوال بیسیک
نام انگلیسی : visualbasicpro
تاسیس : 14 بهمن 1383
1069 عضو ، 304 بحث ،

ویژوال بیسیک

تبلیغات

__
عنوان بحث
سوال در یک الگوریتم
4 مرداد 87 - 11:44
سلام به همگی
ببنید من یه برنامه نوشتم شبیه نقطه بازی . فرقش اینه که به جای یک مربع میتونه یه مساحت شامل چند مربع رو پر کنه ..و همچنین هر نقطه امتیاز خاصی رو داشته باشه و اون مساحتی که پر میشه امتیاز نقطه های مرزی و داحل مساحت رو به رنگ برنده بده . من شکل ظاهری برنامه رو نوشتم و همچنین میتونه دور رو تشخیص بده ولی نمیدونم با چه الگوریتمی باید مربع های داخلش رو پر کنم . م ن فقط الگوریتمشو میخوام نه کدشو . اگر کسی میتونه کمکم کنه بگه تا فایل برنامه رو براش بفرستم . (من فقط تا 8 تیر وقت دارم)
پاسخ ها
ترتیب پاسخ ها : از اولین پاسخ
4
15 مرداد 1387 ساعت 06:08
نقل قول از : هادی عبدالمالکی

سلام
یه سوال داشتم و اون هم اینکه من 100 فایل ورد دارم که می خوام پسوندشون از  doc.* به rtf.* تبدیل کنم .
 آیا امکان اینکه تو vb برنامه نوشت که این کار انجام بده هست؟؟ اگه هست ممنون میشم به هم بدین

ما  از  تابع  زیر  استفاده  کنید 

اینم  توضیحات کامل

تابع SHFileOperation

------------------------------------------------------------------

فراخوانی در وی بی :

Declare Function SHFileOperation Lib  "shell32.dll" Alias "SHFileOperation A"

(ByRef lpFileOp As SHFILEOPSTRUCT) As Long                  

 ------------------------------------------------------------------

توضیحات و کاربرد تابع :

این تابع عملیات Rename , Move ,  Copy و یا Delete را برروی فایل و یا پوشه انجام می دهد .

------------------------------------------------------------------

مبدأفراخوانی : Shell32.dll

------------------------------------------------------------------

مقادیربازگشتی:

مقدارصفربه منزله عدم موفقیت تابع می باشد ومقادیر غیرصفرموفقیت آن را می رساند .

------------------------------------------------------------------

توضیحات مربوط به پارامترها :

این متغیر به ساختارshFileOpstruct اشاره دارد که فیلد های این

 ساختار نحوه ونوع کارتابع را مشخص می کند . فیلدهای این ساختاربه شرح زیر می باشند :

WFunc  : مقداراین فیلد ،کارتابع را مشخص میکند که می تواند

 یکی ازمقادیر FO_Rename   Fo_Copy  ,  Fo_Delete  ,  Fo_Move باشد .

 PForm: مقداراین فیلد درهرحالت متغیر WFuncمسیر ونام فایل

 مبدأ می باشد درضمن می توان درنام فایل ازکاراکترهای * ویا ؟ استفاده کرد .

 PTo: مقداراین فیلد ، درهرحالت متغیرWFunc به جزFo_Delete مسیر

 و نام مقصد می  باشد . درحالت Fo_Delete  مقداردهی این فیلد لزومی ندارد .

 fFlags: درحالت Fo_Delete اگراین فیلد بامقدارFOF_Allpwundo

مقداردهی شود فایل پاک شده ابتدا به داخل  Recycle Binریخته می شود

 ودرصورتی که مقدار دهی نشود فایل یکسره ازمبدأ پاک خواهد شد ودیگربه سطل زباله منتقل نمی شود .

  Hwnd: مقداراین فیلد مشخص می کند که تابع تحت کدام پنجره باید فراخوانی شود .

 

 

 

   

3
8 مرداد 1387 ساعت 03:11
نقل قول از : هادی عبدالمالکی

سلام
یه سوال داشتم و اون هم اینکه من 100 فایل ورد دارم که می خوام پسوندشون از  doc.* به rtf.* تبدیل کنم .
 آیا امکان اینکه تو vb برنامه نوشت که این کار انجام بده هست؟؟ اگه هست ممنون میشم به هم بدین


سلام هادی جان

اول اینکه این بخش مزربوط میشه به سوال دوستمون مینا و بهتره که شما سوالت رو تو یه تاپیک جدید مطرح کنی

دوم اینکه بله ، میشه . من برای شما مینویسم و سورسش رو داخل تاپیک بانک کد مینویسم .

موفق باشی

 

----

*کد در تاپیک مثالهای کاربردی ( بانک کد ) قرار داده شد

2
8 مرداد 1387 ساعت 02:33
سلام
یه سوال داشتم و اون هم اینکه من 100 فایل ورد دارم که می خوام پسوندشون از  doc.* به rtf.* تبدیل کنم .
 آیا امکان اینکه تو vb برنامه نوشت که این کار انجام بده هست؟؟ اگه هست ممنون میشم به هم بدین
1
7 مرداد 1387 ساعت 05:27

برنامه رو برام بفرست

 

اما توضیحی که خو.دتم می تونی ازش استفاده کنی ! مربع را رو Label قرار بده بعد Backcolor رو به رنگ مورد نظر تغییر بده البته با دستورات شرطی ای که بهش میدی ! اگر هم از این برچسب ها آرایه درست کردی میشه Label(i).backcolor که i نمابنده مربع مورد نظر از آرایه هست مثل 1 یا 2 یا 3 ...

__