- 博客(2)
- 收藏
- 关注
RSS订阅原创 vb基础
Dim sngdrawwidth As Single 模块级变量，保存线条宽度Private Sub Command1_Click()刷新恢复Form3.ClsEnd SubPrivate Sub form_mousedown(button As Integer, shift As Integer, x As Single, y As Single) If button = 1 T
2003-10-31 21:34:00
728
原创 图形旋转
‘在窗体上加两个picturebox控件，五个option控件放在frame框架上，一个按钮Option ExplicitConst Pi = 3.1416Dim JiaoDu As DoubleFunction b(i)Dim x As Integer, y As IntegerDim X1 As Integer, Y1 As IntegerDim X2 As Double, Y2 As D
2003-10-31 21:32:00
843
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人