《信息技術(shù)前沿知識(shí)學(xué)習(xí)與應(yīng)用-基于對(duì)象的編程.ppt》由會(huì)員分享，可在線閱讀，更多相關(guān)《信息技術(shù)前沿知識(shí)學(xué)習(xí)與應(yīng)用-基于對(duì)象的編程.ppt（72頁珍藏版）》請(qǐng)?jiān)谘b配圖網(wǎng)上搜索。

1、信息技術(shù)前沿知識(shí)學(xué)習(xí)與應(yīng)用,初中信息技術(shù)置換脫產(chǎn)研修班課程,面向?qū)ο蟮某绦蛟O(shè)計(jì)（Visual Basic）,播放,播放,播放,計(jì)算機(jī)程序設(shè)計(jì),計(jì)算機(jī)程序設(shè)計(jì),計(jì)算機(jī)程序設(shè)計(jì),計(jì)算機(jī)程序=算法+數(shù)據(jù)結(jié)構(gòu)（瑞士計(jì)算機(jī)學(xué)家沃思） 一個(gè)程序應(yīng)該包括以下兩個(gè)方面內(nèi)容： 1、對(duì)數(shù)據(jù)的描述：在程序中指定數(shù)據(jù)的類型和數(shù)據(jù)的組織形式，即數(shù)據(jù)結(jié)構(gòu)(Data Structure）。 2、對(duì)操作的描述：即操作步驟，也就是算法（Algorithm)。,計(jì)算機(jī)程序設(shè)計(jì),一、初中計(jì)算機(jī)編程教學(xué)目標(biāo) 基礎(chǔ)目標(biāo)： 知識(shí)與技能目標(biāo)： 1、理解算法的概念，能初步利用算法解決簡(jiǎn)單的問題。 2、能利用算法的表示方法來描述算法。 3、了

2、解計(jì)算機(jī)程序設(shè)計(jì)的基本思想。 4、熟悉VB6.0或TC編程環(huán)境。,計(jì)算機(jī)程序設(shè)計(jì),一、初中計(jì)算機(jī)編程教學(xué)目標(biāo) 基礎(chǔ)目標(biāo)： 過程與方法目標(biāo)： 1、體驗(yàn)算法解決問題的過程，掌握利用算法描述問題解決的基本方法。 2、體驗(yàn)利用計(jì)算機(jī)語言程序解決問題的基本方法和過程。,計(jì)算機(jī)程序設(shè)計(jì),一、初中計(jì)算機(jī)編程教學(xué)目標(biāo) 基礎(chǔ)目標(biāo)： 情感與態(tài)度目標(biāo)： 鍛煉利用算法解決問題的思維方式，激發(fā)學(xué)生對(duì)計(jì)算機(jī)編程解決問題的學(xué)習(xí)欲望。,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 算法：解決問題的方法、步驟、策略，是程序設(shè)計(jì)的靈魂。設(shè)計(jì)算法的目的是為了解決問題。算法是初中計(jì)算機(jī)程序教學(xué)的重點(diǎn)。,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 現(xiàn)實(shí)

3、問題1：利用一個(gè)空瓶將一瓶牛奶和一瓶清水互換。 數(shù)學(xué)抽象：將a和b兩個(gè)數(shù)互換。 算法描述（自然語言法) : s1: 將a放到temp中； s2: 將b放到a中； s3: 將temp放到b中；,算法實(shí)現(xiàn)(C語言): temp=a; a=b; b=temp;,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 現(xiàn)實(shí)問題2：將甲、乙、丙三人按個(gè)子高低排列。 數(shù)學(xué)抽象：將a、b和c三個(gè)數(shù)按從大到小排序。 算法描述（自然語言法) s1: 比較a和b，將較大的數(shù)放到a中，較小的數(shù)放到b中； s2: 比較a和c，將較大的數(shù)放到a中，較小的數(shù)放到c中； s3: 比較b和c，將較大的數(shù)放到b中，較小的數(shù)放到c中；,計(jì)算機(jī)程序設(shè)

