سوال درباره کار با رنگ

سلام.
اگر بخواهم با ویژوال بیسیک به رنگهای یک فایل بیت مپ دسترسی داسته باشم و مثلا شدت رنگ قرمز آن را به مقدار دلخواه تغییر دهم ، چطور میتوانم این کار را انجام دهم؟ با تشکر و احترام.

می تونی از متد Pset استفاده کنی. به این تاپیک مراجعه کن :

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

کد:

---

Sub Form_Click()
    Dim CX, CY, Msg, XPos, YPos ' Declare variables.
    ScaleMode = 3  ' Set ScaleMode to
            ' pixels.
    DrawWidth = 5  ' Set DrawWidth.
    ForeColor = QBColor(4)  ' Set foreground to red.
    FontSize = 24  ' Set point size.
    CX = ScaleWidth / 2 ' Get horizontal center.
    CY = ScaleHeight / 2    ' Get vertical center.
    Cls ' Clear form.
    Msg = "Happy New Year!"
    CurrentX = CX - TextWidth(Msg) / 2  ' Horizontal position.
    CurrentY = CY - TextHeight(Msg) ' Vertical position.

Print Msg  ' Print message.
    Do
        XPos = Rnd * ScaleWidth ' Get horizontal position.
        YPos = Rnd * ScaleHeight    ' Get vertical position.
        PSet (XPos, YPos), QBColor(Rnd * 15)    ' Draw confetti.
        DoEvents    ' Yield to other
    Loop    ' processing.
End Sub

---

ممنون از راهنمایی