可視化程序設(shè)計實驗報告

1、可視化程序設(shè)計實驗報告xian technological university 實驗報告 西安工業(yè)大學(xué)實驗報告 一、實驗?zāi)康模?）熟悉visual basic 集成開發(fā)環(huán)境。（2）學(xué)習(xí)怎樣啟動和退出vb（3）掌握開發(fā)一個簡單程序的基本步驟。（4）掌握簡單代碼的編寫。二、實驗內(nèi)容（1）啟動和退出vb（2）開發(fā)一個簡單程序。（3）將visual basic工程編譯生成可執(zhí)行文件。三、實驗步驟、數(shù)據(jù)記錄及處理1、啟動和退出vb進入vb集成開發(fā)環(huán)境要進入vb應(yīng)用程序，首先要運行vb的集成開發(fā)環(huán)境。啟動vb的方法如下： 方法1單擊任務(wù)欄上的“開始”按鈕；選擇“程序”文件夾，接著選取“microsoft

2、 visual basic 中文版”文件夾，再選取“microsoft visual basic 中文版”項，如圖1-1所示；圖1-1 啟動vb的方法1單擊鼠標(biāo)左鍵。方法2單擊任務(wù)欄上的“開始”按鈕；選擇“程序”文件夾；使用“windows 資源按理器”查找vb可執(zhí)行文件；雙擊圖標(biāo)。方法3在桌面創(chuàng)建一個vb快捷鍵；雙擊該快捷鍵。vb啟動后，出現(xiàn)的“新建工程”對話框（圖-2）單擊“打開”按鈕，帶有一個窗體 的新工程將被創(chuàng)建，并可以看到vb集成開發(fā)環(huán)境的界面，如圖1-3所示。有的系統(tǒng)啟動后可直接進入圖1-3所示的界面。 圖1-2 的“新建工程”對話框圖1-3 vb的集成開發(fā)環(huán)境窗口退出vb方法：（

3、1）單擊主窗口右上角的“關(guān)閉”按鈕。（2）執(zhí)行“文件”菜單中的“退出”命令。（3）按alt+q鍵。2、開發(fā)一個簡單程序要求：新建一工程，在窗體（form）上添加一個標(biāo)簽（label），當(dāng)單擊窗體時標(biāo)簽（label）顯示“床前明月光”。實驗步驟：（1）新建工程在桌面上雙擊microsoft visual basic 快捷方式圖標(biāo)，系統(tǒng)進入visual 集成開發(fā)環(huán)境，并顯示“新建工程”對話框，默認(rèn)選擇是建立“標(biāo)準(zhǔn)exe”（即標(biāo)準(zhǔn)工程）。單擊“打開”按鈕，visual basic 進入設(shè)計模式。如圖14所示。圖14“新建工程”對話框單擊“文件”菜單，選擇“新建工程”菜單項，也可進入設(shè)計模式。（2）設(shè)

4、計界面在系統(tǒng)提供的名為form1的窗體上進行界面設(shè)計。單擊工具箱上的標(biāo)簽（label）控件，在窗體上添加標(biāo)簽的位置處按下鼠標(biāo)左鍵，并拖動，調(diào)整虛框的大小，松開鼠標(biāo)，就將標(biāo)簽控件添加到窗體上。初始界面如圖15所示。圖15初始界面（3）設(shè)置屬性如表11所示。表11 屬性設(shè)置 設(shè)置屬性后的界面如圖16所示。 圖16設(shè)置屬性后的界面圖17第一個程序（4）編寫程序代碼private sub form_click( )= 床前明月光end sub（5）運行程序運行vb程序有三種方法：單擊工具欄上的“啟動”按鈕；從“運行”菜單中選擇“啟動”菜單項；按f5鍵。例如，單擊工具欄上的“啟動”按鈕運行程序后，單擊窗