4、計(jì),二、程序的靈魂算法 現(xiàn)實(shí)問題2：將甲、乙、丙三人按個(gè)子高低排列。 數(shù)學(xué)抽象：將a、b和c三個(gè)數(shù)按從大到小排序。 算法實(shí)現(xiàn)（C語言) if (ab) temp=a;a=b;b=temp; if (ac) temp=a;a=c;c=temp; if (bc) temp=b;b=c;c=temp;,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 現(xiàn)實(shí)問題3（提高）：將五個(gè)人按個(gè)子高低排列。 數(shù)學(xué)抽象：將五個(gè)數(shù)按從小到大排序。 算法描述1（自然語言法) ：選擇排序,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 數(shù)組：a0 a1 a2 a3 a4 S1:將a0-a4這5個(gè)數(shù)中最小的數(shù)與a0交換； S2:將a1-a4這4個(gè)

5、數(shù)中最小的數(shù)與a1交換； S3:將a2-a4這3個(gè)數(shù)中最小的數(shù)與a2交換； S4:將a3-a4這2個(gè)數(shù)中最小的數(shù)與a3交換；,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 現(xiàn)實(shí)問題3（提高）：將五個(gè)人按個(gè)子高低排列。 數(shù)學(xué)抽象：將五個(gè)數(shù)按從小到大排序。 算法描述2（自然語言法) ：冒泡排序,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 冒泡排序：依次比較相鄰的兩個(gè)數(shù)，小數(shù)放前面，大數(shù)放后面。 初始序列：11 5 8 9 4 1、5 11 8 9 4 2、5 8 11 9 4 3、5 8 9 11 4 4、5 8 9 4 11 （第一輪比較結(jié)束，保證最大數(shù)放到了隊(duì)尾）,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 思考（初二

6、信息技術(shù)競(jìng)賽算法題）： （假幣問題）設(shè)有80枚硬幣，其中有一枚為假幣。現(xiàn)有天平一臺(tái)，最少稱重幾次能將假幣辨別出來。,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 思考（初二信息技術(shù)競(jìng)賽算法題）： S1:將80枚硬幣分為三堆（27 27 26），任選兩堆用天平稱重，判斷假幣堆； S2:將假幣堆繼續(xù)分為三堆，假設(shè)假幣堆有27枚，則分為9,9,9三堆，繼續(xù)用天平稱重任意兩堆，判斷假幣堆； S3:將假幣堆分為三堆（3 3 3），任選兩堆稱重，判斷假幣堆； S4:將假幣堆分為三堆（1 1 1），任選兩堆稱重，最終判斷假幣。,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 算法的特性： 1、有窮性 2、確定性 3、有零個(gè)或多個(gè)

7、輸入 4、有一個(gè)或多個(gè)輸出 5、有效性,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 算法表示： 1、自然語言表示法：用日常使用的語言表示。通俗易懂，但文字冗長(zhǎng)，容易出現(xiàn)歧義性。 2、流程圖表示法: 用簡(jiǎn)單的圖形表示各種操作，直觀形象，易于理解。,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 算法表示：,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 算法表示：5！ S1: t=1 S2: i=2 S3: tit S4: i+1i S5: 如果i不大于5，返回s3繼續(xù)執(zhí)行； 否則結(jié)束。最后得到t的值為5!的值,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 算法的三種基本結(jié)構(gòu)： 1966年，Bohra和Jacopini提出了以下三種基本

