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

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

VisualBasic產生漸層的Form背景

2019-11-18 17:31:22
字體：大 中 小
來源：轉載
供稿：網友
在Form_Load中加入以下程序碼

SubForm_Load()
Form1.AutoRedraw=True
'使Form物件的自動重繪有效
Form1.DrawStyle=6
'直線的樣式為內實線(6-vbInsideSolid)
Form1.DrawMode=13
'copyPen-由ForeColor屬性指定的顏色。(13-vbCopyPen)
Form1.DrawWidth=2
'輸出的線寬為2像素(Pixel)

'為繪圖或列印建立一自訂的座標比例尺
'圖形像素為顯示器或印表機解析度的最小單位
Form1.ScaleMode=3
'設定物件座標的量測單位為像素(3-VbPixels)
Form1.ScaleHeight=(256*2)
'設定垂直量測單位值為512
Fori=0To255
Form1.Line(0,Y)-(Form1.Width,Y 2),RGB(0,0,i),BF
Y=Y 2
Nexti
'RGB(red,green,blue)
'B:使一方塊用一指定方塊對角的座標畫出
'F:指定此方塊系以用來畫方塊的色彩來加以填滿(有B才可用F)
EndSub->

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 鹰潭市| 九龙县| 西华县| 元阳县| 特克斯县| 佳木斯市| 阿瓦提县| 东兴市| 静安区| 四平市| 高安市| 大姚县| 榆中县| 抚宁县| 枣阳市| 谷城县| 青冈县| 建昌县| 元江| 曲阜市| 梅州市| 定南县| 井陉县| 城口县| 化德县| 太和县| 潞西市| 喜德县| 商南县| 简阳市| 泸水县| 确山县| 讷河市| 岳阳县| 平昌县| 方正县| 德保县| 积石山| 广灵县| 临海市| 冷水江市|