本文来自: http://www.docsky.com/show.asp?id=2068 一共四章将陆续贴出,请关注
第一章 HELLO WORLD!
没学过编程的 人常常会问,编程难不难,这个问题很难回答。难,的确很难,要编一个好的程序尤其是这样,并且有些程序还要用到一些其他专业的知识,比如说一个图形处理程序,就要对图像的格式有所了解,甚至一些美术知识;但编程也很容易,就拿 VB 来说,编一个自娱自乐的小工具还是一件相当惬意的事情呢,当然它没法完全代替人工,譬如说完成你的家庭作业、向学校发射导弹……
作为第四代计算机语言, VB 的特点是显而易见的。因为是“可视的”所以我们不妨先看看 VB 的界面(图 1 _1)(我用的是 VB4.0 32 位版),很容易可以看到,屏幕上有五个窗口,( 1 )是菜单栏;( 2 )是工具箱( Tools Box ),里面是 VB 所需的控件;( 3 )是 VB 程序要设计的窗体( Form );( 4 )控件及窗体的属性( Properties ),在 VB 中每一个控件都有其自己的属性,比如文本框有 Text 属性,而任何一个控件都有一个自己唯一的名字,这使得我们无需编程就可以完成部分编程的工作;( 5 )是 VB 的文件控制窗口, VB 的每一个程序称为一个项目( Project ),一个项目文件里往往包括以下两种文件,窗体( Form )文件和模块( Bas )文件,当然还有 Class 文件,这些文件组成一个完整的程序,而项目文件( Vbp )则用来描述程序所包含的内容。
实际上,我一直认为学习的最好方法就是实际操作一下,好,下面我们就来看一个最简单的程序,和所有的编程教科书一样,我们把第一个程序称为“ Hello , world !”。
首先,我们先来熟悉一下窗体。如果你用过 Win95 附件所带的画图板的话,那么你一定会很快熟悉 VB 的窗体设计方法,用鼠标单击一下工具箱中的任何一个控件,然后在窗体上任意拖动鼠标,你就会得到一个所需的控件;当然还有其他的方法得到控件,你可以在工具箱上双击得到一个控件;或是按住 Ctrl 键,再单击所需控件,重复第一次的步骤,你会发现,不用再回去点击工具箱了,点右键可以恢复鼠标指针,这样对于重复画同一个控件尤其有用。
对于我们的第一个小程序,知道这些就已经足够了。现在你可以在我们的窗体上画如下控件一个图片框( Picture Box ) ,用来显示图画,每一个控件建立的时候,系统都会给它设一个默认的名字 (Name) ,这个 PictureBox 的名字就叫做 Picture1 ,为了方便起见,我们以后的控件都使用缺省的名称。选定 Picture1 ,在左边的属性窗口中找到 Picture 属性,单击会出现
,点击
为 Picture1 选一个图像文件, VB 支持的图像文件有 BitMap 、 WMF 、 ICO 三种,微软为用户提供了一套图标文件,存放在 VB 目录的 Icons 目录下,选择 Icons\misc\face01.ico 文件,这样图标就被装入了 Picture1 。再选择 Pictrue1 的 Autosize 属性,设为 1-True ,则会发现 Picture1 以变成和图像一样大了;把 BorderStyle 定为 0-None ,去掉图片边框。用同样的方法再添加两个图片框: Picture2 ( Picture : face02.ico ), Picture3 ( Picture : face03.ico )。
图片框完成了,第二步,建立三个无线钮(Option Button) ,由于它象收音机的无线电按钮而得名),把它们的标签名属性(Caption)分别定为“悲哀”,“高兴”,“没治了”,放置成图1_2的样子。
最后我们还需要三个文本框( Text Box ) ,分别把它们的 Text 属性设为 ”” (空字符串),程序的最后界面如图1_3,这样按下菜单窗口的运行按钮,运行一下程序,还可以吧,不过现在程序还无法工作,就算是 VB 也不能免俗,还必须输入代码才能使程序运作。
VB 是一门典型的面向对象编程的语言,它的整个程序都是由事件驱动的。那么,什么是事件呢?其实,我们的生活中充满了各式各样的事件,比如说“闯红灯”这个事件的发生会导致被警察追杀、走路撞到电线杆时会痛。上面的例子虽然有些滑稽,但它可以清楚的解释事件的含义,就象你马上就能体会到的在什么地方单击鼠标时会发生什么,按下键盘时会发生什么,这就是事件,而事件就是这么容易。
要进入 VB 的代码设计区,只需在需要的控件或窗体上双击鼠标即可得到这样的窗口。如图 1_4 ,每一个 VB 程序都由若干小程序组成,这使得用 VB 编程更加容易,这些小程序,分为“过程”( Procedure )和“函数”( Function ),二者都可以传递参数,所不同的是函数有一个返回值,而过程没有,仅此而已。
双击窗体的任何一个部分,将出现一个空的过程:“ Form_Load() ”,这是一个非常重要的过程,它所驱动的事件就是该窗体被加载的事件,打个比方,就象计算机启动时的批处理程序( Autoexec.bat )。 这个程序里我们要对控件进行一些设置。我们刚才也曾对控件进行设置,但那是在程序设置中进行的,有时我们也需要在程序中改变某些控件的属性,通过程序代码。 VB 中规定,一个控件属性的访问方法:名称 . 属性,于是我们对本程序的控件进行如下设置:
**Private Sub Form_Load() **
> **_Picture1.Visible = False
> Picture2.Visible = False
> Picture3.Visible = False
> Text1.Visible = False
> Text2.Visible = False
> Text3.Visible = False _ **
**End Sub **
Private 表示此过程是局部的, Sub 表示子过程的开始,与之相对的是 End Sub 表示过程的结束, Visible 属性表示控件的可见性,这个属性的值有两个 True 和 False 。
* 注意:
> ** VB 里对大小写是不加区分的,而且,已定义的名称,以后再用到时,系统会自动把它变成相应的大写或小写。 **
* 小知识:
> ** 1.VB 里的对变量及常量的规矩。 **
>
> ** 变量一般为 Abc 的格式,常量为 ABC ,另外这些变量和常量名不得同 VB 内的关键字相同,也不可以使用一些特殊符号,这些我们将在以后介绍,注意在学习中养成好习惯,使程序便于自己和别人的浏览。 **
>
> ** 2. 程序书写的窍门: **
>
> ** 不要真的一句一句把程序打完,利用快捷键:拷贝 Ctrl+C ,剪切 Ctrl+T ,粘贴 Ctrl+P 。 **
>
> 按下 F5 ,运行一下程序,现在发现只剩下无线钮了。如图1_5。
>
>
>
> **Private Sub Form_Load() **
>
>> **_Picture1.Visible = False
> Picture2.Visible = False
> Picture3.Visible = False
> Text1.Visible = False
> Text2.Visible = False
> Text3.Visible = False
> Option4.Left = -2000
> Option4.Value = True _ **
>
> **End Sub **
>
> Left 属性表示控件离窗体左边框的距离,设置为- 2000 ,则在窗体内不会看到这个控件,并使之 Value=True 。再运行程序,一切如愿,如图 1_6 。
>
>
>
> |
| 注意:为什么不用 Option4.Visible=False ?
> ---|---
>
> 因为,一旦设置无线钮为不可见,那么再使它的Value 为真是没有意义的,不信自己试试。
>
> 下面我们可以继续进行了。在刚才的代码窗口里,将 Object 选择为 Option1 , Proc 选择为 Click ,即得到一个 Option1_Click 的过程。代码如下:
>
> **Private Sub Option1_Click() **
>
>> **_Picture1.Visible = True
> Picture2.Visible = False
> Picture3.Visible = False
> Text1.Visible = True
> Text2.Visible = False
> Text3.Visible = False
> Text1.Text = " 再见,残酷的世界。 " _ **
>
> **End Sub **
>
> 相同的建立 Option2_Click 和 Option2_Click :
>
> **Private Sub Option2_Click() **
>
>> **_Picture2.Visible = True
> Picture1.Visible = False
> Picture3.Visible = False
> Text2.Visible = True
> Text1.Visible = False
> Text3.Visible = False
> Text2.Text = " 今天心情不错。 " _ **
>
> **End Sub **
>
> **Private Sub Option3_Click() **
>
>> **Picture3.Visible = True
> Picture2.Visible = False
> Picture1.Visible = False
> Text3.Visible = True
> Text2.Visible = False
> Text1.Visible = False
> Text3.Text = "Hello,World 。 " _ **
>
> **End Sub **
>
> 好,我们的开山之作完成了!按下 F5 ,玩一下吧。这个程序虽然简单,但也用到了许多基本知识,你开始感兴趣了吗? ^^
>
>
相关附件: hello.rar
本文来自: http://www.docsky.com/show.asp?id=2068 一共四章将陆续贴出,请关注