マスクで？ (ID:117307)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 以前、ここのサイトで [３、マスク処理] というところで、 Option Explicit Private Const PICTURE_BACK As String = "\T13_Back.Jpg" Private Const PICTURE_CHARA As String = "\T13_Chara.GIF" Private Const PICTURE_MASK As String = "\T13_CharaMask.GIF" Private Sub Command1_Click() picMain.Picture = LoadPicture(App.Path & PICTURE_BACK) picChara.Picture = LoadPicture(App.Path & PICTURE_CHARA) picMask.Picture = LoadPicture(App.Path & PICTURE_MASK) Call picMain.PaintPicture(picMask.Picture, 0, 0, , , , , , , vbSrcAnd) '↑ Call picMain.PaintPicture(picChara.Picture, 0, 0, , , , , , , vbSrcInvert) '↑ End Sub のソースをVB.NETに変えようと思ったのですが、 どうしても出来ないんです。 矢印の指している部分で苦戦してしまいます。 どのように変えればよろしいでしょうか？ あと、 6の禁断の技はソースを見た限り 多分、画像を取り込んで、プログラムから透過する色を指定 して、その画像の色で指定した色を透過させていると思います。 でも、これ、私が望んでいる動きをしていません。(TT)