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

首頁 > 學院 > 開發設計 > 正文

利用VB實現浮動按鈕

2019-11-18 17:26:54
字體:
來源:轉載
供稿:網友
在微軟的很多軟件(如Word)的工具欄中,都采用一種浮動按紐,即正常情況下按紐的圖標呈灰色,當鼠標移動到某一按紐時,該按紐自動向上凸起且變為彩色,并在按紐的右下方有一標簽提示該按紐的功能,鼠標移開后又自動還原,這種按紐用VB實現時,方法如下:
1.先用繪圖工具作出按紐圖標后存盤(如1.bmp),再用圖象處理軟件將該圖標轉換為灰度圖或浮雕圖后再存盤(如2.bmp)。
2.運行VB,建立一新窗體(如form1)。
3.在窗體上需要建立按紐的位置處建立一圖片框(如image1),其大小和圖標相同,并將其picture屬性設為2.bmp。
4.在image1周圍建立由四個長度相同的line控件(如line1~4)組成的方框,方框要比image1控件稍大,否則達不到預計效果,將上面和左邊的顏色設成白色,下面和右邊的設成黑色,并將四個line控件的visible屬性都設成false。
5.在程序中加入以下內容即可:
Line1.Visible=False
Line2.Visible=False
Line3.Visible=False
Line3.Visible=False
EndSub->


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 浏阳市| 卢湾区| 灵璧县| 黑山县| 财经| 揭阳市| 城口县| 广安市| 牙克石市| 黔西县| 卢湾区| 乌拉特中旗| 奇台县| 临夏县| 武城县| 泰安市| 托克逊县| 文山县| 凉城县| 中西区| 伊川县| 泸西县| 从化市| 额尔古纳市| 鄂尔多斯市| 宜川县| 兴宁市| 斗六市| 休宁县| 晋中市| 桃园市| 江门市| 绍兴县| 教育| 盐亭县| 岢岚县| 晋江市| 沅江市| 长岛县| 锡林浩特市| 鞍山市|