vb趣味程序教案

教学进度表

常见的高级语言

1. BASIC。入门者首选语言。指令少，容易上手，易于掌握。

2. PASCAL适合科学计算、数据处理，运行编译速度快。

3. C语言。主要适用于应用软件的幵发，计算机专业人员的必修课。

4. JAVA、.Net、PHP C# HTML••…

、VB语言介绍

VB是Visual Basic 的简称，它对学习者的要求不高，但本身效率高、功能强大、实用性强。主要有如下特点：面向对象、事件驱动、软件的集成式幵发、结构化。

面向对象和面向过程的区别：

例如五子棋，面向过程的设计思路就是首先分析问题的步骤:

1、幵始游戏，

2、

3、绘制画面,

4、判断输赢,

、轮到白子,

6、绘制画面，

4、字符串型（string ）

变量定义部分的一般形式为:

form2.Show forml.Hide

二、登录窗体的完成

1. 如果用户在登录窗体输入的账号和密码与注册窗体输入的一致，则显示登

录后的窗口，否则提示“账号或密码错误”。

2. 退出”按钮代码为En d;

3. “登录”按钮代码为：

If user = Text3.Text And pass = Text4.Text Then

form3.Show

form2.Hide

Else

MsgBox （"帐号或密码错误"）

End If

【学生练习】完成QC注册、登录界面的制作，并保存工程提交。

【扩展练习】Option控件的使用。

“提交”按钮代码为:

“返回重选”

“返回重选”

按钮代码为:

按钮代码为:

教学情景设计【新课引入】

师：5、4、3、2、1,我们现在幵始上课。

刚才我们看到一个倒计时的程序，在日常生活中我们经常会遇到这种情况，例如十运会的倒计时牌；十字路口的红绿灯；火箭发射最后的数秒。我们如何在计算机中用VB来实现以上的功能呢？

【复习回顾】

师：jishi Text 显示的内容是5,写出相应的语句？

生: jishi.Text=5

添加Delay⑴

【新知学习】

语句的格式

For ＜循环变量＞=＜初值＞ To ＜终值＞ [Step ＜步长＞]

＜ 语句＞

Next ＜循环变量＞

【新课讲授】

【新知拓展】暴力破解密码

三、

For 语句的执行过程

橹环语句

【学生练习】

1.在屏幕中显示5、4、3、 2、1、0

做好后生成工程

2.在屏幕中显示12、22、32 、42、 52 。 1.exe

做好后生成工程5.exe

算法分析：从0到999999依次尝试，如果某个数字和密码

相等，则输出、退出循环；否则继续尝试下一个数。

密码变量为pass

For i= t o step

If ________________ the n

jieguo.text二_______

exit for

end __________

Next __________

If i=________________ the n

jieguo.text二“破解失败”

End if

【新课讲授】

“计时秒表”是利用VB内部函数Timer,该函数报告从当天零点到现时的总

秒数。如果两次启用此函数，就可以得到这两次启用时的时间差，也就起到了计时的作用。“计时秒表”程序采用两种计时方式，如果计时的时间间隔较短，可以用鼠标按键放下时幵始计时，鼠标键释放时结束计时的方式，程序中用

Command_MouseDown() Command_MouseUp两事件来处理计时的；如果计时的时

间间隔较长，则可以分别按“计时幵始”和“计时结束”两命令按钮来计时，这

两个命令按钮都是响应鼠标单击事件的Command_Click()。程序的表达式：In t((Timer-start)*1OOO)/1OOO

是计算“计时秒表”结束时与启动时的时间差，并精确到1/1000秒。

本程序使用了一个Shape1控件，它用Timer1定时器每隔0.5秒驱动一次，

以显示计时器的工作状态，在计时还是不在计时。

代码讲解：

Dim start, start1 ' 变量说明语句

Dim a As In teger

Private Sub Comma nd1_Click()

Labell.Caption 二""’ 清空Labell

End Sub

教学情景设计