این 2 تا نمونه رو ببینید
دوتا ابزار برای رسم نمودار :
یه ابزار جالب: (Trigonometric Functions)
برای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید
دانلود
--------------
ابزار خود ویبی:
دانلود
کاربر شهرسختافزار
مدیر بازنشسته
این 2 تا نمونه رو ببینید
دوتا ابزار برای رسم نمودار :
یه ابزار جالب: (Trigonometric Functions)
برای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید
دانلود
--------------
ابزار خود ویبی:
دانلود
___________________________________________My Resume/CV
Mobin Ranjbar
Programmer / App Developer / Software Engineer / Scrum Master / Student
My System Config Validation
___________________________________________
aslani606 (06-03-10)
مدیر انجمن برنامه نویسی و رباتیک
با سلام!
یک برنامه با زبان ویژوال بیسیک 6 می خواستم که ضرایب یک معادله ی درجه ی 2 را بگیرد و ریشه های معادله را نشان دهد.
من یک سورس نوشتم اما کامپایلر ندارم:
لطفا با استفاده از این سورس یک برنامه ی کامپایل شده ی .EXE برایم تهیه کنید.Dim a, b, c, d, xone, xtwo As Long
Command1_Click:
a = Val(Text1)
b = Val(Text2)
c = Val(Text3)
If a = 0 Or b = 0 Or c = 0 Then
MsgBox "The value can't be 0"
Exit Sub
End If
d = (b ^ 2) - 4 * (a * c)
If d < 0 Then
MsgBox "No answer"
Exit Sub
End If
If d = 0 Then
xone = (-1 * b) / (2 * a)
MsgBox "The answer is " + Str(xone)
Exit Sub
End If
xone = ((-1 * b) + (d ^ 1/2)) / (2 * a)
xtwo = ((-1 * b) - (d ^ 1/2)) / (2 * a)
MsgBox "The answers are" + Str(xone) + " and "+ Str(xtwo)
شکل ظاهری برنامه:
برای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید
یک نمونه برنامه با VB.net
فکر کنم نوشتن این برنامه تو vb6 آسون باشه ! نیاز فوری به این برنامه دارم !
با سپاس
آرمینبرای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید
'چو ایران نباشد، تن من مباد
Dim Armin As Iranian
If Iran.Enabled = False Then Armin.Enabled = False
aslani606 (06-03-10)
مدیر بازنشسته
سورسی که شما نوشتی کاملا درسته ولی متاسفانه من روی سیستمم VS.Net 2008 نصبه و visual Basic 6 ندارم اما هرچه سریعتر واست انجامش میدم ..
___________________________________________My Resume/CV
Mobin Ranjbar
Programmer / App Developer / Software Engineer / Scrum Master / Student
My System Config Validation
___________________________________________
مدیر انجمن برنامه نویسی و رباتیک
با سلام!
مبین جان مشکلم حل شد! دیگه بهش نیاز ندارم!برای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید
با سپاس
آرمین
'چو ایران نباشد، تن من مباد
Dim Armin As Iranian
If Iran.Enabled = False Then Armin.Enabled = False
کاربر شهرسختافزار
سلام - تشکر می کنم از دوستان خوبم به خاطر چیزهای زیادی که ازشون یاد گرفتم
من مشغول نوشتن یک برنامه بانک اطلاعاتی هستم که تو این برنامه اطلاعات افراد مثل نام ، نام خانوادگی و... وارد می شه و در قسمت جستجو به مشکل برخوردم.
اما مشکل من :
من می خوام جستجوم بر اساس نام خانوادگی باشه و وقتی به عنوان مثال نام "احمدی" رو جستجو کردم اگه مثلا 10 تا احمدی دارم رو تو یه MSFlexGrid بهم نشون بده که بلد نیستم.
اگه کسی از دوستام می تونه کمکم کنه - می دونید که آخر ترمه!
بازهم تشکر.
|
|
مدیر بازنشسته
با سلام .. دوست عزیز ورود شما رو به این انجمن تبریک میگم .. در ضمورد سوالتون : باید DataSource شیء MsFlexgrid رو به شیئ دیتابیستون وصل کنید .. به عنوان مثال اگر از شی Adodc1 استفاده میکنید و اگر بخواین وصل کنید به DataGrid1 ار کد زیر استفاده میشه :
Set datagrid1.DataSource = adodc1
با نوضتن این کد به محض تغییر RecordSource محتویات لیست هم تغییر میکنه با توجه به اون کد SQL ..
___________________________________________My Resume/CV
Mobin Ranjbar
Programmer / App Developer / Software Engineer / Scrum Master / Student
My System Config Validation
___________________________________________
gorganweb (12-06-08)
کاربر شهرسختافزار
مبین جان متشکرم از جوابت ، ولی مشکل من برقراری ارتباط بانکم با MSFlexGrid نيست .
مشکل من برای قسمت سرچ (Search) برنامه ست ،همونطور که گفتم من می خوام وقتی یه نام خانوادگی رو جستجو کردم مثلا اگر 10 تا از این فامیلی رو تو بانکم داشتم واسه من این 10 تارو تو یه MSFlexGrid دیگه نشون بده.
متشکر
مدیر بازنشسته
منظورتو متوجه نمیشم ... خوب وقتی کد سرچ رو درست بنویسی و بانکتم وصل باشه به جدول دیگه موردی واسه نمایش وجود نداره .. پیشنهاد می کنم پروژهت رو اینجا بزاری تا بتونیم راحت تر روش کار کنیم
___________________________________________My Resume/CV
Mobin Ranjbar
Programmer / App Developer / Software Engineer / Scrum Master / Student
My System Config Validation
___________________________________________
holms (24-07-08)
کاربر شهرسختافزار
ايول خيلي كاربرديه
1 کاربر در حال مشاهده این موضوع. (0 عضو و 1 میهمان)
Bookmarks