寫(xiě)出程序運(yùn)行結(jié)果

寫(xiě)出程序運(yùn)行結(jié)果寫(xiě)出程序運(yùn)行結(jié)果1寫(xiě)出程序運(yùn)行結(jié)果A=3A=a+1B=aA=b+1Printa,bA=1B=2Printa,bA=a+bB=a+bPrinta,b寫(xiě)出程序運(yùn)行結(jié)果A=3A=12當(dāng)半徑改變時(shí)，應(yīng)該修改哪里？PrivateSubForm_Click()r=10s=3.14*r*rPrint"圓的半徑：";r;"圓的面積：";sEndsub當(dāng)半徑改變時(shí)，應(yīng)該修改哪里？PrivateSubFor3寫(xiě)出程序運(yùn)行結(jié)果4寫(xiě)出程序運(yùn)行結(jié)果5Inputbox函數(shù)格式：inputbox（“提示”，“對(duì)話(huà)框標(biāo)題”）參數(shù)1參數(shù)2賦值語(yǔ)句格式：

變量=表達(dá)式

r=10r=inputbox(“請(qǐng)輸入圓的半徑：”,”輸入圓半徑”)變量=函數(shù)的返回值Inputbox函數(shù)參數(shù)1參數(shù)2賦值語(yǔ)句格式：6函數(shù)用法什么是函數(shù)？函數(shù)是vb系統(tǒng)為了實(shí)現(xiàn)常用的功能預(yù)先編寫(xiě)好的小程序。

函數(shù)用法什么是函數(shù)？7VB函數(shù)Abs（x）

求x絕對(duì)值

Sqr（x）

求x算術(shù)平方根

Int（x）

取整函數(shù)，求不大于x的最大整數(shù)Rnd()

隨機(jī)函數(shù)，產(chǎn)生一個(gè)0～1之間的隨機(jī)數(shù)

VB函數(shù)8函數(shù)的使用方法用戶(hù)使用時(shí)只要按規(guī)定的格式寫(xiě)出函數(shù)，在程序中使用函數(shù)稱(chēng)為調(diào)用函數(shù)。調(diào)用后，一般都有個(gè)確定的函數(shù)值，即返回值。函數(shù)的使用方法用戶(hù)使用時(shí)只要按規(guī)定的格式寫(xiě)出函數(shù)，在程序中使9在程序中加入紅色字體的語(yǔ)句，運(yùn)行觀(guān)察結(jié)果PrivateSubForm_Click()r=inputbox(“請(qǐng)輸入圓的半徑：”,”輸入圓半徑”)s=3.14*r*rPrint"圓的半徑：";r;"圓的面積：";s

Circle(1000,1000),rEndsub你可以嘗試改動(dòng)程序中的數(shù)字，觀(guān)察結(jié)果發(fā)生什么變化通過(guò)觀(guān)察，你知道程序中的數(shù)字分別代表什么嗎？在程序中加入紅色字體的語(yǔ)句，運(yùn)行觀(guān)察結(jié)果PrivateS10Circle(1000,1000),500X軸Y軸10002000300040001000200030004000Circle(1000,1000),10000Circle(1000,1000),500X軸Y軸1000211畫(huà)圓語(yǔ)句的格式Circle(x坐標(biāo)，y坐標(biāo) )，半徑（2）circle（1000，1000），500（3）X=1000Y=1000R=500Circle(X,Y),R畫(huà)圓語(yǔ)句的格式12比較兩個(gè)程序,運(yùn)行結(jié)果相同嗎？程序一：r=Inputbox（"請(qǐng)輸入一個(gè)數(shù)"，"圓的半徑"）Circle(1000,1000),r程序二：Circle(1000,1000),rr=Inputbox（"請(qǐng)輸入一個(gè)數(shù)"，"圓的半徑"）比較兩個(gè)程序,運(yùn)行結(jié)果相同嗎？程序一：程序二：13什么是順序結(jié)構(gòu)？程序的執(zhí)行是自上而下的。先執(zhí)行第一句，然后才是第二句，一直到最后一句。這就是順序結(jié)構(gòu)。什么是順序結(jié)構(gòu)？程序的執(zhí)行是自上而下的。先執(zhí)行第一句，然后才14開(kāi)始語(yǔ)句1語(yǔ)句2……語(yǔ)句n結(jié)束PrivateSubForm_Click()EndSubr＝Inputbox（"請(qǐng)輸入一個(gè)數(shù)"，"圓的半徑"）Circle(1500,1500),r順序結(jié)構(gòu)流程圖開(kāi)始語(yǔ)句1語(yǔ)句2……語(yǔ)句n結(jié)束PrivateSubFor15課后習(xí)題補(bǔ)充程序并上機(jī)實(shí)踐：輸入一個(gè)數(shù)，計(jì)算出這個(gè)數(shù)的絕對(duì)值，并顯示結(jié)果X=inputbox(”請(qǐng)輸入一個(gè)數(shù)”,”輸入”)Y=_________________Printx;”的絕對(duì)值為：“；y課后習(xí)題補(bǔ)充程序并上機(jī)實(shí)踐：輸入一個(gè)數(shù)，計(jì)算出這個(gè)數(shù)的絕對(duì)值16補(bǔ)充程序并上機(jī)實(shí)踐：隨機(jī)產(chǎn)生一個(gè)1~100的整數(shù)PrivateSubForm_Click()X=Rnd（）*100y=___________________PrintyEndSub補(bǔ)充程序并上機(jī)實(shí)踐：隨機(jī)產(chǎn)生一個(gè)1~100的整數(shù)17填寫(xiě)程序：輸入兩個(gè)數(shù)，然后交換這2個(gè)數(shù)，并輸出交換后的結(jié)果。PrivateSubForm_Click()X=inputbox(“請(qǐng)輸入第一個(gè)數(shù)”,”輸入”)y=inputbox(“請(qǐng)輸入第二個(gè)數(shù)”,”輸入”)____________________________________Print”數(shù)據(jù)交換后”P(pán)rint“第一個(gè)數(shù)為”;x