1、大一vb的實驗報告篇一：vb試驗報告一、試驗目的和要求1、把握正確書寫表達式、賦值語句的規章。2、把握inputbox與msgbox的用法。3、把握print辦法和format格式用法。4、把握單分支與雙分支條件語句的用法。5、把握多分支條件語句的用法。6、把握for語句和do語句的各種形式的用法。7、把握如何控制循環條件，防止死循環和不循環。二、試驗內容和原理1、輸入半徑，計算圓周長和圓面積。為了保證程序運行的正確，對輸入半徑要舉行合法性檢查，數據檢查調用isnumeric函數；若有錯，利用msgbox顯示錯誤信息，通過setfocus辦法定位于出錯的文本框處，重新輸入；計算結果保留兩位小數

2、。提醒：用法text1_keypress大事，按enter鍵，返回參數“keyascii”的值為13表示輸入結束。2、隨機產生三個整數，按從小到大的挨次顯示。3、計算的近似值，的計算公式為：?2n?224262=2× 2n-1?2n+11?33?55?7 注重：、分離顯示當n=10、100、1000時的結果，由此可見，此計算公式收斂如何？、要防止大數相乘時結果溢出的問題，將變量類型改為長整型 或實數型。三、主要儀器設備計算機四、試驗結果與分析試驗界面：1、輸入半徑，計算圓周長和圓面積。程序：private sub form_activatetext1.text = &quot

3、;輸入半徑值"text1.setfocustext1.selstart = 0text1.sellength = len(text1.text)end subprivate sub text1_keypress(keyascii as integer) &39;圓面積，周長dim rr = text1.textconst pi = 3.14159if keyascii = 13 thenclsif isnumeric(r) thenprint "當圓的半徑為" r; "時："print &

4、quot;圓面積為： " format(pi * r 2, "0.00")print "圓面積為" format(pi * r 2, "0.00")elsetext1 = "半徑值輸入有誤"end iftext1.setfocustext1.selstart = 0text1.sellength = len(text1.text)elseend ifend sub運行結果：輸入值:22、隨機產生三個整數，按從小到大的挨次顯示。程序：p

5、rivate sub command1_clickclsdim x%, y%, z%, a%randomizex = int(rnd * 101)y = int(rnd * 101)z = int(rnd * 101)print "隨機產生三個整數： " x; spc(2); y; spc(2); z; spc(2)if x > y thena = x: x = y: y = aend ifif y > z thena = y: y = z: z = aif x > y thena = x: x = y: y = a

6、end ifend ifprint "從小到大排序：  " x; spc(2); y; spc(2); z; spc(2)end sub運行結果：3、計算的近似值、分離顯示當n=10、100、1000時的結果，由此可見，此計算公式收斂如何？、要防止大數相乘時結果溢出的問題，將變量類型改為長整型或實數型。 程序：private sub command2_clickclsdim n as long, pi, i as longn = 1don = n * 10pi = 2for i = 1 to npi = pi * (2 * i) 2 / (

7、2 * i - 1) * (2 * i + 1)next iprint "當n=" n; "時，=" piloop while n < 1000end sub運行結果：篇二：vb試驗報告一、目的與任務本試驗主要練習vb.net的控件的綜合運用。認識vb.net的集成開發環境，把握vb.net編程技巧和開發過程。試驗學時數：4學時二、考核辦法及標準1、考核辦法：本次試驗成果的評定分為三個部分： 出勤試驗完成狀況 試驗報告完成狀況 2、考核標準：本次試驗成果總分為100分，詳細分數分布如表1-1所示。表1-1 成

8、果分布狀況每部分的詳細評分標準如下：（1）出勤：遲到扣1分，早退扣1分（在為完成本試驗的狀況想），否則得滿分。（2）試驗完成部分：未完成，或存在嚴峻缺陷得35分以下； 內容基本完成，但存在小缺陷得3641分； 內容所有完成，沒有錯誤得4248分； 內容所有完成并具有創新的加4960分。（3）試驗報告完成部分：試驗報告內容不完整得014分； 試驗報告內容基本完整得1524分；試驗報告內容正確、排版清楚、有條理得2530分。三、試驗內容某商店為了迎接“五一”將舉行促銷活動，促銷的商品包括服裝、鞋、箱包、化妝品和床上用品五類。在促銷期間，每類產品的規定品牌前40件以3折出售，每類產品每人限購1件，售完為止。買這五類產品的促銷商品列表如下表：（1）基本要求：每次在列表框中點擊相應的商品時，會顯示商品的名稱、數量、單價折扣，并把用戶所選購的全部商品在文本框內舉行匯總，當輸入實付款后單擊“收款”按鈕后計算應找的零錢。（2）進一步要求：添加菜單，使得對于特價商品的種類、品牌商品、價格和折扣舉行編輯。（3）創新提醒：無。要求自行尋覓可改進的地方和創新點。四、思量題1、什么狀況下應當用法label控件？2、vb.net中菜單控件有哪幾種