私有聲明函數BitBlt Lib " GDI 32 "(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)
私有子命令1_Click()
我。隱藏
我。AutoRedraw = True
BitBlt Me.hDC,728,292,766,305,GetDC(0),0,0,vbSrcCopy
幫我保存壹張照片。圖像,“C:\捷圖。BMP "
我。顯示
末端接頭