هنرستانيها

flags در منوهای کشویی یا PopupMenu

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

PopupMenu menuname, flags, x, y, boldcommand

PopupMenu: کلمه کلیدی برای نمایش منوی کشویی

menuname : نام منو

اما Flags ها :

flags : مکان نمایش منوی کشویی را فرم مشخص می کند

Flag	Value	شرح
vbPopupMenuLeftAlign	0	(پیش فرض) منوی کشویی در سمت چپ محل ماوس قرار می گیرد
vbPopupMenuCenterAlign	4	منوی کشویی در سمت مرکز محل ماوس قرار می گیرد
vbPopupMenuRightAlign	8	Translate text or webpage Type text or a website address or translate a document. Cancel English to Persian translation منوی کشویی در سمت راست محل ماوس قرار می گیرد

x, y : محل باز شدن منوی کشویی

boldcommand : نمایش یکی از زیر منوها به صورت bold

PopupMenu menuname, , , , SubMenuName

+ نوشته شده در جمعه پانزدهم مهر 1390ساعت 12:57 توسط |

copy :

Clipboard.SetData Image1.Picture, vbCFDIB

paste :

Image2.Picture = Clipboard.GetData

vbCFDIB يکي از فرمتهاي VB که نوع داده را از Bitmap مشخص مي کند.

+ نوشته شده در چهارشنبه سیزدهم مهر 1390ساعت 21:39 توسط |

چند روز پیش یکی از هنرجو ها از من پرسید که cut چه طوری انجام میشه؟

آخه داشتم درباره clipboard و copy و paste صحبت می کردم.

یه چیزی به ذهنم اومد و به طور شفاهی گفتم! امروز دوباره سوال به ذهنم اومد و فرضیه! خودمو تست کردم

جواب داد!!!!!!!!!

Clipboard.SetText (Text1.SelText)

Text1.SelText = ""

بعدش هم عمل paste:

Text1.Text= Clipboard.GetText

+ نوشته شده در چهارشنبه سیزدهم مهر 1390ساعت 20:35 توسط |