国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發(fā)設計 > 正文

用VB設計聚焦框程序

2019-11-18 17:28:09
字體:
來源:轉載
供稿:網友
什么是聚焦框?在Windows中是這樣解釋的:當某個按鈕被按下或某個控件正在使用時,由一個長方形的虛線框聚焦在此按鈕或控件上來提示用戶它正起作用。但是并非所有的控件在任何時候都能得到焦點(即得到聚焦框),有時我們在日常的編程中也許會用到它,用來提示用戶一些必要的信息。這時你可以這樣做:
  說明:在以下程序中可以使Picture控件得到聚焦框,且程序調用API函數來完成。
  首先,在FORM1上新建一個Picture1和一個Command1,然后輸入以下代碼:

    EndSub
  PrivateSubCommand1_Click()
   DimDENGAsLong
   lpRect.X1=Picture1.Left-10
   lpRect.Y1=Picture1.Top-10
   lpRect.X2=lpRect.X1 Picture1.Width 20
   lpRect.Y2=lpRect.Y1 Picture1.Height 20
   DENG=DrawFocusRect(hdc,lpRect)
  EndSub

  OK,大功告成,按F5運行,通過單擊按鈕Command1就可以實現Picture1控件被聚焦!當然你也可以作適當調整,使它符合你個人的需要。->


發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板: 新安县| 镇江市| 五莲县| 和林格尔县| 秦皇岛市| 清徐县| 泰顺县| 漯河市| 龙山县| 丹棱县| 临泉县| 昔阳县| 延长县| 湘乡市| 大名县| 临朐县| 曲阜市| 奉节县| 郎溪县| 曲麻莱县| 福州市| 新乐市| 米泉市| 阜新| 北京市| 富锦市| 安泽县| 沂南县| 南涧| 镇江市| 泸西县| 武山县| 全椒县| 醴陵市| 腾冲县| 夏津县| 泾川县| 金阳县| 大宁县| 德昌县| 天水市|