واضح آرشیو وب فارسی:سایت ریسک: rasool_bbc17-11-2005, 08:40 PMچطوری میشه به یک نوشته یا همون برچسب( Label خودمون) لینک بدم مثل لینک سایت و ایمیل و کلاً لینک های اینترنتی ... bithiah17-11-2005, 10:49 PMدوست عزیز سوال شما از دو جنبه قابل بحثه: 1. طراحی شکل ظاهری برچسب که احیانا می خواین حالت یه Hyperlink رو داشته باشه، 2. پاسخگویی به کلیک کاربر روی برچسبی که لینک به سایت اینترنتی یا آدرس ای میل مورد نظر شماست. مورد 1-------------------- چون برای ایجاد یه Hypelink در VB 6.0 کنترل مخصوص یا چیز دیگه ای گنجانده نشده، دو راه وجود داره: A. می تونین یه کنترل آماده که برای اینکار طراحی شده، از آدرس های زیر دانلود کنین و اون رو به کنترلهای برنامتون اضافه کنی و بجای Label معمولی ازش استفاده کنین: http://www.pscode.com/vb/scripts/ShowCode.asp?txtCodeId=35482&lngWId=1 http://www.pscode.com/vb/scripts/ShowCode.asp?txtCodeId=34052&lngWId=1 B. با کمی کدنویسی برای کنترل Label می تونین شکل و شمایل یه Hyperlink بهش بدین. که البته من این یکی رو پیشنهاد می کنم، چونکه دیگه نیازی نیشت برنامتون هر جا رفت، اون کنترل اضافی هم باهاش بره. :) : کافیه یه Label معمولی (اینجا برای مثال اسمش lblEmail هست) روی فرمتون بندازین و کد زیر رو براش در فرمتون بنویسین: مورد 2-------------------- برای Browse کردن یه وب سایت یا راه اندازی برنامه ارسال ای میل می تونین از تابع ShellExecute استفاده کنین، که باید با دستو زیر اون رو در سطح ماژول(در بالای فرمتون یا درون یه ماژول) Declare کنین: !!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!! حالا به کد زیر توجه کنین: !!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!! همینطور که می بینین با نوشتن کد بالا، وقتی که کاربر نشانگر ماوس رو روی این برچسب نگه می داره، فونت برچسب دقیقا مثل یه Hyperlink درشت و زیرخط دار می شه و رنگش هم عوض می شه. با کلیک کاربر، تابع ShellExecute نرم افزار ارسال ای میل پیش فرض ویندوز رو فعال می کنه تا به آدرس [email protected] ای میل ارسال کنه. *بجای آدرس ای میل، می تونین آدرس سایت موردنظرتون رو هم بذارین. فقط یه موردی که نباید فراموش کنین اینه که وقتی کاربر ماوس رو از روی برچسب کنار ببره، شکل برچسب باید به حالت عادی یه Hyperlink در بیاد. برای اینکار چون برای Label رویدادی بنام MouseOut نداریم، مجبوریم کد زیر رو در رویداد MouseMove فرم و یا یه Container دیگه که برچسب رو درونش قرار دادیم مثل Frame بنویسیم: !!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!! rasool_bbc17-11-2005, 10:56 PMبابت همه چي ممنون خيلي استفاده كردم از مطالبتون ... سایت ما را در گوگل محبوب کنید با کلیک روی دکمه ای که در سمت چپ این منو با عنوان +1 قرار داده شده شما به این سایت مهر تأیید میزنید و به دوستانتان در صفحه جستجوی گوگل دیدن این سایت را پیشنهاد میکنید که این امر خود باعث افزایش رتبه سایت در گوگل میشود
این صفحه را در گوگل محبوب کنید
[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 258]