VB實(shí)例制作——倒序輸出參考模板

1、VB實(shí)例制作倒序輸出教案 上課時(shí)間： 2014.11.21 星期五【教學(xué)目標(biāo)】 1、掌握Len函數(shù)和mid函數(shù)的使用 2、理解字符運(yùn)算符號(hào)與字符表達(dá)式 3、理解順序連接與反向連接的區(qū)別【教學(xué)重難點(diǎn)】 重點(diǎn)：len函數(shù)與mid函數(shù) 難點(diǎn)：字符串的正向與反向連接【教學(xué)方法】任務(wù)教學(xué)法、自主探究學(xué)習(xí)法、上機(jī)實(shí)踐操作【教學(xué)環(huán)境】機(jī)房、任務(wù)單【教學(xué)過(guò)程】一、任務(wù)描述 用VB設(shè)計(jì)一個(gè)應(yīng)用程序，設(shè)計(jì)如圖所示的界面. 在一個(gè)文本框里輸入一個(gè)4位正整數(shù)，比如4358，將其逆序組合成8534后在另外一個(gè)文本框里輸出.單擊“清除”按鈕，則能清除兩個(gè)文本框中的數(shù)據(jù)。二、操作提示1、新建工程在VB中新建一個(gè)“標(biāo)準(zhǔn)EXE

2、”工程。2、界面設(shè)計(jì)新建工程后，進(jìn)入VB的界面設(shè)計(jì)窗口.按照下面的操作提示，在窗體上添加2個(gè)標(biāo)簽（Label）對(duì)象，2個(gè)命令按鈕（Command）對(duì)象，2個(gè)文本框（TextBox）對(duì)象如下圖所示。1 / 3各個(gè)控件對(duì)象的主要屬性可參見類對(duì)象名屬性名屬性值FormForm1Caption倒序輸出LabelLabel1Caption請(qǐng)輸入一個(gè)4位正整數(shù)Label2Caption逆序數(shù)為CommandButtonCommand1Caption清除Command2Caption退出TextBoxText1Text（空白）Text2Text（空白）完成好的界面如下圖所示3、代碼填空在Command1對(duì)象

3、的Click事件中輸入如下代碼：Private Sub Command1_Click()Dim a, b As String '定義字符串變量a，bDim n As Integer '定義字整型變量n，用來(lái)存放字符串的長(zhǎng)度a = Text1.Text '把文本框的值賦值給an = Len(Text1.Text) '求出文本框1中輸入字符串的長(zhǎng)度，并賦值給nFor i = n To 1 Step -1 '逆序求出字符串bb = b + Mid(a, i, 1)Next iText2.Text = b '把字符串b在文本框2中顯示End SubPri

4、vate Sub Command2_Click() '清空文本框1和文本框2的內(nèi)容Text1.Text = ""Text2.Text = ""End Sub4、運(yùn)行調(diào)試程序選擇菜單欄“運(yùn)行”“啟動(dòng)”命令，或按F5，運(yùn)行程序，檢查是否有錯(cuò)。如下圖所示5、保存程序在桌面上新建一個(gè)文件夾，以自己的名字命名。然后在vb中選擇菜單欄“文件”保存窗體文件（.frm）、工程文件（.vbp）、可執(zhí)行文件（.exe），文件名為“倒序輸出”，如下最后把做好的結(jié)果上交.3、 課堂小結(jié)Len(X)：計(jì)算字符串的長(zhǎng)度 例：Len(“ABC”)=3Mid(X,n,k)：取字符串X中第n個(gè)字符起長(zhǎng)度為k的子串 例：Mid(“abcd”,3,1)=”c”4、 布置作業(yè) 寫一個(gè)程序，要求輸入“大上?！?，輸出則為“海上大”【教學(xué)反思】本堂課的重