文档库 最新最全的文档下载
当前位置:文档库 › VB实例制作——倒序输出

VB实例制作——倒序输出

VB实例制作——倒序输出
VB实例制作——倒序输出

《VB实例制作——倒序输出》教案

上课时间:2014.11.21 星期五【教学目标】

1、掌握Len函数和mid函数的使用

2、理解字符运算符号与字符表达式

3、理解顺序连接与反向连接的区别

【教学重难点】

重点:len函数与mid函数

难点:字符串的正向与反向连接

【教学方法】

任务教学法、自主探究学习法、上机实践操作

【教学环境】

机房、任务单

【教学过程】

一、任务描述

用VB设计一个应用程序,设计如图所示的界面.在一个文本框里输入一个4位正整数,比如4358,将其逆序组合成8534后在另外一个文本框里输出.单击“清除”按钮,则能清除两个文本框中的数据。

二、操作提示

1、新建工程

在VB中新建一个“标准EXE”工程。

2、界面设计

新建工程后,进入VB的界面设计窗口.按照下面的操作提示,在窗体上添加2个标签(Label)对象,2个命令按钮(Command)对象,2个文本框(TextBox)对象如下图所示。

各个控件对象的主要属性可参见

3、代码填空

在Command1对象的Click事件中输入如下代码:

Private Sub Command1_Click()

Dim a, b As String '定义字符串变量a,b

Dim n As Integer '定义字整型变量n,用来存放字符串的长度

a = Text1.Text '把文本框的值赋值给a

n = Len(Text1.Text) '求出文本框1中输入字符串的长度,并赋值给n

For i = n To 1 Step -1 '逆序求出字符串b

b = b + Mid(a, i, 1)

Next i

Text2.Text = b '把字符串b在文本框2中显示

End Sub

Private Sub Command2_Click() '清空文本框1和文本框2的内容

Text1.Text = ""

Text2.Text = ""

End Sub

4、运行调试程序

选择菜单栏“运行”——“启动”命令,或按F5,运行程序,检查是否有错。如下图所示

5、保存程序

在桌面上新建一个文件夹,以自己的名字命名。然后在vb中选择菜单栏“文件”——保存窗体文件(.frm)、工程文件(.vbp)、可执行文件(.exe),文件名为“倒序输出”,如

最后把做好的结果上交.

三、课堂小结

Len(X):计算字符串的长度

例:Len(“ABC”)=3

Mid(X,n,k):取字符串X中第n个字符起长度为k的子串

例:Mid(“abcd”,3,1)=”c”

四、布置作业

写一个程序,要求输入“大上海”,输出则为“海上大”

【教学反思】

本堂课的重点是对len函数、mid函数与for语句的综合运用,同学们对代码的编写有一定的难度。通过前面2个课时的学习,有一部分学生能够独立完成。

相关文档