论坛 › 程序语言综合 › BitBlt 在VB中请问怎么用???

西湖绿雨 发表于 2007-8-30 15:38:40

vb不懂啊,我只会GVB

1we 发表于 2007-8-29 09:02:08

BitBlt 在VB中请问怎么用???

求助!!!

Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long

Private Sub Command1_Click()
tim = BitBlt(Picture2.hDC, 1, 1, 32, 32, Picture1.hDC, 1, 1, WHITENESS)
End Sub

(是bmp文件)运行后屏幕上没有显示图片,而是在原显示图片的地方出现一大块黑,请问该怎么办??

查看完整版本: BitBlt 在VB中请问怎么用???