寫壹個程序和界面，輸入壹個學生的語文、數學、英語課程成績，點擊計算，得到該學生的平均分和總分。
步驟1。在form1中添加壹個控件並設置其屬性:
控件控件名稱標題文本說明
-
標簽labl_1？中國人？
標簽？Labl_2數學？
標簽？labl_3？英語？
標簽？labl_4？總分數
標簽？labl_5的平均分
文本框？Text1為空？把語言分數留給輸入。
文本框？Text2是空的？留給它輸入數學成績。
文本框text3？空的？留給它輸入英語成績。
文本框text4？空的？留下來顯示總分？
文本框text5？空的？讓它顯示平均分數
命令按鈕命令1計算
第二步。雙擊表單中的命令按鈕，然後鍵入或粘貼以下代碼:
私有子命令1_Click()
Dim s1%，s2%，s3%，su%，av% '更簡單，各科成績和平均分四舍五入。
S1 = CInt(Text1。Text)'語言點
S2 = CInt(Text2。Text)'數學分數
S3 = CInt(Text3。'文本'英語。
Su = s1+s2+s3 '計算總分。
Av = su/3 '計算平均分
文本4。Text = CStr(su)'顯示總分。
文本5。Text = CStr(av)'顯示平均分。
末端接頭
第三步。運行(運行情況如下截圖所示:)