╔-------------------------------------------------╗
  ┆               VB编程设计系列教程⑤              ┆
  ┆           网址  HTTP://Www.Hack58.Com           ┆
  ┆           论坛  HTTP://Bbs.Hack58.Com           ┆
  ┆           QQ:541583211       断罪の翼           ┆
  ╚-------------------------------------------------╝

黑客动画吧  http://www.hack58.com

专业的黑客动画教程网站

免费学习黑客技术

成为黑客不是梦
打造国内最大的黑客动画网站

注意：所有教程全部对外免费开放

-------------------------------------------------------------------------------------------
    大家好，我是断罪の翼。经过这么长时间的学习，大家对VB的了解一定很多了吧。今天是我们学习VB

的第五课。
   
    今天我们要讲的是VB程序设计语言基础，我们在这几节中要掌握的要点有以下几点：
   
    1.VB程序设计语言的常量、变量和表达式
    2.VB程序设计语言的输入与输出
    3.VB程序设计语言流程控制
    4.VB中数组的运用
    5.VB中过程的运用
    6.VB常用函数
    7.面向对象程序设计基本知识
 
    呵，很多吧。大家先不要被它们吓倒，要学好它们还是很简单的。

    VB作为一个Windows应用程序设计工具，除了可以通过属性和事件的设置来实现一些简单的功能外，

更多的是通过编写代码程序来实现更为复杂的应用。

    在整个程序运行过程中，数据有两种存在方式：一种是在程序运行中能够发生的量，称为变量；另一

种是在整个程序运行过程中都不会发生变化的量，称为常量。
   
    在变量过程中会用到各种各样的数据，大体可以分为下面几类：

    1.数值型
    2.字符型
    3.其他类型
      布尔型  日期时间型  对象型
    4.数据类型的表明
    5.逻辑运算符

    赋值语句是程序中的基本语句。主要用于将一个表达式的值送给一个变量或一个控件的某个属性。
   
    在VB中函数InputBox能帮助我们建立一个最简单的输入窗体，语法如下：
   
    InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])
   
    下面我们来做一个简单的程序，建立一个新项目文件，并添加几个对象，一个Button(Command1),两

个ComboBox(Combo1和Combo2)，不要对它们的属性做太多的更改，只要把Command1的Caption属性改为

"CLICK ME".
   
    这个程序的目的是自由组合上面的按钮值，以显示各种消息框，并且返回按下的按钮。
   
    在程序中加入下面的代码：比较多，但是比较简单，大家慢慢看。。
   
Private Sub Command1_Click()
   message = MsgBox("显示" & Combo1.List(Combo1.ListIndex) & "和" & Combo2.List(Combo2.ListIndex), Combo1.ListIndex + (Combo2.ListIndex + 1) * 16, "消息演示")
   Select Case message
   Case 1
   MsgBox "你按下了OK按钮"
   Case 2
   MsgBox "你按下了Cancel按钮"
   Case 3
   MsgBox "你按下了Aborta按钮"
   Case 4
   MsgBox "你按下了Retry按钮"
   Case 5
   MsgBox "你按下了Ignore按钮"
   Case 6
   MsgBox "你按下了Yes按钮"
   Case 7
   MsgBox "你按下了No按钮"
   End Select
End Sub
Private Sub Form_Load()
   Combo1.AddItem "OK"
   Combo1.AddItem "OK and Cancel"
   Combo1.AddItem "Abort,Retry and Ignore"
   Combo1.AddItem "Yes,No,Cancel"
   Combo1.AddItem "Yes,No"
   Combo1.AddItem "Retry,Cancel"
   Combo1.ListIndex = 0
   Combo2.AddItem "危险"
   Combo2.AddItem "询问"
   Combo2.AddItem "警告"
   Combo2.AddItem "信息"
   Combo2.ListIndex = 0
End Sub
   
   我们来看下效果，可以，这样就根据不同的要求显示不同的输出窗口了。

   好了，教程就到这里吧，下一节我们将要学的是VB的标准控件。大家可能有不明白的地方，我的QQ装

不下了。。加我另一个QQ：344200683
  
   我的论坛http://hack123.zzzg.com没事的话帮忙发点帖。。
  
   再见！！！