手机站
网通分站
电信主站
密 码:
用户名:
当前位置 : 主页>网络编程>Asp.Net编程>列表

VB入门之“Hello World”

来源:互联网 作者:西部数码 时间:2008-04-09
西部数码-全国虚拟主机10强!40余项虚拟主机管理功能,全国领先!双线多线虚拟主机南北访问畅通无阻!免费赠送企业邮局,.CN域名,自助建站480元起,免费试用7天,满意再付款! P4主机租用799元/月.月付免压金!


  双击窗体的任何一个部分,将出现一个空的过程:“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,玩一下吧。这个程序虽然简单,但也用到了许多基本知识,你开始感兴趣了吗?



文章整理:西部数码--专业提供域名注册虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

热点关注
IDC资讯 虚拟主机 域名注册 托管租用 vps主机 智能建站
网站运营 建站经验 策划盈利 搜索优化 网站推广 免费资源
网站联盟 联盟新闻 联盟介绍 联盟点评 网赚技巧
行业资讯 业界动态 搜索引擎 网络游戏 门户动态 电子商务 广告传媒
网络编程 Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术 Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷 Internet Explorer
网页制作 FrontPages Dreamweaver Javascript css photoshop fireworks Flash
程序设计 Java技术 C/C++ VB delphi
网络知识 网络协议 网络安全 网络管理 组网方案 Cisco技术
操作系统 Win2000 WinXP Win2003 Mac OS Linux FreeBSD
返回首页 |关于我们 | 联系我们 | 付款方式 | 创业联盟 | 价格总览 | 资讯中心 | 友情链接 | 网站地图 | 招贤纳士 | RSS