第一篇：vb选择语句范文
VB循环语句的用法
1.While...Wend 语句
只要指定的条件为 True，则会重复执行一系列的语句。 语法
While condition [statements] .. Wend 2.Do...Loop 2.1 第一种用法
用 Do 循环重复执行一语句块，且重复次数不定。Do...Loop 语句有几种演变形式，但每种都计算数值条件以决定是否继续执行。如同 If...Then condition 必须是一个数值或者值为 True(非零)或 False(零)的表达式。
在下面的 Do...Loop 循环中，只要 condition 为 True 就执行 statements。
Do While condition statements .. Loop 2.2 第二种用法
Do...Loop 语句的另一种演变形式是先执行语句，然后在每次执行后测试 condition。这种形式保证 statements 至少执行一次：
Do statements Loop While condition 注:其它两种演变形式类似于前两个，所不同的是，只要 condition 为 False 而不是 True，它们就执行循环。 循环零次或多次
Do Until condition statements Loop
至少循环一次
Do statements Loop Until condition 3.For...Next 在不知道循环内需要执行多少次语句时，宜用 Do 循环。但是，在知道要执行多少次时，则最好使用 For...Next 循环。与 Do 循环不同， For 循环使用一个叫做计数器的变量，每重复一次循环之后，计数器变量的值就会增加或者减少。For 循环的语法如下：
For counter = start To end [Step increment] statements Next [counter] 参数 Counter、Start、end 和 increment 都是数值型的。
注意 increment 参数可正可负。如果 increment 为正，则 Start 必须小于等于 end，否则不能执行循环内的语句。如果 increment 为负，则 Start 必须大于等于 end，这样才能执行循环体。如果没有设置 Step，则 increment 缺省值为 1。 实例：
以下代码打印出所有有效的屏幕字体名：
Private Sub Form_Click () Dim I As Integer For i = 0 To Screen.FontCount
Print Screen.Fonts (i) Next End Sub 4.For Each...Next For Each...Next 循环与 For...Next 循环类似，但它对数组或对象集合中的每一个元素重复一组语句，而不是重复语句一定的次数。如果不知道一个集合有多少元素， For Each...Next 循环非常有用。
For Each...Next 循环的语法如下：
For Each element In group statements Next elementt 例如，下面的子过程打开 Biblio.mdb，把每一个表的名字加到列表框中。
Sub ListTableDefs () Dim objDb As Database
Dim MyTableDef as TableDef Set objDb = OpenDatabase("c:vbiblio.mdb", _ True, False) For Each MyTableDef In objDb.TableDefs ()
List1.AddItem MyTableDef.Name Next MyTableDef End Sub 请记住使用 For Each...Next 时的几点限制：
对集合，element 只能是 Variant 变量，或一般的 Object 变量，或“对象浏览器”中列出的对象。
对数组，element 只能是 Variant 变量。
For Each...Next 不能与用户自定义类型的数组一起使用，因为 Variant 不可能包含用户自定义类型。
第二篇：vb选择题及答案
30104. 下列叙述错误的是()。
(A) VB应用程序没有明显的开始和结束语句
(B) VB控件的所有属性值均可在属性窗口中设置 (C) VB是事件驱动型可视化编程工具
(D) VB通过"工具"菜单的"选项"设置代码编辑窗口的字体大小 (答案：B) 30105. 标准模块文件的扩展名是()。
(A) .cls (B) .frm (C) .bas (D) .rec (答案：C) 30106. 下列叙述错误是()。
(A) 打开一个工程文件，系统自动装入与该工程有关的文件
(B) 保存VB程序时，应分别保存窗体和工程文件 (C) 事件可以由用户触发，也可以由系统触发 (D) VB应用程序只能以解释方式执行 (答案：D) 30108. 下列叙述错误的是()。
(A) VB是可视化程序设计语言(B) VB采用事件驱动编程机制
(C) VB是面向过程的程序设计语言 (D) VB应用程序可以以编译方式执行 (答案：C) 30109. 下列叙述正确的是()。
(A) VB的事件由用户定义(B) VB程序以顺序方式执行
(C) VB程序从Main()函数开始执行 (D) VB运行时，总是等待事件的发生 (答案：D) 30201. 下列为整型变量的是()。
(A) x! (B) x# (C) x% (D) x$ (答案：C)
30202. 设有语句组： Dim S1 As String*5 S1 = "VB Test" 则S1的值为()。
(A) VB Test (B) VB Te (C) VBTes (D) BTest (答案：B)
30203. 下列()是合法的变量名。
(A) x_y (B) x-y (C) 2x (D) and (答案：A)
30204. 下列()为单精度变量。
(A) x! (B) x# (C) x% (D) x$ (答案：A)
30205. 由()关键字声明的局部变量在整个程序运行时一直存在。
(A) Dim (B) Public (C) Static (D) Private (答案：C)
30206. 定义变量时如不指定类型，该变量为()变量。
(A) Integer (B) String (C) Variant (D) Single (答案：C)
30208. 下列()是合法的变量名。
(A) x%y (B) xy% (C) 2x (D) Or (答案：B)
30209. 日期常量用()作为界定符。
(A) " (B) % (C) # (D) & (答案：C)
30304. 设a=6，b=5，c=-2;执行语句Print a > b > c后，窗体上显示的是()。
(A) 1 (B) True (C) False (D) 出错信息 (答案：B)
30305. 下列表达式中，值最大的是()。
(A) 2 3 (B) 2 / 3 (C) 2 mod 3 (D) 3 mod 2 (答案：C)
30306. 下列运算符中，优先级最低的是()。
(A) * (B) ^ (C) / (D) (答案：D)
30307. 表达式 2 = 3 < 1 的是()。
(A) 0 (B) 1 (C) True (D) False (答案：C)
30308. x大于0且小于10的VB表达式是()。
(A) 0 < x < 10 (B) x> 0 And x < 10 (C) x> 0 Or x < 10 (D) x> 0 : x < 10 (答案：B)
30309. 判断整型变量x是奇数的表达式是()。
(A) x Mod 2 <> 0 (B) x Mod 2 != 0 (C) x Mod 2 ≠ 0 (D) x Mod 2 = 0 (答案：A)
30401. 返回值为数值的函数是()。
(A) Mid (B) Instr (C) Left (D) Rtrim (答案：B)
30402. 表达式Len("AB52")的值是()。 (A) 0 (B) 4 (C) 6 (D) 8 (答案：B) 30404. 返回值为字符串的函数是()。
(A) Str (B) Val (C) Len (D) Asc (答案：A) 30405. 当x=0时，函数IIf(x > 0, 1, IIf(x < 0, -1, 0))的返回值是()。 (A) 0 (B) 1 (C) -1 (D) 出错
(答案：A) 30407. 如果Sgn(x)的值为-1，整型变量x的值是()。 (A) 0 (B) 整数
(C) 正整数
(D) 负整数 (答案：D) 30409. 除去字符串左侧空格的函数是()。
(A) Left() (B) Trim() (C) Ltrim() (D) LeftTrim() (答案：C) 30502. 下列语句不合法的是()。
(A) x = 1 : y=2
(B) ?x ; y ; (C) ?x , y , (D) x = 1; y = 2 (答案：D) 30503. 如果VB语句超过一行，可以使用空格加()续行。
(A)y If xx Then z = x + y If x + y > z30 If a = b And b > c Then c = a + b Print a, b, c End Sub 运行时，单击按钮，窗体输出的结果是()。 (A) 80 50 30 (B) 80 30 30 (C) 50 30 80 (D) 50 30 30 (答案：B) 31505. 执行下列程序段后，x的值是()。 n = 5: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i< n (A) 10 (B) 15 (C) 24 (D) 120 (答案：C) 31509. 如果x小于y的平方，则在窗体上输出"OK"。完成该要求的单行条件语句是()。 (A) If x < y ^ 2 Then "OK" (B) If x < y ^ 2 Then Show "OK" (C) If x < y ^ 2 Then Print "OK" (D) If x < y ^ 2 Then Put "OK" (答案：C) 31602. 阅读下列程序段： x = 0 For i = 1 To 4 For j = 1 Toi x = x + 1 Next j, i 执行以上循环后，x 的值为()。 (A) 6 (B) 9 (C) 10 (D) 16 (答案：C) 31604. 执行下列程序段后输出的结果是()。 s = 1 For i = 1 To 3 For j = 0 To i-1 s = s + s * j Next j ? s; Next I (A) 1 2 (B) 2 1 (C) 2 2 12 (D) 1 2 12 (答案：D) 31605. 阅读下列程序段： m = 0 For i = 1 To 3 For j = 1 Toi m = m + j Next j, i 执行以上的循环后，i和m的值分别为()。 (A) 3 6 (B) 3 10 (C) 4 6 (D) 4 10 (答案：D) 31606. 运行下列程序段，其中“n=n+1”语句被执行的次数是()。 Dim m%, n% For m = 1 To 3 For n = 1 To 6 Step 2 n = n + 1 Print n Next Next (A) 3 (B) 6 (C) 9 (D) 18 (答案：B) 31701. 在通用声明中给出Option Base 1语句，则数组a包含()个元素。 Dim a(3, -2 To 1, 5) (A) 120 (B) 75 (C) 60 (D) 13 (答案：C) 31704. 如下数组声明语句中数组a包含的元素个数为()。 Dim a(3, -2 To 1, 5) (A) 96 (B) 75 (C) 60 (D) 13 (答案：A) 31706. 运行下列程序，单击窗体后输出的结果是()。 Private Sub Form_Click() Dim a Dim s As Integer, i As Integer a = Array(1, 2, 3, 4, 5, 6) s = 1 For i = 5 To 1 Step -2 s = s * a(i) Next i Print s End Sub (A) 15 (B) 48 (C) 120 (D) 720 (答案：B) 1.工程文件的扩展名为。
A、.frx B、.bas
C、.vbp D、.frm 2.以下4个选项中，属性窗口未包含的是。
A、对象列表 B、工具箱 C、属性列表 D、信息栏 3.下列不属于对象的基本特征的是。 A、属性 B、方法 C、事件 D、函数
4.在设计模式双击窗体中的对象后，Visual Basic将显示的窗口是。 A、项目(工程)窗口 B、工具箱 C、代码窗口 D、属性窗口 5.Visual Basic中“程序运行”允许使用的快捷键是。 A、F2
B、F5 C、Alt+F3
D、F8 6.改变控件在窗体中的上下位置应修改该控件的属性。 A、Top
B、Left C、Width
D、Right 7.窗体模块的扩展名为。
A、.exe
B、.bas C、.frx D、.frm 8.窗体的FontName属性的缺省值是。 A、宋体 B、仿宋体 C、楷体 D、黑体
9.FontSize属性用以设置字体大小，窗体的FontSize属性缺省值为。 A、5
B、9 C、12
D、16 10.在Visual Basic中，称对象的数据为。 A、属性 B、方法
C、事件 D、封装 11.下列选项中不属于事件的是。
A、Dblclick B、Load C、Show
D、KeyUp 12.将Visual Basic编制的程序保存在磁盘上，至少会产生何种文件。 A、.doc与.txt
B、.com与.exe
C、.bat与.frm D、.vbp与.frm 1.Integer类型数据能够表示的最大整数为。 A、275 B、215-1
C、216
D、216-1 2.货币类型数据小数点后面的有效位数最多只有。 A、1位 B、6位 C、16位 D、4位
3.输入对话框InputBox的返回值的类型是。 A、字符串 B、整数 C、浮点数 D、长整数
4.运算符“”两边的操作数若类型不同，则先再运算。 A、取整为Byte类型 B、取整为Integer类型 C、四舍五入为整型 D、四舍五入为Byte类型 5.Int( Rnd * 100 ) 表示的是范围内的整数。 A、[0，100]
B、[1，99]
C、[0，99]
D、[1，100] 6.下列程序段的输出结果是。
a=10: b=10000: x=log(b)/log(a): Print "lg(10000)=";x A、lg(10000)=5
B、lg(10000)=4 C、4
D、5
7.返回删除字符串前导和尾随空格符后的字符串，用函数。
A、Trim
B、Ltrim C、Rtrim D、mid
8.Print语句的一个输出表达式为，则输出包括日期、时间信息。 A、Date
B、Month
C、Time
D、Now 9. 语句Print "5*5" 的显示结果是。
A、25
B、"5*5"
C、5*5
D、出现错误提示 10.语句“Form1.Print Tab(10);"#"”的作用是在窗体当前输出行。 A、第10列输出字符“#”
B、第9列输出字符“#” C、第11列输出字符“#” D、输出10个字符“#” 1.下列关于Select Case之测试表达式的叙述中，错误的是。
A、只能是变量名 B、可以是整型 C、可以是字符型 D、可以是浮点类型 2.下列关于Select Case的叙述中，错误的是。
A、Case 10 To 100
表示判断Is是否介于10与100之间
B、Case "abc","ABC" 表示判断Is是否和"abc"、"ABC"两个字符串中的一个相同 C、Case "X"
表示判断Is是否为大写字母X D、Case -7,0,100
表示判断Is是否等于字符串"-7，0，100" 3.由“For i=1 To 16Step 3”决定的循环结构被执行()次。 A、4 B、5 C、6 D、7 4.若i的初值为8，则下列循环语句的循环次数为次。
Do While i<=17 i=i+2 Loop A、3次
B、4次 C、5次
D、6次
5.由“For i=1 To 9Step -3”决定的循环结构被执行次。 A、4 B、5 C、6 D、0 6.窗体通用部分的语句“OptionBase 1”，决定本窗体中数组下标界。 A、下界必须为1 B、缺省的下界为1 C、下界必须为0 D、缺省的下界为0
1.标签控件的标题和文本框控件的显示文本的对齐方式由属性来决定。 A、WordWrap B、AutoSize C、Alignment
D、Style 2.将命令按钮Command1设置为窗体的取消按钮，可修改该控件的属性。 A、Enabled
B、Value
C、Default
D、Cancel 3.下列属性用来表示标签或窗体的标题。
A、Text
B、Caption C、Left
D、Name 4.将焦点主动设置到指定的控件或窗体上，应采用方法。 A、SetDate B、SetFocus C、SetText D、GetGata 5.按Tab键时，焦点在各个控件之间移动的顺序是由属性来决定的。 A、Index
B、TabIndex C、TabStop D、SetFocus 6.下列属性用来表示各对象(控件)的位置。
A、Text
B、Caption
C、Left D、Name 7.当文本框的属性设置为True时，在运行时文本框不能编辑。 A、Enabled
B、Locked C、Visible
D、MultiLine 8.要使文本框显示滚动条，除了设置ScrollBars属性外还必须设置属性。 A、AutoSize B、MultiLine C、Alignment
D、Visible 9.文本框控件Text4的Text属性默认值为。
A、Text4
B、"Text4" C、Locked
D、Name
10.文本框中选定的内容，由下列属性来反映。
A、SelText B、SelLength C、Text
D、Caption 11.选中复选框控件时，Value属性的值为。
A、True
B、False
C、0
D、1 12.要使复选框控件不响应Click事件，可设置复选框的属性。 A、Appearance
B、Style
C、Enabled D、TabIndex 13.若要在同一窗体中安排两组单选钮，可用控件予以分隔。 A、文本框 B、框架 C、列表框 D、组合框
14.列表框的属性返回或设置列表框中各列表项的文本。 A、Selected
B、List C、Text
D、Caption 15.List1.Clear中的Clear是。
A、方法 B、对象 C、属性 D、事件
16.以下语句将删除列表框List1中的最后一项。 A、List1.RemoveItem List1.ListCount B、List1.Clear C、List1.List(List1.ListCount-1)= "" D、List1.RemoveItem List1.ListCount-1 17.若要把"XXX"添加到列表框List1中的第三项，则可执行语句。 A、List1.AddItem "XXX", 3
B、List1.AddItem "XXX", 2 C、List1.AddItem 3,"XXX"
D、List1.AddItem 2,"XXX" 18.滚动条的属性用于指定用户单击滚动条的滚动箭头时，Value属性值的改变量。 A、LargeChange B、SmallChange C、Value
D、Change 19.单击滚动条两端的任意一个滚动箭头，将触发该滚动条的事件。 A、KeyDown B、Change C、Scroll
D、Click 20.设计动画时通常用定时器控件属性来控制动画速度。 A、Interval B、Timer
C、Move
D、Enabled 1.对画出的图形进行填充，应使用属性。 A、BackStyle B、FillColor C、FillStyle D、BorderStyle 2.将图片框的属性设置成True时，可使图片框根据图片调整大小。 A、Picture
B、AutoSize C、Stretch
D、AutoRedraw 3.可以改变坐标的单位。
A、DrawStyle属性 B、Cls方法 C、ScaleMode属性 D、DrawWidth属性 4.Visual Basic用以下哪一条指令来绘制直线。 A、Line方法 B、Pset方法 C、Point属性
D、Circle方法 5.Visual Basic可以用以下哪一条属性来设置边框类型。 A、BorderStyle B、BorderWidth C、DrawWidth D、FillColor 6.属性可以用来设置所绘线条宽度。 A、DrawStyle B、BorderStyle C、DrawWidth
D、FillColor 7.下列是用来画圆、圆弧及椭圆的。 A、Circle方法
B、Pset方法 C、Line属性 D、Point属性
8.描述以(1000，1000)为圆心、以400为半径画1/4圆弧的语句，以下正确的是。 A、Circle(1000,1000),400,0,3.1415926/2
B、Circle(1000,1000),,400,0,3.1415926/2 C、Circle(1000,1000),400,,0,3.1415926/2
D、Circle(1000,1000),400,,0,90 9.语句“Circle(1000,1000),800,,-3.1415926/3,-3.1415926/2”绘制的是。 A、弧
B、椭圆 C、扇形 D、同心圆 10.语句“Circle(1000,1000),800,,,,2”绘制的是。 A、弧
B、椭圆 C、扇形 D、同心圆 11.上题Circle语句中最后的2表示的是。
A、椭圆的纵轴和横轴长度比 B、椭圆的横轴和纵轴长度比 C、同心圆的半径比 D、圆弧两半径间的夹角 12.RGB函数中的3个数字分别表示。 A、红、绿、白 B、红、绿、蓝
C、色调、饱和度、亮度 D、当前色、背景色、前景色 13.当Stretch属性值为False时，。
A、图片大小随影像框的大小进行调整 B、影像框的大小随图片大小进行调整 C、图片框的大小随图片大小进行调整 D、图片大小随图片框的大小进行调整 14.BorderStyle属性是用来表示线条的。 A、长度 B、宽度 C、线形 D、颜色
15.在Visual Basic中，不能作为其他控件的容器。 A、框架 B、图片框 C、影像框
D、窗体
第三篇：程序的选择结构--条件语句(教学设计)
程序的选择结构--条件语句
灵武一中 马振涛 【教材分析】
本节课是广东教育科学出版社出版的《信息技术基础》(选修)第二章程序的选择结构第三节的教学内容。介绍程序选择结构条件语句的相关知识与技能，并以解决实际问题为例，引领学生经历分析问题、确定算法、编写程序、调试程序的实践活动过程，逐步掌握利用利用计算机解决实际问题的基本方法。 【学情分析】
本节课教学对象为高一学生，但由于大部分学生上机操作能力较差，缺乏平时学习过程中信息技术素养的积累和培养，所以教学过程中要时刻把握学生的认知能力和接受能力，根据实际课堂对所设置的教学内容和任务进行适时调整。 【教学目标】 1. 知识与技能
(1)掌握条件语句的基本格式、功能和执行过程; (2)关系表达式和逻辑表达式的正确运用。 2.过程与方法
(1)能根据教师提出的思考问题，通过阅读教材和小组合作的方式解决问题。 (2)能够将算法转换成相应的程序并调试程序。 3.情感态度与价值观
经历使用计算机解决问题的过程，体验用计算机成功解决问题带来的快乐。 【教学策略及环境】
使用任务驱动方法，在活动中体现分层次和探究式教学。 教学环境：网络教室。 【教学重难点】
重点：(1) 条件语句的格式、功能、执行过程。
(2) 关系表达式、逻辑表达式等程序设计语言的基本知识。
难点：在理解条件语句的基础上，如何利用计算机来解决生活中的实际问题。 【课时安排】1课时 【教学过程】
一、创设情境 导入新课
给出“一个学生思考因周未天气情况来决定去干什么”的动画，并运用英语知识中的虚拟语气中的一个语句“If it rained on weekend, I would not go to theme park. ”
学生思考：问题1“怎么让计算机去判断: If it rained on weekend, I would not go to theme park.”?引出本节课内容。
二、条件语句
环节1：学生自主学习教材42页“条件语句”内容
教师请学生来回答:
1、 条件语句的基本格式?单行形式和块形式。 它们分别有什么特点?
2、条件语句的执行过程是什么?
环节2：教师小结学生学习到的知识“条件语句格式”。 环节3：学生上机实践“让计算机来解决问题1”. 学生分组练习将算法转换成程序并调试程序的过程。
环节4：师生共同发现并解决在算法转换成程序并调试程序的过程中出现的问题。
三、关系表达式
环节1：学生思考问题2“随机给出一个学生的成绩，怎么让计算机来判断这个学生的成绩是否合格? ”
提示：这个问题与上一个问题有什么区别? 条件变了
环节2：学生自主学习教材43页“关系表达式”内容，获得表达问题2条件的语句。
环节3：学生上机实践“让计算机来解决问题2”. 环节4：师生共同发现并解决在算法转换成程序并调试程序的过程中出现的问题。
环节5：教师小结关系表达式运算符号有哪些。
四、逻辑表达式的运用
环节1：学生思考问题3“令三角形的三条边分别为a,b,c，可根据构成三角形的条件：任意两边之和大于第三边;随机给出这三个变量的值，让计算机行判断是否构成三角形?”
提示：这个问题与前两个问题又有什么区别? 还是条件变了 环节2：学生自主学习教材43页“逻辑表达式”内容，获得表达问题3条件的语句。
环节3：学生上机实践“让计算机来解决问题3”. 环节4：师生共同发现并解决在算法转换成程序并调试程序的过程中出现的问题。
环节5：教师小结逻辑表达式的三个运算符和其运算须序。
五、拓展
周未班里有五位同学去“361°”鞋店想买鞋，他们看中的一双鞋的原价是500元;这天正好鞋店搞活动： (1)买一双，按九折优惠 (2)买二双，按八折优惠 (3)买三双，按七折优惠 (4)买四双，按六折优惠 (5)买五双，按五折优惠
请同学们利用if语句编写程序，帮这五位同学计算一下： 如果只有一位同学买鞋，他要花多少钱? 如果有二位同学买鞋，他们分别要花多少钱? 如果有三位同学买鞋，他们分别要花多少钱? 如果有四位同学买鞋，他们分别要花多少钱? 如果五位同学都买鞋，他们分别要花多少钱? 学生运用本节课学到if语句尝试解决这个问题。
六、小结
本节课主要学习了if条件语句的基本格式;在使用if语句时运用到的关系表达式和逻辑表达式 。运用if条件语句解决了实际中碰到的问题。
第四篇：VB论文
学生姓名 ：曹超
班 级 ：1226001 学 号 ：201220600107 专 业 ：采矿工程
日期: 2014 年 12 月 18 日
学习VB的心得体会
这学期选修了VB这门学科，想从学习中对计算机有更深刻的认知，也对我大学中的计算机2级考试奠定基础。那么谈谈这学期的学习中对vb的认知和心得体会。
一、 Visual Basic 简介
Visual Basic 是Microsoft 公司开发的Windows 应用程序开发工具，Visual ——"可视化的"，是一种开发图形户界面(GUI)的方法，使得非计算机专业的人也可以开发出专业的Windows软件。Visual Basic继承了BASIC语言简单易学的优点，又增加了许多新的功能，它采用面向对象与事件驱动的程序设计思想，使编程变得更加方便、快捷，使用Visual Basic既可以开发个人或小组使用的小型工具，又可以开发多媒体软件，数据库应用程序，网络应用程序等大型软件，是国内外最流行的程序设计语言之一。英文Visual的意思是"视觉的"，"可视的Baisc"这个名字可能抽象了点，但实际上它却是最直观的编程方法，之所以叫做"可视"，你只要看到VB的界面就会明白，实际上你无需编程，就可以完成许多步骤。 在VB中入了控件的概念，在Windows中控件的身影无处不在，如按钮、文本框等。VB把这些控件模式化，并且每个控件都有若干属性用来控制控件的外观，工作方法，能够响应用户操作(事件)。 这样你就可以象在画板上一样，随意点几下鼠标，一个按钮就完成了。这些在以前的编程语言下是要经过相当复杂的工作的。
可视化设计：Visual Basic为用户提供大量的界面元素(在Visual Basic中称为控件对象)，例如 "窗体"、"菜单"、"命令按钮"、"工具按钮"、"检查框"等等。用户只需要利用鼠标，键盘把这些控件对象拖动到适当的位置，设置它们的大小，形状，属性等，就可以设计出所需的应用程序界面。
事件驱动编程：Windows操作系统出现以来，图形化的用户界面和多任务多进程的应用程序要求程序设计不能是单一性的，在使用Visual Basic设计应用程序时，必须首先确定应用程序如何同用户进行交互。(例如发生鼠标单击，键盘输入等事件时，用户必须编写代码控制这些事件的响应方法)这就是所谓的事件驱动编程。
程序设计方法概述
1、初期的程序设计
高运行效率，少占用内存为目标
2、结构化程序设计
程序的可读性，可维护性为目标
程序=算法+数据结构+计算机语言+面向过程的程序设计方法
3、面向对象的程序设计(OOP)
降低程序的复杂性，提高软件的开法效率和改善工作界面为目标
程序=对象+消息+面向对象的程序设计
Visual Basic 特点
1、具有面向对象的可视化设计工具
2、事件驱动的编程机制
3、结构化的程序设计语言
4、提供了易学易用的应用程序集成开发环境
5、支持多种数据库系统的访问
6、高度可移植化的代码
7、VB6.0在开发环境上，网络功能等的大大增强。
二、对VB的理解
(1)VB不只是数据库和报表。不要以为VB就是数据库和报表，这只是VB强大功能的一小部份。如果这此都搞不清，还是好好的看一下相关的书籍，比在这里问问题有用多了。我以前没有学过数据库，只是有些编程的思路，后来学数据库就非常容易了。我做报表一般用RichTextBox或是From来做，一般都能做的很好，也不用去考虑什么水晶报表了。
(2)不要迷信于API。API能做很多东西，但有些东西在VB里面的函数中就有，API只是VB对WindowsSDK的封装而已。如果想学好API，建议学习SDK。如果VB本身就能很好的支持这个功能，何必还要用API呢。
(3)不要什么都想着控件。如果做程序都想着第三方控件的话，代价是很高的，不仅程序大，安全性也低了很多。其实VB本身带的控件已经完全够用了。
(4)认认真真的把MSDN中关于VB的内容好好看一看，特别是函数和语句，很有用的。
(5)遇到问题不要直接来这里问，自己好好想一想，试着解决这个问题，这虽然在时间上慢了，可是在自身的提高上却有很大的帮助。
(6)没事的时候，多研究些语言上的东西，如数据结构和算法，不要老是想着什么花哨的东西。这对以后的提高非常有帮助。 如何学好VB程序设计
1、学习程序设计的基本要求
2、VB的功能及特点
3、学习VB程序设计的方法
对学习者知识的要求：
首先，学习程序设计要具备一定的数学基础，计算机与数学有很大的联系，综观计算机历史，计算机的数学模型(图灵机，由Alan Turing提出)和体系结构(由John Von Neuman提出)等都是由数学家提出的。因此，要学习好计算机就要有一定的数学基础，不过对于初学者来说，在数学基础方面的要求并不是很高，从我个人的角度来看，有高中数学水平就差不多了。
其次，学习程序设计要有一定的逻辑思维能力，逻辑思维需要长时间的锻炼，如果你觉得自己在逻辑思维能力上有不足，也没有关系，因为编写程序本身也是对逻辑思维的锻炼，初学程序设计应具备的逻辑基础可以从高中数学中学到。
学习程序设计基本要求：
熟悉Visual Basic操作环境与设计工具，能设计应用程序界面。 掌握，理解面向对象程序设计基本概念。
掌握VB语言的基础知识，程序设计的方法。
能阅读一般难的程序;
能应用编写一些简单程序;
具有用Visual Basic开发Windows环境下应用程序的能力和阅读分析一般难度的VB程序的能力。
面向对象的程序设计具有如下的优点：
1、符合人们习惯的思维方法，便于分解大型的复杂多变的问题。由于对象对应于现实世界中的实体，因而可以很自然地按照现实世界中处理实体的方法来处理对象，软件开发者可以很方便地与问题提出者进行沟通和交流。
2、易于软件的维护和功能的增减，对象的封装性及对象之间的松散组合，都给软件的修改和维护带来了方便。
3、可重用性好。重复使用一个类(类是对象的定义，对象是类的实例化)，可以比较方便地构造出软件系统，加上继承的方式，极大地提高了软件开发的效率。
4、与可视化技术相结合，改善了工作界面。随着基于图形界面操作系统的流行，面向对象的程序设计方法也将深入人心，它与可视化技术相结合，使人机界面进入GUI时代。
三、 学习VB程序设计的方法
(1)保持良好的学习心态
1、要有自信,自强,积极主动学习.
2、克服畏难情绪,树立学好程序设计的信心 (2)要有良好的学习习惯
1、课前预习,认真听课并适当做些笔记,课后要认真复习消化所学内容,完成作业.
2、VB程序设计的入门学习并不难,但却是一个十分重要的过程,因为程序设计思想就在这时形成的,良好的程序设计习惯也在这个阶段养成. (3)学习程序设计要注重理解一些重要的概念.
VB程序设计本身并不复杂,翻开一本程序设计学习的书籍,看到的无非就是变量,函数,条件语句,循环语句等概念.但要真正能进行程序设计,需要深入理解这些概念.因此,在 程序入门阶段还是应该重视概念的学习. (4)自己动手编写程序
程序设计入门阶段要经常自己动手抄写或编写一些小程序,亲自动手进行程序设计是创造性思维应用的体现,是培养逻辑思维的好方法.因此一定要多动手编写程序,而且要从小程序开发开始,逐渐提高写程序的能力. (5)阅读,借签别人设计的好程序
多看别人设计好的程序代码,包括教材上的例题程序.在读懂别人程序后,要想他为什么这么设计能不能将程序修改完成更多的功能 则可以学到别人优秀的东西,帮助自己 提高自身水平. (6) VB程序设计学习的重点
1、程序设计课是高强度的脑力劳动,不是听会的,也不是看会的,而是练会的.
2、只有自己动手,编写一些程序,才会有成就感,进而对课程产生兴趣,学起来才比较从容.等你在编写大量程序之后,我想过二级肯定没问题，不过能不能做到真知灼见,运用自如我就不敢说了.
3、动手能力的培养是这门课和以往课程最大的不同之处.重点放在思路,算法,编程构思和程序实现上.语句只是表达工具,要求堂上积极思考,尽量当堂学懂,并做到灵活应用. (7)上机调试程序应注意的几点:
1、上机前应认真把实验题在用纸上做一做(包括窗体界面设计,事件代码的编写等)
2、每次上机后应总结,把没有搞清楚的问题记录下来,请教老师或同学.
3、平时应多抽课余时间多上机调试程序.注意系统的提示信息,遇到问题多问几次为什么. (8)养成良好的编程习惯
1、程序构思要有说明;
2、学会如何调试程序;
3、对运行结果要做正确与否的分析.
四、学习VB的意义
1、充实生活。业余时间到处游手好闲的身影不见了，没事我肯定一动不动的坐在电脑面前摆弄VB。是啊，想想以前，真是一无是处，不是打游戏，就是看小说。现在生活有了寄托，是VB给了我无穷的快乐，让我乐此不疲。
2、武装头脑。VB是一门计算机编程语言，也算是一项知识含量较高的东西吧。VB语言容易上手，采用的是可视化程序设计。通过学习VB，扩展了自己的视野，让自己的知识得到了增加。
3、锻炼意志。编程可不是一项轻松的活，尤其是一个人开发制作软件时，那工作量就多了。没有一定的坐功、细心程度及耐性那是绝对做不到的。有时，把程序做完了需要调试运行，但是就是不能达到自已设计的效果和目的，那你得戴上放大镜找啊找啊，也许就是因为一个符号或一个字母，你就得花上个几个小时，半天，甚至更长。越是这样越不要灰心，应该放松心态，一点一滴的去查。只要有一颗永不退缩的心，我相信你一定能找到问题所在，最后一定能见到你开心的笑容，也一定能找到成功者的感觉。
4、获得成就感。经过学习VB，我编写了一些小程序，例如计算器，贪吃蛇等。每当调试成功的时候，感到特别兴奋，成就感十足。
五、小结
通过选修课的学习，对了VB这种高级语言有了进一步的认知，对一些小的程序有了初步的设计方案，能根据要求设计出想要的程序，锻炼了自己的创造性思维，同时我经常看同学设计好的程序代码，包括教材上的例题程序，然后想想别人为什么这么计就能达到效果，我的设计能不能完成更多的功能，这样优秀了自己，帮助了自己，提高了自身水平，同样，也欣赏了别人，对别人是赞美，对自己是帮助，总而言之，这学期的VB课程让我收获了很多，使我对计算机2级考试有了信心。
第五篇：VB指导学习
2005-7-24
VB指导学习
1、if语句的另一种写法：
if num=10 then print num
当then后面(同一行)有执行语句时，if语句不能加end if
如有end if，则then后(同一行)不能有语句
2、两条语句放在同一行时用“：”分割
如：print num:print num+1
3、语句分多行写用“ _”连接，注意“空格&下划线”
如：print num _
+1
4、除法：a/ba
C++：“/”是除法，a、b都是int，则结果是int，如果其中一个是float，则结果float“”是转义字符。
VB：“/”是除法，有小数。“”取整(小数点后舍)
5、case语句用法：
private sub form1_click()
dim a
select case a
case 1to4,7to9,11,13<5
print a
case else
msgbox”不在范围内”
end select
end sub
6、VB中假是”0”，真是”-1”
C++中假是“0”，真是“1”
7、private sub form_click()
for I=2to4 step-1读完完整的一句之后，如发现问题，则跳过此句执行下一句。print I
next
print I本程序只执行此句一次
end sub
8、倒序输出字符串
取字符函数mid(string,2,3)表示从string字符串中第二位开始，一共取三位如：mid(abcdefg,2,3)，则结果为 bcd
lift(abcd,2)=ab
right(abcd,2)=cds
例：private sub command1_click()
dim x as integer,str_len as integer
dim str as string
for x=str_len to 1 step –1
text1.text=text1.text + dim(str,x,1)
next
end sub
form1窗体里有两个文本框和一个按钮
9、循环for I=1to5
„„
next (I)(next后最好不要加i)
10、声明变量：dim a,b as integer则a是变体，b是int
dim a as integer,b as integer则a,b都是int
11、webbrowser 网页
添加部件 ms internet controls 控件
private sub form_click()
webbrowser1.navigate app.path & “a心理测试.html”app.path表示当前目录end sub
private sub form1.resize()
wenbrowser1.height=form1.scaleheight-10“-10”可不写
webbrower1.width=form1.scalewidth-10如不加scale，则会覆盖一点边
12、有退出按钮的窗体，点击退出时询问，点击窗体右上角X则不询问，怎么办?Private sub form_unload(canel as integer„„)
If msgbox(”是否退出?”,vbokcancel,”询问”)=vbok=true=false
Cancel=true-取消关闭
End if
End sub
13、”关于”窗体
添加“关于”对话框
14、使用“选项卡”省地方
添加控件“ms tabbed dialog control 6.0”
如添加控件“ms windows common control 6.0”->”tabstrip”也可以作，但不好用。
15、帮助文件 msdn是世界最大的帮助文件，CHM格式的帮助文件
html help workshop
1. 目录 -> 节点&页面 -> 编译
2. new -> project -> ok -> 下一步 -> 保存路径&名称 -> 下一步 -> 勾中 html
files(.htm) -> 点击Add -> 下一步 -> 完成
3. 搜索proj -> 属性 compiler -> 勾中compiler -> ok
4. 作节点 页面 关键字
project(工程) ->contents(目录) ->index(索引) ->ok ->保存节 钥匙增加关键字contents(目录) ->是否创建 ->ok ->保存 ->点左第二个文件夹则属性换成书图标
16、用VB调用帮助文件
设工程属性的“帮助文件名”后，按“f1”弹出帮助
设一个“帮助菜单”，在菜单click事件中加入sendkeys“{F1}”，模拟用户按键盘还可以模拟alt + f4 , 但不可以模拟 control + alt + del (重启),
17、MDI无子窗体时，帮助无作用，调用ADI/ATI
把目录的成app.path ，把此文件拷贝到其它位置仍可使用
18、shell 只能调用.exe文件hh.exe是windows 自带的帮助打开“帮助文件”的exe文件shell”hh.exe 帮助文件的路径及文件名”
19、private sub a_click()
sendkeys”{f1}”
shell”hh.exe d:qiaosl„„.chm”,vbnormal focus
end sub
private sub form_load()
ap.help file=app.path &”„„.chm”
20、1.工程属性设“帮助菜单名”
2.App.helpfile= „„
3.Sendkeys”{f1}”
4.shell(“hh.exe„„”)
1&2作用是：按F1出帮助，便用2好一些，3是模拟按键盘F1，4可完全单独使用，3&4用在按键或菜单。
Api例子
下午
21、设置象素：窗体的lemode属性1-twip->缇，pixel->象素
22、动态生成控件必须用控件组
23、缺省事件是双击控件时自动出现的事件
缺省属性可省略：text1.text=”a”可写成text1=”a”,可省略“.text”
24、cotfouse->事件
25、模式&非模式窗体：
26、参数传递：默认按引用传递，Byval是按值传递
subs(byval x as single,y as single) 则x按值，y按引用，VB中真为-1
27、第十章，error
语法错误：
运行时错误：一般不出错，特定时出错，考虑不周全，如除数为0
逻辑错误：不报错，写的不对，如循环次数不对。
错误处理代码
1. 创建捕获错误代码
2. 处理此错误
3. 继续执行
on error goto 1标号(数字&字母都可以)
exit sub
1:
msgbox(“除数不为0”)
text1.text=””
text1.setfouse
end sub
resume (next/line)回到出错行，或出错行的下一行，或指定位置
on error resume next忽略错误/延迟最好少用，延迟后改不了
F8是单步运行
28、对象 –> err.属性&方法 number(错误编号)
29、dbpath=commondialog.filename
if dbpath=””
end
con.open
else resume
showopen
30、C++复习题：
简单
1. 用户接收一个数，调用一个函数，输出该数的立方
2. 写一个函数min(int a[])，求主程序中传来的数组中最小值
难度适中
3. 民主投票方法选班长，候选人编号A、B、C、D每位同学只能选一人作班长，
输入每张选票的候选人编号A~D，输入0终止，
调用函数process()输出每人得票数及当选人
4. 接收用户输入的数，直到有5个奇数，显示此5个奇数，
调用max()函数显示此5个奇数中最大数
高难度
5. 字符串变量A、B，B是A中的一部分，将B抠出A，再输出
超难度
6. 卖票，车站一共15，每站上(剩下站数)个人，然后剩下每站依次下一个人，问应
设几个座位，卖出多少张票
7. 发牌：按顺序发随机牌(使用随机数)