[醫(yī)學(xué)]vb課件——第6章-wenkub.com
2024-10-15 22:45 本頁(yè)面
【正文】 信息加密有各種方法，最簡(jiǎn)單的加密方法是將每個(gè)字母平移一個(gè)位置 ( 稱為密鑰 )。 全局變量 Private Mb As string *10 39。 這時(shí)實(shí)參必須是同類型的變量名 (包括簡(jiǎn)單變量 、 數(shù)組名 、 結(jié)構(gòu)類型等 )，不能是常量 、 表達(dá)式 ? 不希望過(guò)程修改實(shí)參的值 ， 則應(yīng)選用 傳值方式 ， 減少 各過(guò)程間的關(guān)聯(lián) 。例 rocThe子過(guò)程 ? 形參沒(méi)有具體的值，只代表了參數(shù)的個(gè)數(shù)、位置、類型；只能是簡(jiǎn)單變量、數(shù)組名，不能是常量、數(shù)組元素、表達(dá)式 本章目錄 Sub ProcT he(B y V al s$, B y R ef Co un t %) ?? E nd S ub ?? C al l P roc T he( T ext1. T ext, n ) ?? 子過(guò)程的調(diào)用是一句獨(dú)立的調(diào)用語(yǔ)句，有兩種形式： Call 子過(guò)程名 [(實(shí)參列表 )] 子過(guò)程名 ([實(shí)參列表 ]) 用 Call關(guān)鍵字時(shí)，若有實(shí)參，則實(shí)參必須用圓括號(hào)括起，無(wú)實(shí)參圓括號(hào)省略 注意： 若實(shí)參要獲得子過(guò)程的返回值，則實(shí)參只能是變量 (與形參同類型的簡(jiǎn)單變量、數(shù)組名、結(jié)構(gòu)類型 )，不能是常量、表達(dá)式，也不能是控件名 本章目錄 例 分別編一統(tǒng)計(jì)字符串 S中定冠詞 The出現(xiàn)個(gè)數(shù)的 子過(guò)程和函數(shù)過(guò)程 ，并分別調(diào)用 處理方法：利用 InStr函數(shù)反復(fù)在 字符串 S找 The子串 分析： 對(duì)同一問(wèn)題定義兩種過(guò)程時(shí)，只要抓住函數(shù)過(guò)程和子過(guò)程的區(qū)別，即 函數(shù)名有一個(gè)值 、 子過(guò)程名無(wú)值的特點(diǎn) 。 z) End Sub 程序運(yùn)行流程 Function gcd( m%, n%) As Integer If m n Then t = m: m = n: n = t r=m mod n Do while r0 m = n： n = r: r=m mod n Loop gcd = n End Function ：Bo 最大公約數(shù)是 z)En Su本章目錄 調(diào)用演示 函數(shù)過(guò)程的調(diào)用 例 ，統(tǒng)計(jì)字符串中漢字的個(gè)數(shù)。 計(jì)算三角形面積的公式如下： a b d e f g S1 c S2 S3 )(21))()(( zyxczcycxcca r e a ???????本章目錄 引例 定義函數(shù)過(guò)程 area Function area(x!, y!, z!) As Single Dim c! c = 1 / 2 * (x + y + z) area = Sqr(c * (c x) * (c y) * (c z)) End Function Sub mand1_click() … 輸入若干個(gè)三角形邊長(zhǎng) S=area(a,b,c)+area(c,d,e)+area(e,f,g) Msgbox(“面積 =” amp。 S) End Sub 調(diào)用函數(shù)過(guò)程 本章目錄
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1