8、結(jié)構(gòu)，用這三種基本結(jié)構(gòu)能夠作為表示一個(gè)良好算法的基本單元。 1、順序結(jié)構(gòu)：執(zhí)行完A指定操作必然執(zhí)行B指定操作。 c=a; a=b; b=c;,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 算法的三種基本結(jié)構(gòu)： 2、選擇結(jié)構(gòu)：必然包括一個(gè)判斷框，根據(jù)指定條件p是否成立從而選擇執(zhí)行A框還是B框。 if (ab) c=a; else c=b;,是,否,計(jì)算機(jī)程序設(shè)計(jì),二、程序的靈魂算法 算法的三種基本結(jié)構(gòu)： 3、循環(huán)結(jié)構(gòu)：當(dāng)給定條件p1成立時(shí)，執(zhí)行A框操作，執(zhí)行完A后，再判斷條件p1是否成立，如果仍然成立，再執(zhí)行A框，如此反復(fù)執(zhí)行A框，直到某一次p1條件不成立為止。 s=0; i=0; while (i5)

9、s=s+i;,p1,A,計(jì)算機(jī)程序設(shè)計(jì),三、計(jì)算機(jī)編程語言 程序=數(shù)據(jù)結(jié)構(gòu)+算法+語言工具和環(huán)境+程序設(shè)計(jì)方法 算法是靈魂，數(shù)據(jù)結(jié)構(gòu)是加工對(duì)象，語言是工具，編程需要采用合適的方法。,計(jì)算機(jī)程序設(shè)計(jì),三、計(jì)算機(jī)編程語言編程語言的發(fā)展 第一代編程語言：機(jī)器語言（采用二進(jìn)制表示指令） 例：計(jì)算1+1=？ 機(jī)器語言表示：0001 1010 0001,1,+,1,計(jì)算機(jī)程序設(shè)計(jì),三、計(jì)算機(jī)編程語言編程語言的發(fā)展 第二代編程語言：匯編語言（采用助記符表示指令） 例：計(jì)算1+1=？ 匯編語言表示： mov a , 1 mov b , 2 add a , b,計(jì)算機(jī)程序設(shè)計(jì),三、計(jì)算機(jī)編程語言編程語言的發(fā)展

10、第三代編程語言：高級(jí)語言（采用數(shù)學(xué)語言表示指令） 例：計(jì)算1+1=？ 高級(jí)語言表示： a=1+1,計(jì)算機(jī)程序設(shè)計(jì),三、計(jì)算機(jī)編程語言編程語言的發(fā)展 初高中使用的計(jì)算機(jī)編程教學(xué)語言：VB、C、Pascal等 Windows應(yīng)用程序開發(fā)語言：Java、VC、 C# 、 C 、 VB等,計(jì)算機(jī)程序設(shè)計(jì),三、計(jì)算機(jī)編程語言VB程序設(shè)計(jì) VB編程語言（Visual Basic）：由微軟公司開發(fā)的可視化Basic編程語言。 特點(diǎn)：1、圖像界面（GUI），可視化編程。 2、基于對(duì)象的控件：屬性、方法、事件。 3、語法繼承Basic，相對(duì)簡(jiǎn)單。,計(jì)算機(jī)程序設(shè)計(jì),工具箱,控件屬性窗口,窗體設(shè)計(jì)窗口,計(jì)算機(jī)程序設(shè)

11、計(jì),三、計(jì)算機(jī)編程語言VB程序設(shè)計(jì) 引例1：?jiǎn)螕舭粹o改變文本框字體顏色。 拖動(dòng)一個(gè)文本框(text1)和一個(gè)按鈕(button1)放置在窗體form1中，雙擊按鈕控件，編程如下： Private Sub Command1_Click() Text1.BackColor = vbRed Text1.ForeColor = vbGreen End Sub,計(jì)算機(jī)程序設(shè)計(jì),對(duì)象：現(xiàn)實(shí)世界中無所不在、各種各樣的實(shí)體?？梢允蔷唧w的事物，也可以是抽象的事物。如一個(gè)人、一輛汽車、一張桌子、一臺(tái)計(jì)算機(jī)等都是一個(gè)對(duì)象；一份報(bào)表、一份賬單也是一個(gè)對(duì)象。 每個(gè)對(duì)象都有自己的特征、行為和發(fā)生在該對(duì)象上的一切活動(dòng)。如以