5、體，程序運行效果如圖17所示。（6）保存程序單擊工具欄中的“保存”按鈕或單擊“文件”菜單中的“保存工程”菜單項，選擇合適的保存路徑，先保存窗體文件（例如窗體文件名為“實驗一.frm”），然后保存工程文件（例如工程文件名為“實驗一.vbp”）。3、將visual basic工程編譯生成可執(zhí)行文件單擊“文件”菜單中的“生成實驗一.exe”菜單項，就可生成可執(zhí)行的.exe文件。退出visual basic集成開發(fā)環(huán)境，雙擊實驗一.exe文件，則實驗一.exe文件就可直接運行。四、實驗心得通過這次實驗，我熟悉了visual basic 集成開發(fā)環(huán)境。能夠熟練地啟動和退出vb，掌握了開發(fā)一個簡單程序的基

6、本步驟和簡單代碼的編寫。西安工業(yè)大學(xué)實驗報告一、實驗?zāi)康模?）掌握命令按鈕、文本框和標(biāo)簽常用屬性值的設(shè)置方法。（2）學(xué)會使用命令按鈕、文本框和標(biāo)簽在窗體上建立用戶界面的方法。（3）掌握命令按鈕的主要事件的使用。 二、實驗內(nèi)容 （1）利用命令按鈕、文本框和標(biāo)簽判斷密碼是否正確。（2）建立應(yīng)用程序，對兩個文本框中輸入的內(nèi)容進行交換。三、實驗步驟、數(shù)據(jù)記錄及處理1實驗內(nèi)容要求:在文本框中輸入“goodbaby”，然后單擊“登錄”命令按鈕，則在標(biāo)簽label2中顯示“歡迎使用本系統(tǒng)！”；在文本框中輸入“abc”，然后單擊“登錄”命令按鈕，則在標(biāo)簽label2中顯示“密碼錯誤！請重新輸入密碼！”。步驟：

7、（1）設(shè)計界面在窗體上添加兩個標(biāo)簽、一個文本框和兩個命令按鈕。初始界面如圖21所示。圖21初始界面圖22設(shè)置屬性后的界面（2）設(shè)置屬性設(shè)置屬性后的界面如圖22所示。表21屬性設(shè)置（3）編寫程序代碼private sub command1_click()if =“goodbaby” then=“歡迎使用本系統(tǒng)！”else=“密碼錯誤！請重新輸入密碼！”end ifend subprivate sub command2_click() end end sub（4）運行程序在文本框中輸入“goodbaby”，然后單擊“登錄”命令按鈕，則在標(biāo)簽label2中顯示“歡迎使用本系統(tǒng)！”。運行結(jié)果如圖23所

8、示。圖23 輸入的密碼正確在文本框中輸入“abc”，然后單擊“登錄”命令按鈕，則在標(biāo)簽label2中顯示“密碼錯誤！請重新輸入密碼！”。運行結(jié)果如圖24所示。圖24 輸入的密碼錯誤2實驗內(nèi)容（1）設(shè)計界面在窗體上放置兩個label 控件、兩個textbox控件和三個commandbutton控件。初界面如圖25所示。圖25 初始界面圖26 屬性設(shè)置后的界面（2）屬性設(shè)置設(shè)置屬性后的界面如圖26所示。表22屬性設(shè)置（3）編寫程序代碼option explicit private sub cmdchange_click( ) dim temp as integertemp=tempend subp

9、rivate sub cmdexit_click( )unload meend subprivate sub cmdclear_click( )=”=”end sub(4) 運行程序執(zhí)行結(jié)果如圖2-7（a）、（b）所示。單擊“清空”按鈕并再數(shù)入數(shù)據(jù)，進行交換。圖2-7（a）交換前的界面圖2-7（b）單擊交換后的界面四、實驗心得通過本次實驗，我掌握命令按鈕、文本框和標(biāo)簽常用屬性值的設(shè)置方法，學(xué)會了使用命令按鈕、文本框和標(biāo)簽在窗體上建立用戶界面的方法并且掌握命令按鈕的主要事件的使用。西安工業(yè)大學(xué)實驗報告 一、實驗?zāi)康?（1）掌握邏輯表達式的正確書寫形式。（2）掌握單分支與雙分支條件語句的用法，熟悉

