作业帮 > 综合 > 作业

vb中如何让一条线绕其中一端旋转

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/11/11 03:42:37
vb中如何让一条线绕其中一端旋转
Private Sub Form_Load() Line1.X1 = 1080 Line1.Y1 = 600 Line1.X2 = 1800 Line1.Y2 = 1200 End Sub Private Sub HScroll1_Change() Dim c, y, w As Long Line1.X1 = HScroll1.Value y = HScroll1.Value w = Val(y * y) Line1.Y1 = Sqr(1600 - w) End Sub 大概就这,但还有些问题解决不了,你试试
求采纳