->前几天在网路上闲逛时,看到有人问了这样的问题:想要写拼图程式,又不想用已经切割好的图片,不知要如何把一个完整的图片利用程式来切割。以下的程式只是示范切割图片的方法,而不是教你如何写拼图程式。
需求物件:
Form,PictureBox
请建立一个新专案,并在表单中放入上述物件,再把以下程式码复制到表单的程式码视窗,最後按下F5来执行。(注意图片路径可能要修改)
PrivateSubForm_Activate()
详细阅读PaintPicture的说明就可了解,在来源图和目的图中,
可以指定某个特定区域来绘图,亦即可以将图片切割或放大,缩小
Picture1.PaintPicturePicture,10,10,1000,1000,0,0,500,500
EndSub
PrivateSubForm_Load()
AutoRedraw=True
以下路径可能要修改
Picture=LoadPicture(“e:\win95\bubbles.bmp”)
WithPicture1
.Left=1000
.Top=1000
.Width=2000
.Height=2000
.AutoRedraw=True
EndWith
EndSub->
->
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com 特别注意:本站所有转载文章言论不代表本站观点! 本站所提供的图片等素材,版权归原作者所有,如需使用,请与原作者联系。未经允许不得转载:
IDC资讯中心 »
切割一个container中的图片_visualbasic教程