Question

VB 如何一个正方形picturebox中的图片旋转，要求不改变picturebox的名称，只是针对图片，求大神指教

求•net代码

Answer 1

Private Sub Command1_Click() '正常贴图
Picture1.PaintPicture Picture2.Picture, 0, 0, Picture1.Width, Picture1.Height
End Sub
Private Sub Command2_Click() '上下加水平翻转
Picture1.PaintPicture Picture2.Picture, Picture1.Width, Picture1.Height, 0 - Picture1.Width, 0 - Picture1.Height
End Sub
Private Sub Command3_Click() '水平翻转
Picture1.PaintPicture Picture2.Picture, Picture1.Width, 0, 0 - Picture1.Width, Picture1.Height
End Sub
Private Sub Command4_Click() '上下翻转
Picture1.PaintPicture Picture2.Picture, 0, Picture1.Height, Picture1.Width, 0 - Picture1.Height
End Sub
我只有这样的，不知道可适合你。

追问

大神，这代码我看不懂啊，我要 •net代码

追答

没有.net 这是vb6.0的

Answer 2

VB本身的这方面功能很弱的。建议你用第三方的控件实现。网上搜，一大把。不可一条道走到黑啊