VB列印透明內容

2021-04-28 21:55:14 字數 976 閱讀 2945

在vb6列印的時候,設定印表機的屬性printer.fonttransparent = true可以列印出背景透明內容,但有些時候該設定不起作用,可以通過下面的方法解決。

private declare function setbkmode lib "gdi32"  _

(byval hdc as long, byval nbkmode as long) as long

private const transparent = 1 '透明

private const opaque = 2 '不透明

private sub form_click()

printer.print ""

printer.line (0,0)-(10000, 2000), &hc0c0c0, bf

printer.currentx = 0

printer.currenty = 0

printer.fonttransparent = true

'correctly sets the background mix mode to transparent

ibkmode = setbkmode(printer.hdc, transparent)

printer.print "printer.fonttransparent = " & printer.fonttransparent

printer.fonttransparent = false

'correctly sets the background mix mode to opaque

ibkmode = setbkmode(printer.hdc, opaque)

printer.print "printer.fonttransparent = " & printer.fonttransparent

printer.enddoc

end sub

原文:ms

VB顯示透明FLASH效果

vb顯示透明flash效果 演示效果 如下 公共宣告區域 option explicit private declare function getwindowlong lib user32 alias getwindowlonga byval hwnd as long,byval nindex as...

VB列印本月的月曆 vb列印日曆 sysdzw

因為vb裡沒有什麼linq,所以就用純字串操作了,如下 private sub form load dim s i strdatepre d1 as date strdatepre datepart yyyy now datepart m now s su mo tu we th fr sa vbc...

如何實現容器透明,內容不透明?

3.透明度問題 opacity 在ie中透明度不顯示,當我們向父元素中新增子元素的時候,就會發現子元素繼承了父元素的透明度。而在某些情況下這是我們不希望發生的。即使你重新設定子元素的透明度為不透明,它仍然會繼承父元素的透明度。要怎樣解決這個問題呢?我們可以使用絕對定位來使這些元素看起來像父子關係。你...