タイトル : Re: 白抜き文字を印刷したい 投稿日 : 2008/01/23(Wed) 16:27 投稿者 : 花ちゃん
> with printer > .ColorMode = vbPRCMColor > .drawmode=13 > .Print "あ"; > .DrawMode = vbXorPen 'XORで反転させる > .FillColor = vbBlack > .Line -Step(-.TextWidth("あ"), .TextHeight("あ")), vbBlack, BF > end with 文字を先に描いてから黒い四角形を描けば、中の文字も 塗りつぶさるのでは。 |