国产探花免费观看_亚洲丰满少妇自慰呻吟_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->

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 宜良县| 安宁市| 广平县| 富源县| 瑞丽市| 汉沽区| 江北区| 衡东县| 循化| 安平县| 遂川县| 景洪市| 墨竹工卡县| 云南省| 裕民县| 青河县| 周宁县| 陆丰市| 无棣县| 岚皋县| 屯留县| 宽城| 加查县| 丰城市| 利川市| 安国市| 婺源县| 韶山市| 夏河县| 灵璧县| 松溪县| 南城县| 静乐县| 克什克腾旗| 石台县| 和平区| 丹江口市| 工布江达县| 东台市| 油尖旺区| 福泉市|