12、某個(gè)“人”作為對(duì)象，該對(duì)象具有身高、體重、視力和聽力等特征，具有起立、行走、說話等行為，以及外界作用在“人”對(duì)象上的各種活動(dòng)，如下雨、上課鈴等。 面向?qū)ο蟪绦蛟O(shè)計(jì)中把對(duì)象的特征稱為屬性，對(duì)象的行為稱為方法，對(duì)對(duì)象的活動(dòng)稱為事件，構(gòu)成了對(duì)象的三要素。,計(jì)算機(jī)程序設(shè)計(jì),類：現(xiàn)實(shí)世界中，具有相似性質(zhì)，執(zhí)行相同操作的對(duì)象，稱為同一類對(duì)象。所以類是對(duì)同一種對(duì)象的集合和抽象，如人類是“人”的抽象。類是創(chuàng)建對(duì)象實(shí)例的模版，對(duì)象則是類的一個(gè)實(shí)例。如一個(gè)不同的“人”是人類的實(shí)例。 VB中，工具箱上的可視圖標(biāo)是由VB系統(tǒng)設(shè)計(jì)的標(biāo)準(zhǔn)控件類。例如命令按鈕類、文本框類。通過將控件類實(shí)例化，可以得到真正的對(duì)象，也就是在窗

13、體上畫一個(gè)控件時(shí)，就將類實(shí)例化為對(duì)象，即創(chuàng)建了一個(gè)控件對(duì)象，簡(jiǎn)稱控件。,計(jì)算機(jī)程序設(shè)計(jì),對(duì)象的屬性、事件和方法 實(shí)例化的對(duì)象具有自己的屬性、事件和方法。 1、屬性：描述和反映對(duì)象特征的參數(shù)。 如控件名稱（Name）、標(biāo)題（Caption）、文本（Text）、顏色（color ）、 字體（FontName)、是否可見（Visible）等。不同的對(duì)象具有各自不同的屬性。 可以通過兩種方式設(shè)置對(duì)象的屬性： 1、在設(shè)計(jì)階段利用屬性窗口直接設(shè)置對(duì)象的屬性值。 2、在程序運(yùn)行階段通過語句實(shí)現(xiàn)，格式為：對(duì)象名.屬性名=屬性值。,計(jì)算機(jī)程序設(shè)計(jì),2、事件、事件過程 （1）事件：對(duì)對(duì)象而言，事件是發(fā)生在該對(duì)象上

14、的行為。VB系統(tǒng)中已經(jīng)為每個(gè)對(duì)象預(yù)先定義好了一系列的事件。例如，單擊（Click）、雙擊（dblClick)、鍵盤按下（KeyPress）、改變（change）等。 （2）事件過程：當(dāng)在對(duì)象上發(fā)生了事件后，應(yīng)用程序就要處理該事件，處理的步驟就是事件過程。,計(jì)算機(jī)程序設(shè)計(jì),2、事件、事件過程 如在教師對(duì)象上發(fā)生了響鈴事件，對(duì)于教師對(duì)象就要編寫授課的事件過程。 Sub 教師_響鈴(參數(shù)列表) 打開電腦 打開電子講稿 指向某一章節(jié) 講解內(nèi)容 提出問題 。 End Sub,計(jì)算機(jī)程序設(shè)計(jì),2、事件、事件過程 如在學(xué)生對(duì)象上發(fā)生了響鈴事件，對(duì)于學(xué)生對(duì)象就要編寫聽課的事件過程。 Sub 學(xué)生_響鈴(參數(shù)列

15、表) 打開筆記本 拿起筆 邊聽邊做筆記 回答問題 。 End Sub,計(jì)算機(jī)程序設(shè)計(jì),2、事件、事件過程 VB中的事件過程形式如下： Sub 對(duì)象名_事件名(【參數(shù)列表】） 事件過程代碼 End Sub 對(duì)象名是控件的Name屬性。 事件名是VB預(yù)先定義好的賦予該對(duì)象的事件。 參數(shù)列表：一般無，有些事件都有參數(shù) 事件處理代碼：用來指定處理該事件的程序。,計(jì)算機(jī)程序設(shè)計(jì),3、方法是附屬于對(duì)象的行為和動(dòng)作。方法是面向?qū)ο蟮?，所以在調(diào)用方法的時(shí)候一定要指定對(duì)象。對(duì)象方法的調(diào)用格式為： 對(duì)象.方法名參數(shù)列表 例如: text1.setfocus 調(diào)用系統(tǒng)定義的setfocus方法將使text1控件獲得

