VB

原创 2012年03月26日 18:30:27
首先,在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

重大改革:Python 语言将被加入高考科目,VB 惨被淘汰!

点击上方“CSDN”,选择“置顶公众号” 关键时刻,第一时间送达! 【CSDN 编者按】一直以来,能够看到诸多在英美加拿大等国中小学生学编程的事情,早前奥巴马呼吁全民学编程言犹在耳。而国内...

VB.NET多线程Socket实现简单HTTP服务

Imports System.Net Imports System.Net.Sockets Imports System.Threading Module monkeyServer Privat...
  • Vizee
  • Vizee
  • 2012年12月08日 19:45
  • 3207

在vb.net中使用抽象类

原文:http://www.yesky.com/401/207901.shtml  通过VB.NET,VB程序员终于拥有了全部面向对象的特征.其中之一就是程序员以创建抽象类.虽然抽象类在编程中的作用...

【C#】C#数据类型和VB的区别

导读:看完了C#,需要总结的有很多东西。开始没有怎么在意,g

vb commondialog 如何设置初始化路径啊?

属性FileName中包含有上次选择的文件名(路径+文件名), 用如下代码可实现: dim s as string s=commondialog1.filename s=left(s,instrrev...

VB.NET中的类和模块

在三层的例子中,我是仿照这C#中的结构来实现的VB.NET版的三层,但是在这之中出现了一个问题,那就是好像C#中只涉及到了各种类的使用,没有用到模块(module),但是在VB中要调用一个类中的字符串...
  • tr1912
  • tr1912
  • 2015年12月20日 10:13
  • 1575

各种计算机语言的经典书籍(C/C++/Java/C#/VC/VB等)

1、JavaJava编程语言(第三版)—Java四大名著—-James Gosling(Java之父)Java编程思想(第2版)—-Java四大名著—-Bruce EckelJava编程思想(第3版)...

vb URL编码 unicode中文互转, gb2312中文互转, utf8中文互转

'//vb将unicode转成汉字, Public Function unicodeDecode(strCode As String) As String Dim Char As S...

vb.net程序打包发布

本篇文章主要介绍的是我所做的机房收费系统VB.NET版的打包发布过程,全文基本由图片组成,文字其实也不少。         首先介绍下,写这篇文章之前,我参看过的文章。vb.net 打包发布  ,W...

VB.net学习笔记(四)数据类型-值类型

1、System.Object    System.Object是VB.net所有类的父类(基类)。    把对象转换成其父类的类型时,只能使用父类提供的方法。    ToString方法可获得...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:VB
举报原因:
原因补充:

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