VB用point識別picture像素點顏色,需要調整哪些屬性?
picture控制元件的高和寬是以像素點為單位的么?
uj5u.com熱心網友回復:
默認以緹為單位,15緹=1像素ScaleHeight和ScaleWidth是內部可用區域的高和寬
Height和Width是外部整體的高和寬
兩者區別就是邊框大小是否考慮進來。
uj5u.com熱心網友回復:
給你個案例,對一張圖片的左半邊進行處理
Option Explicit
Private Sub Command1_Click()
Picture1.ScaleMode = 3 '把容器內部的坐標系單位設定成像素
Picture1.AutoRedraw = True
Set Picture1.Picture = LoadPicture("B:\test.jpg") '匯入一張測驗圖片
Dim x As Long
Dim y As Long
For x = 0 To Picture1.ScaleWidth / 2 '遍歷圖片左半邊的所有像素
For y = 0 To Picture1.ScaleHeight
'逐個像素取色,然后取反,做出底片效果
Picture1.PSet (x, y), Not Picture1.Point(x, y)
DoEvents
Next
Next
End Sub
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/30187.html
標籤:控件
下一篇:VB資源管理器呼叫EXE檔案