16、焦點(diǎn)。,計(jì)算機(jī)程序設(shè)計(jì),例2：編寫一個(gè)人民幣與美元兌換的程序。,計(jì)算機(jī)程序設(shè)計(jì),通過以上例子可知，建立一個(gè)應(yīng)用程序分為以下幾個(gè)步驟： 1、建立用戶界面的對(duì)象。 2、對(duì)象屬性的設(shè)置。 3、對(duì)象事件過程的編程。 4、運(yùn)行和調(diào)試程序。 5、保存和發(fā)布程序。,計(jì)算機(jī)程序設(shè)計(jì),VB的學(xué)習(xí)分為兩個(gè)方面： 1、程序設(shè)計(jì)的基本知識(shí) 數(shù)據(jù)類型；變量和常量；運(yùn)算符與表達(dá)式；控制結(jié)構(gòu)（順序、選擇、循環(huán)）；數(shù)組；過程與函數(shù) 2、用戶界面的設(shè)計(jì)（控件的屬性、事件與方法） 常用的控件；通用對(duì)話框；菜單設(shè)計(jì)；鼠標(biāo)和鍵盤；圖形操作；數(shù)據(jù)文件；數(shù)據(jù)庫操作等,計(jì)算機(jī)程序設(shè)計(jì),推薦學(xué)習(xí)教材： Visual Basic 程序設(shè)計(jì)教程

17、（第三版） 龔沛曾、楊志強(qiáng)、陸慰民 編 高等教育出版社,計(jì)算機(jī)程序設(shè)計(jì),實(shí)驗(yàn)：?jiǎn)?dòng)VB6.0，創(chuàng)建一個(gè)”標(biāo)準(zhǔn)EXE“類型的應(yīng)用程序，要求：在屏幕上顯示”歡迎學(xué)習(xí)Visual Basic”，并在“請(qǐng)輸入你的姓名”標(biāo)簽后的文本框Text1中輸入姓名；單擊”你輸入的姓名是”按鈕，在label3標(biāo)簽顯示在文本框Text1輸入的姓名。 程序效果如下圖所示。程序以Sy1-1.frm和Sy1-1.vbp保存。,計(jì)算機(jī)程序設(shè)計(jì),程序設(shè)計(jì)基礎(chǔ),一、常用數(shù)據(jù)類型 整數(shù)類型（ Integer 和 Long）是沒有小數(shù)點(diǎn)和指數(shù)符號(hào)的數(shù)。 Integer類型最大取值:32767 Long類型最大取值: 231-1,程序

