سیاه و سفید شدن اطراف برنامه و تبدیل حروف کوچک به بزرگ

[parselearn]

دوستان حتما هنگام کلیک بر روی کلید Turn Off دیده اید که صفحه ای برای شما باز می شود
که اطراف را سیاه سفید کرده. من در برنامه های دیگه هم چنین حالتی رو دیدم
کسی برای این عمل کدی داره

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

با تشکر

[ali_habibi1384]

در باره سوال دومت باید بگم توابع API زیادی هست که صفحه کلید رو تغییر زبان می ده . نمونه اش رو در تاپیک 100 سورس از توابع API که خودم ایجادش کردم می تونین ببینید.

[vbhamed]

سلام
1 -
برای سؤال اول ابتدا کل صفحه عکس بگیرید با توابع Api که نمونه تو سایت هست
عکس رو در داخل فرم قرار بدین و فرمتون بدون حاشیه و تمام صفحه کنید
یک در میان روی فرم پیکسل سیاه رنگ بزارین، خاصیت AutoRedraw حتما True باشه
فرم دومی که مثلا همان فرم Logoff هست رو نمایش بدین


2 -


Private Sub Text1_Change()

dim p%
p=text1.selstart
text1=ucase$(left$(text1,1)) & mid$(text1,2)
text1.selstart=p
DoEvents

End Sub