10、if.then.else語句。（3）掌握選擇結(jié)構(gòu)中多條件，多分支程序的用法，熟悉select case語句。（4）掌握for語句的使用。（5）掌握do語句的使用。（6）掌握如何控制循環(huán)條件，防止死循環(huán)或不循環(huán)。二、實驗內(nèi)容（1）編寫程序，利用文本框檢查用戶密碼。提示：可以用文本框的passwordchar屬性來隱蔽用戶輸入的字符。提示：設(shè)密碼是“123456”，利用文本框的passwordchar屬性可以隱蔽用戶輸入的字符。（2）輸入一個數(shù)字（0-6），用中英文顯示星期幾。提示：用多條件多分支選擇語句selectcase來解決。（3）利用for循環(huán)求s=1+(1+2)+(1+2+3)+(1+2

11、+3+n)的值。提示：本題是先進行內(nèi)循環(huán)累加，再進行外循環(huán)累加，因此需要兩個累加器也可用一個循環(huán)來實現(xiàn)括號內(nèi)每累加一個數(shù)，就往s中累加一次。（4）輸入一個正整數(shù)，利用“當(dāng)型”循環(huán)判斷是否素數(shù)。提示：“素數(shù)”是除了1和該數(shù)本身，不能被任何整數(shù)整除的數(shù)，判斷一個自然數(shù)是否素數(shù)，只要依次2n用做除數(shù)去除n，若n不能被其中任何一個數(shù)整除，則n為素數(shù)。三、實驗步驟、數(shù)據(jù)記錄及處理選擇結(jié)構(gòu)1實驗內(nèi)容（1）建立用戶界面。（2）設(shè)置對象屬性。表41 屬性設(shè)置（3）編寫事件代碼。private sub text1_keypress(keyascii as integer)if keyascii = 13 the

12、n 回車字符的ascii為13if = 123456 then = 歡迎使用本系統(tǒng)！ else= 對不起，密碼錯！end if= 0= lenend ifend sub（4）運行程序程序輸出界面如圖41，圖42所示。圖41 驗證密碼正確圖42 驗證密碼不正確2實驗內(nèi)容（1）建立用戶界面。參考圖43所示。圖43 界面設(shè)計（2）設(shè)置對象屬性。表42 屬性設(shè)置（3private sub command1_click()dim n as integer, m as stringn = valselect case ncase 1m = 星期一（monday）case 2m = 星期二（tuesday）

13、 case 3 m = 星期三（wednesday）case 4m = 星期四（thursday）case 5m = 星期五（friday）case 6m = 星期六（saturday）case 0m = 星期日（sunday）case elsem = 重新輸入end select= mend sub（4）運行結(jié)果程序輸出界面如圖44所示。圖44 程序運行結(jié)果循環(huán)結(jié)構(gòu)1實驗內(nèi)容（1）建立用戶界面。（2）設(shè)置對象屬性。參考圖51所示。圖51 屬性設(shè)置圖52 程序運行結(jié)果（3）編寫事件代碼。private sub command1_click( )dim n as integer, i as integer, j as integer, s as longn = valj = 0: s = 0for i = 1 to nj = j + is = s + jnext i= 和數(shù)s= & str(s) = len end sub（4）運行程序程序輸出界面如圖52所示。2實驗內(nèi)容（1）建立用戶界面。參考圖53所示。圖53 界面設(shè)計（2）設(shè)置對象屬性。（3）編寫事件代碼。private sub text1_gotfocus( )= 0= lenend subprivate sub command1_click()dim n as longselect case valcas