18、設(shè)計(jì)基礎(chǔ),一、常用數(shù)據(jù)類型 浮點(diǎn)數(shù)，又稱為實(shí)數(shù)，分為單精度和雙精度浮點(diǎn)數(shù)，分別以Single和Double表示。,程序設(shè)計(jì)基礎(chǔ),一、常用數(shù)據(jù)類型 字符型（String ，或稱為字符串）存放字符型數(shù)據(jù)。字符可以包括所有西文字符和漢字，首尾用”括起。例如”12345” “abcd123” “程序設(shè)計(jì)”等。 注意:” 表示空字符串，” “表示有一個(gè)空格的字符串。,程序設(shè)計(jì)基礎(chǔ),一、常用數(shù)據(jù)類型 邏輯型（Boolean），又稱為布爾型，只有true和false兩個(gè)值。 表達(dá)式 21 的值為 true 表達(dá)式 1+46 的值為 false,程序設(shè)計(jì)基礎(chǔ),二、變量 計(jì)算機(jī)在處理數(shù)據(jù)時(shí)，必須將其裝入內(nèi)存。高

19、級(jí)語言中，需要將存放數(shù)據(jù)的內(nèi)存單元命名，通過內(nèi)存單元名稱來訪問其中數(shù)據(jù)。被命名的內(nèi)存單元稱為變量，這個(gè)內(nèi)存單元名就是變量名。 例如，已知圓半徑r，求圓面積。 s=3.14*r*r 其中r,s為雙精度型變量。,r,s,變量名,變量值,程序設(shè)計(jì)基礎(chǔ),變量的命名：使用變量前，一般必須先聲明變量名及其類型，以決定系統(tǒng)為該變量分配的存儲(chǔ)單元。規(guī)則為：Dim 變量名 As 類型 思考：編程求給定半徑的圓的面積。 Private Sub Command1_Click() Dim r As Integer Dim s As Double r = Val(Text1.Text) s = 3.14 * r * r

20、 Text2.Text = s End Sub,程序設(shè)計(jì)基礎(chǔ),三、VB控制結(jié)構(gòu) 1、順序結(jié)構(gòu) 賦值語句：賦值語句是任何程序設(shè)計(jì)語言中最基本的語句，形式如下： 變量名=表達(dá)式 其作用是：計(jì)算賦值號(hào)”=“右邊表達(dá)式的值，然后把計(jì)算結(jié)果賦給左邊的變量。 如： text1.text=“” y=3*x2+4*x+5,程序設(shè)計(jì)基礎(chǔ),三、VB控制結(jié)構(gòu) 2、選擇結(jié)構(gòu)：根據(jù)條件進(jìn)行判斷，從而選擇執(zhí)行不同的分支。 單分支If 條件語句：If.Then語句 IF Then 或 IF Then End If,程序設(shè)計(jì)基礎(chǔ),三、VB控制結(jié)構(gòu) 2、選擇結(jié)構(gòu)：根據(jù)條件進(jìn)行判斷，從而選擇執(zhí)行不同的分支。 雙分支If 條件語句

21、：If.Then.Else語句 IF Then Else 或 IF Then Else End If,程序設(shè)計(jì)基礎(chǔ),例：給出2個(gè)數(shù)，顯示最大的一個(gè)數(shù)。,Private Sub Command1_Click() Dim a As Integer Dim b As Integer a = Val(Text1.Text) b = Val(Text2.Text) If (a b) Then Text3.Text = a Else Text3.Text = b End If End Sub,程序設(shè)計(jì)基礎(chǔ),三、VB控制結(jié)構(gòu) 2、循環(huán)結(jié)構(gòu)：根據(jù)規(guī)定的條件，重復(fù)執(zhí)行某些操作。 For循環(huán)語句：,For 循環(huán)控

22、制變量 = 初值 To 終值 Step 步長(zhǎng) 循環(huán)體 Next 循環(huán)控制變量 For i=1 to 100 step 1 sum=sum+i Next i,循環(huán)變量=初值,循環(huán)變量=終值,是,循環(huán)體,循環(huán)變量=循環(huán)變量+步長(zhǎng),Next的下一條語句,VB常用控件介紹,一、定時(shí)器控件 定時(shí)器（Timer）以一定的時(shí)間間隔產(chǎn)生Timer事件從而執(zhí)行相應(yīng)的事件過程。 （1）定時(shí)器控件的主要屬性 A、Enabled屬性：當(dāng)Enabled屬性為false時(shí)，定時(shí)器不產(chǎn)生Timer事件。默認(rèn)值為True。當(dāng)程序設(shè)計(jì)時(shí)，可以很靈活的啟用或停用Timer控件。 B、Interval屬性：Interval屬性決定

