實驗報告
實驗目的:
(1) 掌握靜態陣列和動態陣列定義及使用
(2) 掌握陣列元素的引用,陣列的輸入和輸出
(3) 掌握「控制項陣列」的使用
實驗內容:
(1) 在名稱為form1的窗體上有乙個名稱為shape1的形狀控制項畫乙個名稱為l1的列表框,並在屬性視窗中設定列表項的值為1,2,3,4,5,將窗體的標題設為「圖形控制項」。單擊列表框中的某一項,則按照所選的值該錶形狀控制項的形狀。例如,選擇3,則形狀控制項被設為圓形,如下圖所示。
要求:窗體檔案儲存為工程檔案儲存為
程式**:
private sub l1_click()
=end sub
(2) 介面如上圖所示,窗體上所有物件的名稱屬性都使用預設值。單擊命令按鈕時候計算出最後得分。計算方法是去掉乙個最高得分和乙個最低得分,求剩下得分的平均值再乘以難度係數,最後結果保留到小數點後面兩位。
要求窗體檔案儲存為工程檔案儲存為
程式**:
option base 1
private sub command1_click()
dim a as variant
a = array(val( val( val( val( val( val(
max = a(1)
min = a(1)
for i = 2 to 6
if max < a(i) then max = a(i)
if min > a(i) then min = a(i)
next i
for i = 1 to 6
sum = a(i) + sum
next i
= int((sum - max - min) / 4 * * 100) / 100
end sub
(3) 名稱為form1的窗體上有乙個命令按鈕,單擊命令按鈕,利用隨機函式生成乙個6行6列的整型陣列(取值範圍【10,90】)。找出摸個指定行內最大的元素所在的列號。
要求:窗體檔案儲存為工程檔案儲存為
程式**:
private sub command1_click()
dim a(1 to 6, 1 to 6) as integer
for i = 1 to 6
for j = 1 to 6
a(i, j) = int(rnd * 81 + 10)
next j
next i
for i = 1 to 6
for j = 1 to 6
print a(i, j);
next j
next i
m = inputbox("請輸入要所要選定的行數")
max = 1
for i = 2 to 6
if a(m, max) < a(m, i) then max = i
next i
print "最大元素所在列號="; max
end sub
(4) 名稱為form1的窗體上有乙個命令按鈕,單擊命令按鈕輸入乙個班10個學生的姓名和成績,然後對學生成績降序排序,輸出排序後的成績和學生姓名。
要求:窗體檔案儲存為工程檔案儲存為
程式**:
private type student
nam as string * 8
mark as integer
end type
private sub command1_click()
dim a(1 to 10) as student, t as student
for i = 1 to 10
a(i).nam = inputbox("請輸入第" & i & "個學生的姓名:")
a(i).mark = inputbox("請輸入第" & i & "個學生的成績:")
next i
print "姓名成績"
for i = 1 to 10
print a(i).nam; tab(12); a(i).mark
next i
print "排序後:"
print "姓名成績"
for i = 1 to 9
max = i
for j = i + 1 to 10
if a(max).mark < a(j).mark then max = j
next j
t = a(i)
a(i) = a(max)
a(max) = t
next i
for i = 1 to 10
print a(i).nam; tab(12); a(i).mark
next i
end sub
VB課程設計報告 2
計算機課程設計報告 題目系別年級專業 班級學號 學生姓名 指導教師 設計時間 目錄第一章前言2 1.1 選題背景 1.2選題意義 1.3 具體功能及亮點 第二章功能需求分析3 2.1程式設計環境的選擇 2.2系統可行性 第三章系統設計和實現4 3.1設計方案 2.2具體 3.3技術問題及解決方法 3...
課程設計實驗報告
上海應用技術學院 課程設計 2011 2012學年第二學期 設計題目成績記錄簿 院 系 電腦科學與資訊工程學院 專業計算機應用技術 班級 12104006 學號 1210400631 學生姓名溫源 設計時間 2013.07.1 2012.07.12 指導教師宋智禮 提交日期 上海應用技術學院課程設計...
課程設計實驗報告
實驗報告 課程名稱統計學課程設計 實驗類別 綜合性 設計性 其他 實驗專案統計學課程設計 專業班級 姓名 學號 實驗室號實驗組號 實驗時間批閱時間 指導教師成績 瀋陽工業大學實驗報告 適用經 管 文 法專業 專業班級學號姓名 實驗專案 spss資料處理 附件 1 瀋陽工業大學實驗報告 適用經 管 文...