•\Ž†‚Φ

‰ζ‘œ‚πƒtƒ@ƒCƒ‹‚Ι•Ϋ‘Ά‚·‚ι

@

‚PD’Pƒ‚Θ—α


SavePicture Form1.Picture, "C:\SaveTest.bmp"
@

@

‚QD‚u‚a‚Ε•`‰ζ‚΅‚½ƒOƒ‰ƒtƒBƒbƒNƒX‚π•Ϋ‘Ά‚·‚ι—α

'ƒOƒ‰ƒtƒBƒbƒNƒX‚π•`‰ζ

Picture1.BackColor = vbRed

Picture1.AutoRedraw = True

Picture1.Line(0,0) - (Picture1.ScaleWidth, Picture1.ScaleHeight)

'•Ϋ‘Ά

SavePicture Picture1.Image, "C:\SaveTest2.bmp"@

Picture1.AutoRedraw = False@

@