说明: Dim x0 As Single Dim y0 As Single Private Sub Form_Load() With Form1 .Width = 3000 .Height = 3100 .BackColor = vbBlack .Caption = "动态时钟" End With x0 = 1430 y0 = 1290 With Line1 .X1 = x0 .Y1 = y0 End With With Line2 .X1 = x0 .Y1 = y0 End With With Li
<lingfengyu000000> 上传 | 大小:24kb