学编程就是这样简单(四)

开篇：润墨网以专业的文秘视角，为您筛选了一篇学编程就是这样简单(四)范文，如需获取更多写作素材，在线客服老师一对一协助。欢迎您的阅读与分享！

翔翔：“上次留了一个悬念，是不是等得不耐烦了？”

姗姗：“是呀，快点告诉我如何让程序变得更聪明。”

翔翔：“那好吧，我们闲话少说，一同启动VB看看程序的智慧是从哪里来的。”

这期我们将跟随两位主人公翔翔和姗姗一同制作一只可以见什么人说什么好话的“虚拟鹦鹉”。

我们以制作一个“巧舌如簧”的虚拟鹦鹉互动程序为例，用户的操作和程序的响应动作以图表的形式列出。

了解了程序需要完成的任务后，下一步还是按老规矩为程序制作一个窗口界面。

1在VB里单击“预设窗体”选中它，在“属性编辑器”

窗口中找到Caption（窗口标题）属性项目。

2点击“控件栏”上的Image控件按钮，在“预设窗体”上拖拽出一个图片框控件对象。

3我们这次不再用MsgBox语句来显示提示信息，而是用Label（标签）控件直接在窗体上显示信息。

4选　中Label1标签，修改它的Caption属性值可以改变标签上显示文字的内容

5双击Image1图片框控件对象，也就是那个鹦鹉图片，此时“代码编辑器”会自动打开图片框的Click（单击）事件过程，然后输入如下代码。

事件编程的概念我们曾经介绍过，简单地说就是告诉程序在单击鹦鹉图片的时候程序自己应该做些什么。”

代码翻译：

①代码第1行和最后一行是图片框的Click单击事件开头和结尾，VB会自动添加上去，我们不必管它。

②第2行是使用Dim语句申请一个名为Name的变量，用来临时保存输入的用户姓名。怎么在Name变量后面多了一条As String的尾巴？这是用了As语句为Name变量指定一个数据存储类型，不同类型的变量对所存储的数据处理是不同的，比如同样输入“123”，装进Integr类型变量的肚子里会变成数字“一百二十三”，而装进String变量的肚子里就会变成无法进行运算的字符“一二三”。

如果不指定类型，VB会把它设为Variant（万能类型）变量，就是什么都可以装进去的变量，不过这种变量占用内存容量很大哦。

VB中的数据类型有很多，这里只是简单介绍一下，我们不必去死记硬背，随着对VB的慢慢了解，自然就会记住了。右表中是常用的数据类型。

③第3行是要求弹出“信息输入”对话框，用户通过对话框输入姓名并且将它保存到Name变量里。

第6行“Case "翔翔"”下面的“Label1.Caption = "翔翔主人你好，您的计算机技术真是一流啊！"”命令而不再执行别的语句。

如果Name变量值在假设的例子里没有，就执行第11行Case Else下面的“Label1.Caption = "初次见面，请多多指教。”语句。

翔翔：“现在考考你，如果变量值是‘桐桐’，程序会执行哪条语句呢？”

姗姗：“这个难不倒我，当然是‘Case “桐桐”’下面的‘Label1.Caption = ’你好桐桐，听主人说你的棋艺很高，能不能教教我？”’语句了，这句到底什么意思呀？”

翔翔：“别着急，马上就讲了。”

④第4行是一个“分支流程”的开始，Select Case Name的意思是判断Name变量存储的是什么。

第5、6、9行我们利用Case语句给了几个假设的情况，比如我们在变量里保存了“翔翔”这个名字，程序就会执行

⑤“Label1.Caption = ‘你好……’”是将窗体中那个显示提示信息的Label1标签上的内容改变成双引号内的内容。因为程序运行时我们没办法人为地改变某个控件的属性值（再说如果人为改变控件属性值还叫“自动化”吗），所以必须通过Basic语句来更改，它的格式是：

控件名.属性名=要更改的内容

不过要注意的是，在需要改变属性值内容是字符串类型时，必须用双引号括起来。

End Select分支结束，程序恢复从上至下执行语句的方式。

翔翔：“好了，剩下导出EXE程序的步骤就不需要我多说了吧。”

姗姗：“今天讲的我学会了，下次要编写什么程序？”

下次我们要制作一个超实用的软件，究竟是什么？下期见分晓！