《程序基本知識》學(xué)件_第1頁
《程序基本知識》學(xué)件_第2頁
《程序基本知識》學(xué)件_第3頁
免費(fèi)預(yù)覽已結(jié)束,剩余3頁可下載查看

下載本文檔

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

文檔簡介

1、認(rèn)識 Visual Basic使用Visual Basic編寫程序的步驟1. 建立程序界面2. 設(shè)置對象屬性3. 添加代碼,保存,調(diào)試,運(yùn)行【基本任務(wù)】任務(wù)一:建立程序界面1. 新建工程,選擇“標(biāo)準(zhǔn) EXE ”,單擊確定。2. 拖動“窗體”右下角的控制點(diǎn),將窗體調(diào)整到自認(rèn)為的合適大小。3. 在“窗體”中添加對象,內(nèi)容如下圖所示。任務(wù)二:設(shè)置下列對象屬性和屬性值。對象名屬性屬性值作用FormlCapti on身體質(zhì)量計(jì)算器窗體標(biāo)題欄上顯示屬性值(可以個(gè)性化)TextlText空默認(rèn)情況下文本框中無內(nèi)容Text2Text空默認(rèn)情況下文本框中無內(nèi)容T ext3Text空默認(rèn)情況下文本框中無內(nèi)容Lab

2、ellCapti on身高(米)顯示輸入的提示信息Label2Capti on體重(公斤)顯示輸入的提示信息Comma nd1Capti onBMI值(或者測試等)單擊它可以進(jìn)行計(jì)算 BMI具體操作步驟:(1)設(shè)置窗體標(biāo)題(Form)屬性。(2)設(shè)置顯示文字(Label)屬性。(3)設(shè)置文本框(TextBox)屬性。(3)設(shè)置命令按鈕(Cammand屬性。u.J.1on空STW |按分類序| aAppearance1 - 3DEisLcliCGicir £HBOODt»OFAC mic elraise| C ap t i on.BHI®onDfi£ d.

3、1111Fol EftDi 5abledFidlure(Kalkt)OIhda)SrtglconDr ngNlodeQ -ETLbltdTfutFont宋體Hfil jgjlt495HelpContextID0IiLiiesiV:j&H/iSB對界的茹題欄中亞閔際下面的 丈本.想一想:對對象設(shè)置其屬性,有什么技巧嗎?如何美化它?美化時(shí)可以用到對象的_l ® IHlFont、BackColor、等屬性值,也可以用到圖片控件,即任務(wù)三:輸入、保存程序,調(diào)試、運(yùn)行程序1雙擊“窗體”中的“ BMI值”按鈕,進(jìn)入代碼窗口,在指定位置輸入一段程序。-J1.i - IT工程i -F oit

4、kI (Code)|C«OBUdl-| Click:PrivateISub Cemmiaikdl jCli ch C)End Sub程序段:程序如下:Let h = Textl.TextLet w = Text2.TextLet bmi = w / (h * h)Let Text3.Text = bmi輸好了之后如下:思考:你能讀懂這段程序嗎?2.單擊工具欄中的“啟動”按鈕或按F5鍵運(yùn)行程序文伴 Q觀的 14='胡珈工梶OfCtrL+-StGaf打幵工程o)CtrL+Ot3.保存程序到桌面上,執(zhí)行“文件一一保存工程”命令,文件名為自己的名字;再次執(zhí) 行“文件生成工程 1.ex

5、e”,文件名也為自己的名字。sanxffi qj.裕隔工程13)Q侃石工程(S) 工程另存為CB?. 噪衿 FnmlCirH-SFothI另存附L.IT.)CtrL4-?學(xué)以致用:解決數(shù)學(xué)問題。】1. 設(shè)計(jì)一個(gè)求圓的面積的程序。其程序代碼為:Private Sub Command1_Click()Let r = Text1.TextLet s = 3.1416 * r * rLet Text2.Text = sEnd Sub【學(xué)以致用:編寫輕松的涂鴉程序】涂鴉程序:Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)Rem 當(dāng)按鼠標(biāo)鍵,則鼠標(biāo)在窗體上的位置定為畫線起點(diǎn)Form1.CurrentX = XForm1.CurrentY = YEnd SubPrivate Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Rem 當(dāng)按住左鍵移動鼠標(biāo)畫線If

溫馨提示

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

最新文檔

評論

0/150

提交評論