百例小结（1）_李晓瑞_廊坊师范提高班十五期_新浪博客

小常识：

1.断句符：在一个语句要分行显示的地方按下 space（空格）键，然后添加一个下划线“_”,按enter键转入下一行进行书写

如果不按enter键，而是直接加下划线，就会弹出“无效字符”的窗口，错误的地方就是下划线所在的位置。

如果语句很短，可以用“:”将多个语句连成一行。

2.注释可以用’ (英文状态下)《》(此处空格可有可无)<注释内容>，或者:Rem（必须有空格）<注释内容>

3.Option Explicit 语句

显示声明是在使用变量前必须对其进行声明。如果没有声明变量，则在运行程序时，弹出错误警告，要求对声明的变量进行声明。

要使系统对未声明的变量发出错误警告，需要在程序的声明部分加入：option explicit

VB也可以自动生成该语句，方法如下：

（1） 执行菜单”工程“ → ”选项“ 命令， 将弹出“选项“对话框

（2） 在”编辑器“选项卡中勾选”要求变量声明“选项

（3） 单击“确定“按钮即可

用于在文件级强制对该文件中的所有变量进行显式声明。

4.VB在保存工程的时候生成了3个文件 ，能解释下这3个文件各有什么用？

工程1.vbp

储存着工程文件，储存着工程类型，工程调用的DLL、OCX信息，工程窗体、模块等文件地址。

vbp像一种数据库的索引

Form1.frm

窗体文件，储存着窗体信息，保存着窗体自有的信息

MSSCCPRJ.SCC

储存着工程加密内容，如果关闭Source Code Control插件，那么这个文件不会被生成

5.VB中的用Static 定义的变量和用 Dim 定义的变量有什么区别？

用Dim语句声明的变量是动态变量，当过程调用结束后，变量的值为0，而用Static语句声明的变量是静态变量，它的值是永远存在的。

Static是定义静态变量和数组变量，Dim定义的叫自动变量。

Static定义的变量，每次引用它时，变量的值会继续保留；而Dim定义的变量，每次引用它时，则会重新赋值。举个例子你就会懂，看下面两段代码：（恐龙逃跑实例）

Private Sub Timer1_Timer()

Static x As Integer            '定义变量

 If x = 7 Then x = 1            '如果x为7，那么x为1

 x = x + 1                      'x不断变化

 img2.Move img2.Left + 100      '图像框img2向右移动

 If img2.Left > Me.Width Then   '如果img2大于窗体的宽度

  img2.Left = 0                 '那么img2从窗体的左侧继续移动

 End If

Select Case x                    '将x作为测试表达式

 Case 1                          '当x为1时

  img2.Picture = img1(0).Picture '将img(0)中的图片赋给img2

 Case 2                          '当x为2时

  img2.Picture = img1(1).Picture '将img(1)中的图片赋给img2

 Case 3                          '当x为3时

  img2.Picture = img1(2).Picture '将img(2)中的图片赋给img2

 Case 4                          '当x为4时

  img2.Picture = img1(3).Picture '将img(3)中的图片赋给img2

 Case 5                          '当x为5时

  img2.Picture = img1(4).Picture '将img(4)中的图片赋给img2

 Case 6                          '当x为6时

  img2.Picture = img1(5).Picture '将img(5)中的图片赋给img2

 End Select

 

End Sub

利用断点调试（shift+F8） 若用dim定义，则运行过程只限于case 1，但若用static定义，运行过程从case 1开始，

第一次：case 1 ；

第二次：case 1和case 2；

第三次：case 1 和case 2 和case 3

…….以此类推一直运行下去

VB中Image和PictureBox的区别

Image 控件与 PictureBox 控件相似，但它只用于显示图片。它不能作为其它控件的容器，也不支持 PictureBox 的高级方法。
图片加载于 Image 控件的方法和它们加载于 PictureBox 中的方法一样。设计时，将 Picture 属性设置为文件名和路径，运行时，利用 Loadpicture 函数。
Image 控件调整大小的行为与 PictureBox 不同。它具有 Stretch 属性,而 PictureBox 具有 AutoSize 属性。将 AutoSize 属性设为 True 可使 PictureBox 根据图片调整大小，设为 False 则图片将被剪切（只有一部分图片可见）。Stretch 属性设为 False（缺省值）时，Image 控件可根据图片调整大小。将 Stretch 属性设为 True 将根据 Image 控件的大小来调整图片的大小，这可能使图片变形。

1.实例中的问题

  实例2：

运行时文字无法完整显示

后做出调整：将标签框位置居中，运行时，文字就可以完整显示了

为了便于区分相同控件，可以为特定的控件更改控件名称，例如，实例2中用于判断分数的标签起名为： lblscore 。

Chr(13)

 实例4, 5, 6：

计算百数之和，奇数和，偶数和，原本例子是限定在100以内的数，我尝试了一下超出一百的数，发现了分别当定义为integer和long时的数值上限，但有一点搞不明白，就是下面定义中的取值范围也是十进制的，敲的例子中也是十进制数，有些弄不明白了，是我搞混了吧，希望大家帮忙解决一下。

数值数据类型   数值类型分为整数型和实数型两大类。  1、整数型   整数型是指不带小数点和指数符号的数。  按表示范围整数型分为：整型、长整型

（1）整型（Integer，类型符%）  整型数在内存中占两个字节（16位）  十进制整型数的取值范围：-32768 ~ +32767   例如：15，-345，654%都是整数型。而45678%则会发生溢出错误。

（2）长整型（Long，类型符&）  长整数型在内存中占4个字节（32位）。  十进制长整型数的取值范围：  -2147483648 ~ +2147483647   例如：123456，45678&都是长整数型。

   实例10：在VB中with....end with是什么意思

With 语句

在一个单一对象或一个用户定义类型上执行一系列的语句。

语法

With object

[statements]

End With

With 语句的语法具有以下几个部分：

部分 描述

object 必要参数。一个对象或用户自定义类型的名称。

statements 可选参数。要执行在 object 上的一条或多条语句。

说明

With 语句可以对某个对象执行一系列的语句，而不用重复指出对象的名称。例如，要改变一个对象的多个属性，可以在 With 控制结构中加上属性的赋值语句，这时候只是引用对象一次而不是在每个属性赋值时都要引用它。下面的例子显示了如何使用 With 语句来给同一个对象的几个属性赋值。

实例10中的语句：

With lbl1

 .ForeColor = QBColor(12)   '将标签框中文字的颜色设置为亮红色

 .Font = "创艺简魏碑"       '设置标签框中文字字体

 .FontSize = 36             '设置标签框中文字字号

 .FontBold = True           '设置标签框中文字加粗显示

 .Left = (Me.Width - lbl1.Width) / 2   '使标签框在窗体form1中水平居中

 .Top = (Me.Height - lbl1.Height) / 2  '使标签框在窗体form1中垂直居中

 End With

注意 当程序一旦进入 With 块，object 就不能改变。因此不能用一个 With 语句来设置多个不同的对象。

 

可以将一个 With 块放在另一个之中，而产生嵌套的 With 语句。但是，由于外层 With 块成员会在内层的 With 块中被屏蔽住，所以必须在内层的 With 块中，使用完整的对象引用来指出在外层的 With 块中的对象成员。

 

重点 一般来说，建议您不要跳入或跳出 With 块。如果在 With 块中的语句被执行，但是 With 或 End With 语句并没有执行，则一个包含对该对象引用的临时变量将保留在内存中，直到您退出该过程。