五,能动的图形

原创 2012年03月27日 22:17:09

一、    实验目的

用VB绘制图形并使其运动

绘制圆形并运动的程序代码实验内容

二、    实验步骤

   在窗体中使用了一个按钮、一个计时器,并且用shape控件绘制了一个圆

Dim g As Boolean

Dim x As Long

Private Sub 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

三、    遇到的问题及解决的方法

不了解编写能动图形的程序,不能顺利地完成实验。

通过请教学过的学姐学长,网上搜索需要的知识理论,完成实验、

四、    心得体会

遇到困难,积极的寻求解决之道才可以不断进步与完善自己。仔细阅读课本,好好利用百度!

 

 

相关文章推荐

SVG(可缩放矢量图形)虚线相关属性与线条动画原理:一条会动的线

SVG可以实现非常酷炫的线条动画甚至是这样的网页 传送门我们可以先来实现一个简单的SVG线条动画 像这样不要着急,在此之前我们需要先了解一些属性值虚线属性虚线属性包括两个stroke-dasharr...

动网图形验证码识别源码

  • 2007年12月04日 17:20
  • 823KB
  • 下载

计算机图形学基础(五) 光照1

基础就不记录了,只记录有关数学的东西彩色光源 红绿蓝分量环境光ambient 漫反射diffuse 镜面反射specular环境光 表征场景中每一处的Ia都是相同的点光源理想的电光源向所有方面...

图形处理(五)基于旋转不变量的网格变形-Siggraph 2007

本篇博文主要讲解2007年Siggraph上的一篇经典paper:《Linear Rotation-invariant Coordinates for Meshes》,这篇paper如果不考虑计算速度...
  • hjimce
  • hjimce
  • 2015年06月08日 17:20
  • 1919

android图形系统详解五:Android绘制模式

当硬加速被启用,Android框架利用一个新的绘制模式来把你的应用呈现到屏幕,这个模式利用了一个显示列表.要完全理解显示列表以及它如何影响你的应用,先要理解android如何在非硬加速下绘制View....
  • nkmnkm
  • nkmnkm
  • 2012年04月13日 06:25
  • 5475

TWaver图形界面之道(五)Hello TWaver

继续上一章的介绍TWaver图形界面之道(四)如何申请与技术支持 本章将以一个入门示例开始,介绍TWaver的基本使用,设计思想以及开发流程,如果你已经熟悉了TWaver的使用,熟悉了TWave...
  • twaver
  • twaver
  • 2012年05月21日 10:22
  • 1931

html5学习笔记之五(扩展图形标记)

看视频,做笔记: 1.字体信息 context.font = [CSS font property] 属性有:font-style、font-variant、font-size、font-fam...

五、Java图形化界面设计——布局管理器之GridLayout(网格布局)

转自liujun13579的专栏 的博客,尊重并感谢原作者的付出!   网格布局特点: l  使容器中的各组件呈M行×N列的网格状分布。 l  网格每列宽度相同,等于容器的宽度除以网格的列数。 ...

五大存储模型关系模型、键值存储、文档存储、列式存储、图形数

昨天跟一同事讨论Sybase是不是关系型数据库,同事说Sybase是列式存储,应该属于NoSQL,我一直的记忆Sybase是关系型数据库,后来专门去查了资料,才发现同事所说的Sybase IO是列式存...

C#.net 地图控件开发(五) GDI+图形图像编程基础3.

画刷和画刷类型 Brush类型是一个抽象类,所以它不能被实例化,也就是不能直接应用,但是我们可以利用它的派生类,如:HatchBrush、SolidBrush、TextureBrush、Linear...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:五,能动的图形
举报原因:
原因补充:

(最多只允许输入30个字)