【正文】 窗口，編寫如下程序：Private Sub Button1_Click(ByVal sender As Object, ByVal e As ) Handles Dim r1 As Double Dim r2 As Double Dim r As Double r1 = r2 = r = r1 * r2 / (r1 + r2) = rEnd Sub改進的方法有兩種，第一種就是事先將RRR聲明為Double型。因為如不事先聲明，VB會將R1，R2視為字符類型變量。 設置對象屬性編寫順序結(jié)構(gòu)程序：1）[提問]：前面我們學習了6個常用函數(shù)。情感目標：增強學生的審美能力，提高學生的協(xié)作學習興趣。；掌握賦值語句，并能正確運用到所編寫的程序中，特別是如何使用賦值語句交換兩個變量的值。編寫程序：Private Sub Button1_Click(ByVal sender As Object, ByVal e As ) Handles Dim a As Double Dim b As Double Dim t As Double a = b = t = a a = b b = t = a = bEnd Sub對于a=b，是將b的值傳遞給a,被改變的是a的值。第七課 賦值語句（二）課 題賦值語句探究學習執(zhí)教 課型實踐課教學目標認知目標：理解一般賦值語句與屬性賦語句的含義與作用。語句X值Y值T值X=5:Y=656（實驗與探究）在VB中運行如下程序：X=1y=xPrint x得到變量X的值為1（演示）X=1X=2(提問)執(zhí)行完兩條語句后，變量x中的值是多少？（討論）（討論）賦值語句中的賦值號兩邊的內(nèi)容的位置可以互換嗎？教學方法1．講解與討論2．實驗與探究教 學 程 序 設 計教師活動學生活動一、 情境導入（提問）前面我們探討了“解一元二次方程”的程序，請問程序中哪一條語句算出了方程的根？（演示）(討論)同學們是如何理解上面兩條語句的？二、 導入新課三、 新課講授賦值語句（講述）賦值語句有兩個功能：①運算算出右邊表達式的值；②賦值將右邊表達式的值賦給左邊的變量。能夠在程序中正確使用End和Rem語句。M+n小結(jié)學習本節(jié)課后，著重要掌握的有：掌握常用函數(shù)的使用方法。探究學習：根據(jù)下面的描述，在表格中填寫算術表達式。閱讀課本，并回答問題：表達式可分為：算術表達式、字符表達式、關系表達式、邏輯表達式。５、表達式［提問］：表達式的分類？Val(x)將字符型數(shù)據(jù)轉(zhuǎn)換為數(shù)值數(shù)據(jù)Int(x)取不大于X的最大整數(shù)引導學生進行探究學習。引導學生閱讀幾個常用函數(shù)的功能。變量名的命名原則：變量名必須以字母或漢字開頭，由字母、數(shù)字、漢字及下劃線組成。[提問]：字符型常量有什么特點？閱讀課本，并回答問題：常量是指在程序運行過程中保持不變的量。常量[提問]：常量的定義是什么？與+的不同用法。情感目標在學習編寫VB程序的過程中，建立模塊結(jié)構(gòu)化編程思想，養(yǎng)成正確的程序設計習慣。1）進行數(shù)據(jù)輸入的對象有：text1 text2 text3 進行數(shù)據(jù)輸出的對象有：text4 text52)3個系數(shù)分別賦給了a,b,c三個變量。教 學 程 序 設 計在兩個命令按鈕對象中分別輸入相應的程序段。 輸出：方程的二個解。 計算：方程的二個解。了解實踐任務。 順序結(jié)構(gòu)。教 學 程 序 設 計教師活動學生活動 “Label1”對象中存放了哪些程序段？這些程序段分別通過什么事件進行激發(fā)？ 對象的三要素是什么？Private Sub Form1_Click(ByVal sender As Object, ByVal e As ) Handles EndEnd Sub對象名事件事件過程功能Form1Click關閉窗口Label1MouseMove顯示“別碰我”Label1Click畫圓Label1DblClick清除圓Image1mousemove顯示“對象編程”學生進入代碼窗口，先選擇對象與事件，然后輸入對應的程序段。引導學生輸入程序。4）雙擊文字“別碰我”，畫出的圓消失。教 教學 學方 手法 段1．啟發(fā)式教學法2．探索學習法3．多媒體輔助教學4．任務驅(qū)動式教學教 學 程 序 設 計教師活動學生活動技能目標：掌握用面向?qū)ο蟪绦蛟O計的基本思想編寫程序。3．對象的事件，事件過程，掌握幾個常用的事件。 添加事件處理程序：Private Sub Button1_Click(ByVal sender As Object, ByVal e As ) Handles = 面向?qū)ο蟪绦蛟O計End Sub 設置各對象屬性，如下表所示：對象名屬性屬性值Form1Caption顯示文字Form1BackColorGreenLabel1font隸書，小一Command1caption開始 引導學生探究學習因此我們在書寫程序時，必須指明該程序通過哪個對象的哪種事件來激發(fā)。一學生演示。Caption決定對象中顯示的文字Enabled決定是否允許對對象操作Visible決定程序運行時對象是否可見Height決定對象的高Width決定對象的寬Left/Top決定對象在屏幕或窗體內(nèi)的位置ForeColor決定對象的前景色（即正文顏色）BackColor決定對象的背景顏色Font決定顯示文字的字體、字號、字型等。學生閱讀課本，并回答：對象的三要素：屬性、事件、方法。教 教學 學方 手法 段1．啟發(fā)式教學法2．探索學習法3．網(wǎng)絡廣播交互式4．多媒體輔助教學教 學 程 序 設 計教師活動學生活動技能目標：4．掌握面向?qū)ο缶幊痰幕痉椒?。[結(jié)論]：用自然語言描述算法，有時會產(chǎn)生歧義。[討論]：分組進行討論、交流。[結(jié)論]查找可以有多種方法：[提出問題]：有1000位同學的姓名與電話號碼的通訊表,現(xiàn)要求編寫程序:當輸入某同學的姓名,計算機立刻顯示該同學的電話號碼。二、 算法的描述：[舉例講解]：求底邊a為3厘米。 程序設計的一般過程是怎樣的？情感目標：5．培養(yǎng)學生愛科學，愛祖國的思想情感。第一課 算法課 題算法執(zhí)教 課型新授課教學目 標認知目標：1．了解程序設計的一般過程。4．培養(yǎng)學生分析問題、解決問題的能力。教 學方 手法 段1．啟發(fā)式教學法2．探索學習法3．多媒體輔助教學教 學 程 序 設 計教師活動學生活動媒體應用設計意圖一、 新課導入請學生閱讀課本，并回答下面問題：算法：用來解決問題的方法和步驟。請學生設計算法，用自然語言描述。[引出]：用流程圖描述算法。[探究]：對于“張三對李四說他的孩子考上了大學”這句話，思考：誰的兒子考上了大學。3．認識對象的事件，事件過程，掌握幾個常用的事件。教學難點：常用事件及事件過程。1）對象的三要素[提問]對象的三要素是什么？學生回顧并回答：Form1Command1Command2Label1Label2Text1Text2總共7個對象。[提問]請問對象的10個常用屬性是什么？并說它們的作用。學生閱讀課本，并回答：屬性屬性說明Name對象的名稱，用于程序代碼中引用該對象。