VB实例制作——倒序输出

《VB实例制作——倒序输出》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、《VB实例制作——倒序输出》教案上课时间：2014.11.21星期五【教学目标】1、掌握Len函数和mid函数的使用2、理解字符运算符号与字符表达式3、理解顺序连接与反向连接的区别【教学重难点】重点：len函数与mid函数难点：字符串的正向与反向连接【教学方法】任务教学法、自主探究学习法、上机实践操作【教学环境】机房、任务单【教学过程】一、任务描述用VB设计一个应用程序，设计如图所示的界面.在一个文本框里输入一个4位正整数，比如4358，将其逆序组合成8534后在另外一个文本框里输出.单击“清除”按钮

2、，则能清除两个文本框中的数据。二、操作提示1、新建工程在VB中新建一个“标准EXE”工程。2、界面设计新建工程后，进入VB的界面设计窗口.按照下面的操作提示，在窗体上添加2个标签（Label）对象，2个命令按钮（Command）对象，2个文本框（TextBox）对象如下图所示。各个控件对象的主要属性可参见类对象名属性名属性值FormForm1Caption倒序输出LabelLabel1Caption请输入一个4位正整数Label2Caption逆序数为CommandButtonCommand1Capt

3、ion清除Command2Caption退出TextBoxText1Text（空白）Text2Text（空白）完成好的界面如下图所示3、代码填空在Command1对象的Click事件中输入如下代码：PrivateSubCommand1_Click()Dima,bAsString'定义字符串变量a，bDimnAsInteger'定义字整型变量n，用来存放字符串的长度a=Text1.Text'把文本框的值赋值给an=Len(Text1.Text)'求出文本框1中输入字符串的长度，并赋值给nFori=nTo

4、1Step-1'逆序求出字符串bb=b+Mid(a,i,1)NextiText2.Text=b'把字符串b在文本框2中显示EndSubPrivateSubCommand2_Click()'清空文本框1和文本框2的内容Text1.Text=""Text2.Text=""EndSub4、运行调试程序选择菜单栏“运行”——“启动”命令，或按F5，运行程序，检查是否有错。如下图所示5、保存程序在桌面上新建一个文件夹，以自己的名字命名。然后在vb中选择菜单栏“文件”——保存窗体文件（.frm）、工程文件（.vb

5、p）、可执行文件（.exe），文件名为“倒序输出”，如下最后把做好的结果上交.三、课堂小结Len(X)：计算字符串的长度例：Len(“ABC”)=3Mid(X,n,k)：取字符串X中第n个字符起长度为k的子串例：Mid(“abcd”,3,1)=”c”四、布置作业写一个程序，要求输入“大上海”，输出则为“海上大”【教学反思】本堂课的重点是对len函数、mid函数与for语句的综合运用，同学们对代码的编写有一定的难度。通过前面2个课时的学习，有一部分学生能够独立完成。