第二章實習作業
(1)已知直角三角形的兩條直角邊長,求斜邊長
private sub label4_click()
a = text1.text
b = text2.text
label4.caption = sqr(a ^ 2 + b ^ 2)
print label4
end sub
(2)給小學生隨機出兩位數和一位數的加法題
private sub command1_click()
a = int(rnd * 90 + 10)
b = int(rnd * 10 + 1)
label1.caption = a & "+" & b & "=?"
end sub
(3)用文字框輸入乙個帶小數的數,對輸入的數四捨五入保留2位小數。
private sub text1_change()
a = round(text1.text, 2)
print a
end sub
(4)輸入某人姓名,判斷是否你的本家
private sub command1_click()
if left(text1.text, 1) = "張" then
text2.text = "是本家"
else
text2.text = "不是本家"
end if
end sub
(5)任意輸入西安地區的固定**號碼(原為7位),將其公升為8位(在原號碼前面加8)。如原號碼為029-*******,公升位後為029
private sub command1_click()
text2.text = left(text1, 4) & 8 & right(text1.text, 7)
end sub
(6)輸入書39頁format語句,檢視執行結果
private sub form_load()
text1.text = format(123456.789
end sub
(7)利用日期與時間函式建立中文電子日曆
private sub timer1_timer()
cur_year = year(date)
cur_month = month(date)
cur_day = day(date)
cur_weekday = "星期" & choose(weekday(date), "日", "一", "二", "三", "四", "五", "六")
label1.caption = cur_year & "年" & cur_month & "月"
label2.caption = cur_day
label3.caption = cur_weekday
label4.caption = time
end sub
(8)利用datediff函式計算現在春節已過去了多少天
private sub command1_click()
print datediff("d", #1/30/2014#, date)
end sub
(9)輸入某學生的一門成績,判斷是否過關
private sub command1_click()
a = text1.text
if a >= 60 and a <= 100 then
msgbox "合格"
elseif a >= 0 and a <= 59 then
msgbox "不合格"
else: msgbox "輸入資料不合理「"
end if
end sub
選做題:
(10)某商場招聘,輸入某人條件,判斷是否夠招工條件,招聘條件為身高1.7公尺以上並為女性。
選作private sub command1_click()
a = text1.text
b = text2.text
if a = "女" and b >= 1.7 then
msgbox "符合招聘條件「"
else: msgbox "不符合招聘條件「"
end if
end sub
西北農林科技大學
西北農林科技大學2011年美術類錄取分數線 西北農林科技大學2010年藝術類專業錄取分數統計正式公布,其中我校藝術類專業為藝術設計 美術類 專業,2010年面向全國計畫招生90名。序號省份專業課文化課綜合分 最高分 最低分 平均分 最高分 最低分 平均分 最高分 最低分 平均分 6 四川 183 1...
西北農林科技大學考研複試經驗
西北農林科技大學複試一般情況下開始於4月中旬,當你確定你能夠進入複試的時候,你就要開始為你的最後一戰做準備了。根據我當年的情況,淘汰率還是很高的。那會我們專業進複試的有18個人,但是只有6個名額,可見淘汰率有多高了。根據專業不同其實複試過程也不盡相同。當時我們是這麼總成績的,考研分數 筆試分數 面試...
建築結構選型西北農林科技大學
建築結構選型 考點 西北農林科技大學 1.結構選型的原則是什麼?a 滿足使用功能的要求 b 滿足建築造型的需要 c 充分發揮結構自身的優勢 d 考慮材料和施工條件 e 盡可能降低造價 f 設計理念和方法 2.梁柱的形式 受力與變形有什麼樣的特徵?a 形式 按材料不同分為 木樑 石梁 鋼梁 鋼筋混凝土...