欢迎来到天天文库
浏览记录
ID:55720536
大小:398.50 KB
页数:73页
时间:2020-05-28
《VB图文教程讲解.doc》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、首先,我们先来熟悉一下窗体。如果你用过Win95附件所带的画图板的话,那么你一定会很快熟悉VB的窗体设计方法,用鼠标单击一下工具箱中的任何一个控件,然后在窗体上任意拖动鼠标,你就会得到一个所需的控件;当然还有其他的方法得到控件,你可以在工具箱上双击得到一个控件;或是按住Ctrl键,再单击所需控件,重复第一次的步骤,你会发现,不用再回去点击工具箱了,点右键可以恢复鼠标指针,这样对于重复画同一个控件尤其有用。 对于我们的第一个小程序,知道这些就已经足够了。现在你可以在我们的窗体上画如下控件一个图片框(PictureBox),用来显示图画,每一个控件建立的时候,系统都会给它
2、设一个默认的名字(Name),这个PictureBox的名字就叫做Picture1,为了方便起见,我们以后的控件都使用缺省的名称。选定Picture1,在左边的属性窗口中找到Picture属性,单击会出现,点击为Picture1选一个图像文件,VB支持的图像文件有BitMap、WMF、ICO三种,微软为用户提供了一套图标文件,存放在VB目录的Icons目录下,选择Iconsmiscface01.ico文件,这样图标就被装入了Picture1。再选择Pictrue1的Autosize属性,设为1-True,则会发现Picture1以变成和图像一样大了;把BorderS
3、tyle定为0-None,去掉图片边框。用同样的方法再添加两个图片框:Picture2(Picture:face02.ico),Picture3(Picture:face03.ico)。 图片框完成了,第二步,建立三个无线钮(OptionButton),由于它象收音机的无线电按钮而得名),把它们的标签名属性(Caption)分别定为“悲哀”,“高兴”,“没治了”,放置成图1_2的样子。 最后我们还需要三个文本框(TextBox),分别把它们的Text属性设为””(空字符串),程序的最后界面如图1_3,这样按下菜单窗口的运行按钮,运行一下程序,还可以吧,不过现在程序还
4、无法工作,就算是VB也不能免俗,还必须输入代码才能使程序运作。 VB是一门典型的面向对象编程的语言,它的整个程序都是由事件驱动的。那么,什么是事件呢?其实,我们的生活中充满了各式各样的事件,比如说“闯红灯”这个事件的发生会导致被警察追杀、走路撞到电线杆时会痛。上面的例子虽然有些滑稽,但它可以清楚的解释事件的含义,就象你马上就能体会到的在什么地方单击鼠标时会发生什么,按下键盘时会发生什么,这就是事件,而事件就是这么容易。 要进入VB的代码设计区,只需在需要的控件或窗体上双击鼠标即可得到这样的窗口。如图1_4,每一个VB程序都由若干小程序组成,这使得用VB编程更加容易,
5、这些小程序,分为“过程”(Procedure)和“函数”(Function),二者都可以传递参数,所不同的是函数有一个返回值,而过程没有,仅此而已。 双击窗体的任何一个部分,将出现一个空的过程:“Form_Load()”,这是一个非常重要的过程,它所驱动的事件就是该窗体被加载的事件,打个比方,就象计算机启动时的批处理程序(Autoexec.bat)。这个程序里我们要对控件进行一些设置。我们刚才也曾对控件进行设置,但那是在程序设置中进行的,有时我们也需要在程序中改变某些控件的属性,通过程序代码。VB中规定,一个控件属性的访问方法:名称.属性,于是我们对本程序的控件进行如
6、下设置:PrivateSubForm_Load()Picture1.Visible=FalsePicture2.Visible=FalsePicture3.Visible=FalseText1.Visible=FalseText2.Visible=FalseText3.Visible=FalseEndSub Private表示此过程是局部的,Sub表示子过程的开始,与之相对的是EndSub表示过程的结束,Visible属性表示控件的可见性,这个属性的值有两个True和False。注意:VB里对大小写是不加区分的,而且,已定义的名称,以后再用到时,系统会自动把它变成相应
7、的大写或小写。小知识:1.VB里的对变量及常量的规矩。 变量一般为Abc的格式,常量为ABC,另外这些变量和常量名不得同VB内的关键字相同,也不可以使用一些特殊符号,这些我们将在以后介绍,注意在学习中养成好习惯,使程序便于自己和别人的浏览。2.程序书写的窍门: 不要真的一句一句把程序打完,利用快捷键:拷贝Ctrl+C,剪切Ctrl+T,粘贴Ctrl+P。按下F5,运行一下程序,现在发现只剩下无线钮了。如图1_5。PrivateSubForm_Load()Picture1.Visible=FalsePicture2.Visible=Fa
此文档下载收益归作者所有