23、兩個(gè)Timer事件之間的時(shí)間間隔。其值以ms(0.001s）為單位，介于0-64767ms之間，所以最大時(shí)間間隔為1min。默認(rèn)值為0，如果為0，不產(chǎn)生Timer事件。 定時(shí)器產(chǎn)生Timer事件的兩個(gè)前提是：Enabled屬性為True；Interval屬性為非0。,VB常用控件介紹,一、定時(shí)器控件 定時(shí)器（Timer）以一定的時(shí)間間隔產(chǎn)生Timer事件從而執(zhí)行相應(yīng)的事件過程。 （2）定時(shí)器控件事件 定時(shí)器控件只有一個(gè)Timer事件。 例：設(shè)計(jì)一個(gè)倒計(jì)時(shí)程序。首先在文本框(Text1)中設(shè)置定時(shí)時(shí)間（以分為單位），然后選擇”開始“(Command1)按鈕開始倒計(jì)時(shí)。倒計(jì)時(shí)時(shí)間在標(biāo)簽Label1

24、上顯示，時(shí)間到了彈出消息框”時(shí)間到了！“.定時(shí)器名為Timer1，設(shè)置Enabled屬性為false，Interval屬性為1000。,VB常用控件介紹,一、定時(shí)器控件,Dim t As Integer Private Sub Command1_Click() t = 60 * Val(Text1.Text) Timer1.Enabled = True End Sub Private Sub Timer1_Timer() Dim m As Integer Dim s As Integer t = t - 1 m = Int(t / 60) /取整 s = t Mod 60 /求余 Label1

25、.Caption = m & 分 & s & 秒 If (t = 0) Then Timer1.Enabled = False MsgBox (時(shí)間到!) End If End Sub,VB常用控件介紹,一、文本框控件(TextBox) 文本框控件是一個(gè)文本編輯區(qū)域，用戶可以在該區(qū)域輸入、編輯、修改和顯示文本內(nèi)容。 1、重要屬性 例：創(chuàng)建一個(gè)簡(jiǎn)單的文本編輯器，建立兩個(gè)文本框，有關(guān)屬性如下所示，Text1的Text屬性值是”VB程序設(shè)計(jì)教程（第三版）“。,VB常用控件介紹,例：創(chuàng)建一個(gè)簡(jiǎn)單的文本編輯器，建立兩個(gè)文本框，有關(guān)屬性如下所示，Text1的Text屬性值是”VB程序設(shè)計(jì)教程（第三版）“。

26、 Form窗體的Click事件過程代碼如下： Private Sub Form_Click() Text1.SelStart = 0 Text1.SelLength = 8 Text2.Text = Text1.SelText End Sub 若要對(duì)任意選定文本進(jìn)行復(fù)制，只要將事件過程改為： Private Sub Form_Click() Text2.Text = Text1.SelText End Sub 選定復(fù)制文本后，單擊窗體即可。,VB常用控件介紹,一、文本框控件(TextBox) 文本框控件是一個(gè)文本編輯區(qū)域，用戶可以在該區(qū)域輸入、編輯、修改和顯示文本內(nèi)容。 2、事件 文本框所能響

27、應(yīng)的時(shí)間中，Change、KeyPress、LostFocus和GetFocus是最主要事件。 3、方法 文本框最常用的方法是SetFocus，該方法將光標(biāo)移動(dòng)到指定的文本框中。當(dāng)在窗體上建立了多個(gè)文本框后，可以用該方法將光標(biāo)置于所需要的文本框上。形式如下：【對(duì)象】.SetFocus,VB常用控件介紹,一、文本框控件(TextBox) 2、事件 文本框所能響應(yīng)的時(shí)間中，Change、KeyPress、LostFocus和GetFocus是最主要事件。 Change事件：當(dāng)用戶輸入新內(nèi)容或?qū)ext屬性設(shè)置新值，從而改變文本框的Text屬性時(shí)會(huì)引發(fā)該事件。當(dāng)文本框中輸入一個(gè)字符時(shí)，就會(huì)引發(fā)一次C

