- 博客(2)
- 收藏
- 关注
原创 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 740
原创 图形旋转
‘在窗体上加两个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 861
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人