دانلود برنامه ي كاربردي براي تمامي كاربران عزيز (همراه با سورس)

[MohammadGh2011]

سلام دوستان
من يه برنامه كاربردي براتون همراه با سورس گذاشتم
بعد از اجراي برنامه در پايين سمت راست برنامه اجرا ميشود(آنجايي كه برنامه ها درحال اجراهستند)
و راست كليك بر روي اين برنامه يك سري ابزارها را براي شما به نمايش ميدهد.
براي مثال اگر شما گزينه ي only copy Grab to Clipboard
را انتخاب كنيد و بر روي آيكون برنامه (شبيه دست)دوبار كليك كنيد خواهيد ديد كه به شما امكان كشيدن روي هر كجا را ميدهد كه بعد از كشيدن آنجا كپي خواهد شد.
اميدوارم كه از اين برنامه استفاده كنيد و از من راضي باشيد.

[MohammadGh2011]

آموزش چند زبانه كردن برنامه(مثال)
دوستان با اين مثال شما به راحتي ميتونيد برنامتون رو چند زبانه كنيد.

[MohammadGh2011]

درود بر شما دوستان عزيز
ميخوام ايجاد كردن منوي راست كليك رو بهتون آموزش بدم
اول توسط Menu Editor منو و تعدادی SubMenu (زیر منو) ایجاد کرده و علامت Visible منویی که ایجاد کرده ایم را بر می داریم .
کد زیر را در Event (ٍرویداد) MouseDown می نویسیم :

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

'Button = 1 :=> For LeftClick
'Button = 2 :=> For RightClick
If Button = 2 Then
PopupMenu MnuFile
End If

End Sub

حالا برنامه رو اجرا كنيد و راست كليك كنيد ميبينيد كه راست كليك ظاهر ميشود

[MohammadGh2011]

دوباره سلام دوستان
دوستان من يك ocx زيبا از msgbox دارم و ميخوام بهتون اموزش بدم كه چه طور ازش استفاده كنيد
اول ocx رو دانلود كنيد كه در پايين براتون گذاشتم
بعد از دانلود كردن ocx اون رو به جعبه ابزارتون(Tool Box) اضافه كنيد بعد يك commandButton
به فرمتون اضافه كرده و دستو رات زير را داخل اون كپي كنيد

Private Sub Command1_Click()
MsgBoxX1.Text = "متن داخل مسج باكس"
MsgBoxX1.Title = "عنوان"
MsgBoxX1.Buttons = 0
MsgBoxX1.Icon = 1
MsgBoxX1.Show
End Sub

اين msgbox چهارتا آيكون داره كه شما ميتونيد در خط پنجم برنامتون يعني
MsgBoxX1.Icon = 1
اعداد 2و3و4 را جايگزين عدد يك كنيد و برنامه را اجرا كنيد تا آيكون مسج باكس تغيير يابد
و در خط چهارم يعني
MsgBoxX1.Buttons = 0
اعداد يك تا سه را به جاي صفر جايگزين كنيد تا دكمه هاي مسج باكس تغيير كند براي مثال
اگر شما عدد 2 را به جاي صفر بگذاريد دكمه هاي انصراف و تاييد به نمايش در مي آيد
كه خودتان امتحان كنيد
موفق باشيد دوســــــــــــــــــــــ ــــــــــــــــــــــتان

[MohammadGh2011]

سلام
حالا يه OCX ماشين حساب كوچيك و زيبا رو ميتونيد تو برنامه هاتون ازش استفاده كنيد. براتون گذاشتم.
بعدا چيزهاي زيادي هم بهش اضافه ميشه.كه تو همين جا براتون خواهم گذاشت.
موفق و سربلند باشيد عزيزان.

[Mr'Jamshidy]

اینجا جا داره که از شما تشکر کرد اما اگر سورس هاتون رو در لینک زیر آپلود میکردید بهتر بود
آرشیو سورس های کاربردی و بدردبخور (http://barnamenevis.org/showthread.php?81542-%D8%A2%D8%B1%D8%B4%DB%8C%D9%88-%D8%B3%D9%88%D8%B1%D8%B3-%D9%87%D8%A7%DB%8C-%DA%A9%D8%A7%D8%B1%D8%A8%D8%B1%D8%AF%DB%8C-%D9%88-%D8%A8%D8%AF%D8%B1%D8%AF%D8%A8%D8%AE%D9%88%D8%B1)


چون اینجا فقط ماله همین کاره
هرکس دنبال سورس باشه اینجا رو میگرده
تاپیک به صورت عنوانه و همیشه در دسترس

بازم موفق باشید

[MohammadGh2011]

خيلي ممنونم از جناب Mr'Jamshidy
دوستان همون طور كه دوست عزيزمون آقاي جمشيدي گفتند من از اين به بعد اين جور آموزش ها و سورس ها رو در آرشيو سورس هاي کاربردي و بدردبخور براتون خواهم گذاشت.
از همتون ممنونم.
موفق باشيد
BYE