vb实现能动图形

原创 2012年03月28日 20:06:57

一·实验目的

  为了对vb语言的运用有更好的把握,同时能够运用vb语言实现不同图形随机的运动。

二·实验内容

  首先,在form1上画出commandbutton,写上开始运动,在画一个闹钟timer1,再点击画图工具选择第三种类型画出一个小球。双击小球进行编程,语言如下;

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

最后点击运行实现整个程序的运行。

三·心得体会

  通过对vb几个实验题的训练,我能够了解vb的基础运作和编写一些简单的vb程序,同时也使我对vb产生了一些兴趣,最重要的是学习vb使我掌握了一种学习方法就是在遇到困难的时候要尽可能地想办法去解决并且能够充分地利用一切有效的资源,掌握更多的知识。但是我在学习vb的时候也存在着很多问题,比如说作为一个vb语言入门者,觉得很多词汇都很陌生,就觉得很入门很吃力。但我还是尽可能地学好它。

四·遇到的问题及解决问题的方法

  不能准确的运用vb语言,在学姐学长的指导下纠正了所犯的错误,常常再输入vb语言的时候出现词汇的拼写错误,解决方法,熟悉vb语言,加上细心耐心专心,突破这个障碍。对于vb的程序语言不能理解,最终通过上网和收集各种资料解决这个问题。

五·没有解决的问题

对于vb语言很陌生,不知道灵活地运用vb语言,脱离了编好的程序语言,自己就不会编写程序语言,对于这个问题我还没有解决,我希望解决这个问题老师能够协助,在学习vb的时候,先给我们讲讲vb语言的基本含义和运用方法。

 

相关文章推荐

vb实现随机图形

一·实验目的    为了实现随机生成不同的图形,满足题目需要,实现vb语言程序的运作,最后画出那令人满意的随机的不同图形。 二·实验内容    在窗体上画一个commandbutton按钮,...

图形编辑器, 画图程序, 绘制, 设计, 打印, 矢量图转换, VC++, VB, 源代码

图形编辑器, 画图程序, 绘制, 设计, 打印, 矢量图转换, VC++, VB, 源代码

VB 如何实现随机图形验证码

  • 2009年09月30日 21:01
  • 945B
  • 下载

VB学习第七周--图形打印

1.字母金字塔 Public Class Form1 Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As S...

笔记5:转:VB.NET(2005)图形的处理(bitmap,byte(),持久化)

http://hi.baidu.com/xingwm/item/33792adb6eac324dddf9be34 1.如何持久化作图     在vb.net 中,已经不像VB6那样利用...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:vb实现能动图形
举报原因:
原因补充:

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