28、hange事件。例如，用戶輸入Hello一詞時(shí)，就會(huì)觸發(fā)5次Change事件。建議一般盡量少用該事件。,VB常用控件介紹,一、文本框控件(TextBox) 2、事件 文本框所能響應(yīng)的時(shí)間中，Change、KeyPress、LostFocus和GetFocus是最主要事件。 KeyPress事件：當(dāng)用戶按下并且釋放鍵盤上的一個(gè)ANSI鍵時(shí)，就會(huì)觸發(fā)焦點(diǎn)所在文本框控件的KeyPress事件，該事件返回一個(gè)KeyAscii參數(shù)。例如，當(dāng)用戶輸入字符”a”，KeyAscii的返回值為97,通過Chr(KeyAscii)可以將ASCII碼轉(zhuǎn)換為字符”a”。 每輸入一個(gè)字符就觸發(fā)一次該事件。事件中最常用的

29、是判斷輸入是否為回車符(KeyAscii的值為13），它通常表示文本結(jié)束。,VB常用控件介紹,一、文本框控件(TextBox) 2、事件 文本框所能響應(yīng)的時(shí)間中，Change、KeyPress、LostFocus和GetFocus是最主要事件。 LostFocus事件：此事件是在一個(gè)對(duì)象失去焦點(diǎn)時(shí)觸發(fā)的，焦點(diǎn)的丟失或者是由于制表鍵(Tab)的移動(dòng)或者單擊另一個(gè)對(duì)象操作的結(jié)果。 LostFocus事件過程主要用來對(duì)數(shù)據(jù)更新進(jìn)行驗(yàn)證和確認(rèn)。,VB常用控件介紹,一、文本框控件(TextBox) 2、事件 文本框所能響應(yīng)的時(shí)間中，Change、KeyPress、LostFocus和GetFocus是最

30、主要事件。 GotFocus事件：GotFocus事件與LostFocus事件相反，表示在一個(gè)對(duì)象獲得焦點(diǎn)時(shí)觸發(fā)。,VB常用控件介紹,一、文本框控件(TextBox) 文本框應(yīng)用：利用文本框?qū)崿F(xiàn)簡(jiǎn)單的兩數(shù)相加運(yùn)算。要求文本框能夠?qū)斎氲臄?shù)進(jìn)行合法性判斷。 分析：文本框數(shù)據(jù)輸入結(jié)束可以通過按回車鍵或Tab鍵表示，當(dāng)然觸發(fā)的事件也不同。按回車鍵，焦點(diǎn)沒有離開，通過KeyPress事件判斷；按Tab鍵，焦點(diǎn)離開控件，通過LostFocus事件來判斷。 判斷輸入是否為數(shù)字字符，由IsNumeric函數(shù)來實(shí)現(xiàn)，返回值為True表示是數(shù)字，否則，表示有非數(shù)字字符。 本例有三個(gè)文本框，分別用來存放兩個(gè)加數(shù)和結(jié)果，兩個(gè)標(biāo)簽，表示”+“和”=“。,VB常用控件介紹,一、文本框控件(TextBox) 文本框應(yīng)用：利用文本框?qū)崿F(xiàn)簡(jiǎn)單的兩數(shù)相加運(yùn)算。要求文本框能夠?qū)斎氲臄?shù)進(jìn)行合法性判斷。,VB常用控件介紹,一、文本框控件(TextBox),