画图
来源:互联网 发布:和越南人聊天软件 编辑:程序博客网 时间:2024/04/30 03:09
1. 随机生成不同的图形
在窗体上画一个commandbutton按钮,双击按钮编写程序语言
其语言如下:
Private Sub Command1_Click()
Show
Me.Scale (0, 0)-(18, 8)
Me.AutoRedraw = True
Me.DrawMode = 2
Circle (3, 4), 3, vbRed
Me.AutoRedraw = False
Line (7, 1)-Step(4, 6), vbGreen, B
Line (13, 7)-Step(4, 0), vbBlue
Line Step(0, 0)-Step(-2, -6), vbBlue
Line Step(0, 0)-Step(-2, 6), vbBlue
End Sub
2.生成能动图形
首先,在form1上画出commandbutton,写上开始运动,在画一个闹钟timer1,再点击画图工具选择第三种类型画出一个小球。双击小球进行编程
Dim gAs Boolean
Dim xAs Long
再双击开始运动按钮,编写程序语言
PrivateSub Command1_Click()
Timer1.Enabled= True
End Sub
再双击窗体,编写程序语言
Private Sub Form_Load()
g = True
x = Shape1.Left
End Sub
再双击闹钟,编写程序语言
Private Sub Timer1_Timer()
If g Then
x = x - 300
Else
x = x + 300
End If
If x < 0 Or x > (Me.ScaleWidth - Shape1.Width)Then
g = Not g
End If
Shape1.Move x
End Sub
- 画图:
- 画图
- 画图
- 画图
- 画图
- 画图
- 画图
- 画图
- 画图
- 画图
- 画图
- 画图
- 画图
- 画图
- 画图
- 画图
- 画图
- 画图
- Android getResources的作用和需要注意点
- Oracle kill sessin 说明
- 裸设备
- java文件读写操作实例
- HDOJ Error Curves 计算几何
- 画图
- oracle 正则表达式 2 包括下划线的处理
- 编程之美--编程判断两个链表是否相交
- Android进阶2之有道词典开发
- 极品冷幽默,搞笑没得说
- 显示各位小数
- 解析sharepoint地址中的相关属性(ContentTypeID )
- android中自定义checkbox大小和图片
- Fragments (Android官方文档中文版)