專升本VB程序設(shè)計(jì)教案_第1頁
專升本VB程序設(shè)計(jì)教案_第2頁
專升本VB程序設(shè)計(jì)教案_第3頁
專升本VB程序設(shè)計(jì)教案_第4頁
專升本VB程序設(shè)計(jì)教案_第5頁
已閱讀5頁,還剩2頁未讀 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡介

程序語言設(shè)計(jì)知識(shí)點(diǎn)總結(jié)順序程序設(shè)計(jì)1、數(shù)據(jù)的輸入VB數(shù)據(jù)輸入數(shù)據(jù)的兩種方式(inputbox和text)文本框(text)的輸入格式:a=Val(text1.text)text1.text的返回值為string類型,根據(jù)題目的要求,如果想通過text1得到一個(gè)字符串則不需要進(jìn)行轉(zhuǎn)換,如果想通過text1得到數(shù)值型數(shù)據(jù)則需要通過函數(shù)Val()進(jìn)行轉(zhuǎn)換。inputbox輸入數(shù)據(jù)的格式為:a=Val(inputbox(“提示信息”,”標(biāo)題欄”,默認(rèn)值))。同text,inputbox的返回值也為string類型。2、數(shù)據(jù)的輸出VB中數(shù)據(jù)輸出有兩種方式(print和msgbox)1.print輸出對(duì)象格式[對(duì)象名].print[表達(dá)式列表][,|;|] spc(n)函數(shù),表示插入由n個(gè)空格構(gòu)成的字符串。 tab(n)函數(shù),從左端開始右移動(dòng)n列 ;(分號(hào)),光標(biāo)定位在上一個(gè)顯示字符之后 ,(逗號(hào)),光標(biāo)定位在下個(gè)打印區(qū)域的開始位置,每個(gè)打印區(qū)域14列。2.msgbox函數(shù)格式:msgbox提示[,按鈕[+圖標(biāo)]][,標(biāo)題]例:1求圓的面積(公式S=ΠR2)R從鍵盤通過text實(shí)現(xiàn)輸入2、輸入球的半徑,求球的體積和表面積。3、輸入三角形的三邊長a,b,c,利用海倫公式求該三角形的面積。海倫公式,其中s=(a+b+c)/24、求ax2+bx+c=0方程的根,其中a,b,c由鍵盤輸入,設(shè)b2-4ac>0。求根公式為:則x1=p+qx2=p-q選擇結(jié)構(gòu)(分支結(jié)構(gòu))程序設(shè)計(jì)關(guān)系運(yùn)算符和關(guān)系表達(dá)式大于(>)小于(<)大于等于(>=)小于等于(<=)等于(=)不等于(<>)關(guān)系表達(dá)式的結(jié)果只有false和true,也就是關(guān)系只有成了和不成立的情況。a=10,b=5,c=1f=a>b>cf=?邏輯運(yùn)算符和邏輯表達(dá)式邏輯與(AND)邏輯或(OR)邏輯非(NOT)運(yùn)算規(guī)則以下實(shí)例中a=False,b=Trueaandba,b中有一個(gè)表達(dá)式的值為假,則整個(gè)表達(dá)式的結(jié)果即為假。f=a&&bf=?a=?b=?aorba,b中有一個(gè)表達(dá)式的值為真,則整個(gè)表達(dá)式的結(jié)果即為真nota表達(dá)式a的值為0,則整個(gè)表達(dá)式的結(jié)果為1,反之亦然If(條件)thenIf(條件)then 語句1Else 語句2Endif或者if(條件)then語句1else語句2基本形式if(條件)then語句1 Endif或者If(條件)then語句1條件成立,則執(zhí)行語句1;條件不成立則執(zhí)行語句2,不再執(zhí)行語句1嵌套形式if(條件)then語句1 elseif(條件)then語句2 elseif(條件)then語句3 Else…..語句n Endif Endif EndifEndif例1、輸入一個(gè)正整數(shù)判斷該數(shù)是奇數(shù)還是偶數(shù)并輸出判斷結(jié)果例2、編程求n的絕對(duì)值例3、將用戶輸入的小寫英文字母轉(zhuǎn)換為大寫,大寫轉(zhuǎn)換成小寫例4、輸入一個(gè)數(shù),判斷該數(shù)是否是是水仙花數(shù),并輸出判斷結(jié)果。所謂的水仙花,是指一個(gè)三位數(shù),它的每個(gè)位上的數(shù)字的三次冪之和等于它本身。例如:1^3+5^3+3^3=153就是水仙花數(shù)。例5、輸入三角形的三邊長a,b,c,判斷能否構(gòu)成三角形,如果能構(gòu)成三角形則利用海倫公式求該三角形的面積,否則輸出輸入錯(cuò)誤!海倫公式,其中s=(a+b+c)/2。循環(huán)結(jié)構(gòu)程序設(shè)計(jì)1.Do………loop循環(huán)使用形式:一般用于循環(huán)次數(shù)不確定的情況形式一Do 循環(huán)體loopwhile表達(dá)式dowhileDo 循環(huán)體loopwhile表達(dá)式 循環(huán)體loop當(dāng)表達(dá)式成立時(shí),執(zhí)行循環(huán)體中的語句,循環(huán)體執(zhí)行結(jié)束后再次判斷表達(dá)式,成立,繼續(xù)執(zhí)行;成立,停止,循環(huán)結(jié)束。形式二Do 循環(huán)體Do 循環(huán)體loopuntil表達(dá)式循環(huán)體Loop當(dāng)表達(dá)式不成立時(shí),執(zhí)行循環(huán)體中的語句,循環(huán)體執(zhí)行結(jié)束后再次判斷表達(dá)式,成立,繼續(xù)執(zhí)行;不成立,停止,循環(huán)結(jié)束。例1、例2、輸入一個(gè)數(shù),判斷該數(shù)是否為回文數(shù),并輸出判斷結(jié)果。所謂的回文數(shù),是指該數(shù)順讀和倒讀都一樣的數(shù)。例如,123321就是回文數(shù)。例3、編寫程序,計(jì)算表達(dá)式:,直到為止。例如x=2.5,則函數(shù)值為:12.182494。例4、編寫程序,計(jì)算表達(dá)式:,直到為止,并輸出計(jì)算結(jié)果。例5、編寫程序,計(jì)算表達(dá)式:,直到為止,并輸出計(jì)算結(jié)果。2.for循環(huán)for循環(huán)主用用于循環(huán)次數(shù)已知的情況下,使用較多的循環(huán)形式fori=1to10stepn循環(huán)體nexti1、。2、求1-100之間奇數(shù)的和。3、輸出100以內(nèi)能被5整除的偶數(shù)或奇數(shù)。4、。5、輸入一個(gè)正整數(shù),判斷該數(shù)是否為素?cái)?shù),并輸出判斷結(jié)果。6、輸出所有的水仙花數(shù)。7、求N!=1×2×3×4…×N。(一種循環(huán)算法,另外一種遞歸算法。)8、計(jì)算并輸出下列多項(xiàng)式的值:9、設(shè)計(jì)完成如下表達(dá)式計(jì)算的程序:10、編寫程序,其功能是:計(jì)算并輸出下列多項(xiàng)式的值:11、編寫程序,其功能是:計(jì)算并輸出12、編寫程序,其功能是:計(jì)算并輸出下列多項(xiàng)式的值:,并輸出結(jié)果。13、編寫程序,計(jì)算表達(dá)式:。14、編寫程序,計(jì)算表達(dá)式:數(shù)組1.一維數(shù)組的定義dima(10)asintegerdimb(10to20)asinteger2.數(shù)組的引用和賦值數(shù)組在引用時(shí)下標(biāo)從0開始如果在通用程序段中有optionbase1則默認(rèn)下標(biāo)從1開始賦值:1.逐一賦值a(1)=1a(2)=2…….2.循環(huán)賦值fori=1to10a(i)=val(text1.text)nexti循環(huán)輸出fori=1to10printa(i);nexti逆序:fori=10to1step-1printa(i);nexti數(shù)組的循環(huán)賦值相當(dāng)于對(duì)數(shù)組進(jìn)行循環(huán)遍歷例:1.編程實(shí)現(xiàn)將1,2,3,4,5,…..10,輸入到數(shù)組a[10]中,然后將這些數(shù)字逆序輸出2.從鍵盤上輸入10個(gè)數(shù),然后找出其中的最大值和最小值以及最大值和最小值的下標(biāo)3.二維數(shù)組dima(1to3,1to4)asinteger二維數(shù)組在理解上可以借助矩陣來理解,看成是由3行4列的矩陣構(gòu)成的。對(duì)于二維數(shù)組的操作可以借助循環(huán)的嵌套來實(shí)現(xiàn),利用一個(gè)循環(huán)來控制二維數(shù)組的行,另外一個(gè)循環(huán)來控制二維數(shù)組的列。fori=1to3 forj=1to4 a(i,j)=val(text1.text) nextjnexti例:1.從鍵盤輸入10個(gè)數(shù),將他們按照從大到小的順序輸出(冒泡和選擇去做) 2.編程求菲波拉基數(shù)列的前20項(xiàng)的和(1,1,2,3,5,8,……) 3.求3*4矩陣中元素的最大值和最小值 4.打印輸出九九乘法表字符串的處理常用函數(shù)(1)刪除空格函數(shù)Ltrim(s)刪除字符串s的前導(dǎo)空格Rtrim(s)刪除字符串s的后置空格Trim(s)刪除字符串s前后的空格(2)取子串函數(shù)left(s,n)從字符串s的左端取n個(gè)字符所組成的字符串right(s,n)從字符串s的右端取n個(gè)字符所組成的字符串Mid(s,n,m)返回字符串s從第n個(gè)字符開始的m個(gè)字符構(gòu)成的字符串(3)其他函數(shù)Len(s)返回字符串s的長度Lcase(s)將字符串s中的所有字符都轉(zhuǎn)換成小寫Ucase(s)將字符串s中的所有字符都轉(zhuǎn)換成大寫Instr(x,y)字符串查找函數(shù),返回字符串y在字符串x中第一次出現(xiàn)的位置。Rnd隨即函數(shù)返回[0,1)區(qū)間的雙精度隨機(jī)數(shù)。產(chǎn)生[n,m]區(qū)間正整數(shù)的表達(dá)式:Int(Rnd*(m-n+1)+n)例: 1.利用文本框text輸入一字符串,將改字符串逆序輸出。 2.用戶輸入的字符串,統(tǒng)計(jì)字符串中大寫字母的個(gè)數(shù),數(shù)字字符的個(gè)數(shù)六、子過程、函數(shù)過程和自定義函數(shù)1.子過程和函數(shù)過程的區(qū)別子過程和函數(shù)過程最明顯的區(qū)別就是返回值問題。子過程沒有返回值;函數(shù)過程有返回值2.自定義函數(shù)在寫自定義函數(shù)時(shí)首先要確定自定義函數(shù)實(shí)現(xiàn)的功能,是否有返回值?是否有參數(shù)傳遞?以及返回值類型等問題例:用自定義函數(shù)實(shí)現(xiàn)找出兩數(shù)的最大值PrivateSubForm_Click()Dima%,b%a=Val(InputBox("請(qǐng)輸入第一個(gè)數(shù)字"))b=Val(InputBox("請(qǐng)輸入第二個(gè)數(shù)字"))Printmax(a,b)EndSubFunctionmax(x%,y%)AsIntegermax=IIf(x>y,x,y)EndFunction例:1.自編函數(shù)實(shí)現(xiàn)判斷n是否為素?cái)?shù),并在主函數(shù)中測試PrivateSubCommand1_Click()n=Val(Text1.Text)p=isprime(CInt(n))Ifp=1ThenPrintn&"是素?cái)?shù)!"ElsePrintn&"不是素?cái)?shù)!"EndIfEndSubFunctionisprime(nAsInteger)f=1Fori=2Ton-1IfnModi=0Thenf=0ExitForEndIfNextiisprime=fEndFunction 2.求n的

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

評(píng)論

0/150

提交評(píng)論