計(jì)算機(jī)等級(jí)考試二級(jí)VB程序設(shè)計(jì)題
計(jì)算機(jī)二級(jí)考試是全國(guó)計(jì)算機(jī)等級(jí)考試（National Computer Rank Examination，簡(jiǎn)稱(chēng)NCRE）四個(gè)等級(jí)中的一個(gè)等級(jí)，考核計(jì)算機(jī)基礎(chǔ)知識(shí)和使用一種高級(jí)計(jì)算機(jī)語(yǔ)言編寫(xiě)程序以及上機(jī)調(diào)試的基本技能。那么計(jì)算機(jī)等級(jí)考試二級(jí)VB程序設(shè)計(jì)題會(huì)怎么考？以下僅供參考！
【計(jì)算機(jī)等級(jí)考試二級(jí)VB程序設(shè)計(jì)題一】
1.編寫(xiě)事件代碼，求1—100之間能被5整除或被7整除的數(shù)的累加和，要求單擊窗體時(shí)執(zhí)行事件代碼，并在窗體上輸出運(yùn)行結(jié)果。
Private Sub Form_Click( )
Dim i%,s!
S=0
For i=1 to 100
If i mod 5=0 or i mod 7=0 then s=s+i
Next i
Print “s=”;s
End Sub
【計(jì)算機(jī)等級(jí)考試二級(jí)VB程序設(shè)計(jì)題二】
求1+2+3+……+100累加和(單擊窗體執(zhí)行程序)。
Private sub form_click()
Dim i%，s! (2’)
S=0 (2’)
For i=1 to 100 (2’)
S=s+I (2’)
Next
Print “s=”;s (2’)
End Sub
【計(jì)算機(jī)等級(jí)考試二級(jí)VB程序設(shè)計(jì)題三】
1. Private Sub Command1_Click()
x = 0
n = InputBox("")
For i = 1 To n
For j = 1 To i
x = x + 1
Next j
Next i
Print x
End Sub
程序運(yùn)行后，單擊命令按鈕，如果輸入3，則在窗體上顯示的內(nèi)容是:
2. Private Function f(m As Integer)
If m Mod 2 = 0 Then
f = m
Else
f = 1
End If
End Function
Private Sub Command1_Click()
Dim i As Integer
s = 0
For i = 1 To 5
s = s + f(i)
Next i
Print s
End Sub
單擊命令按鈕后，程序的運(yùn)行結(jié)果為：
1、6
2、9
【計(jì)算機(jī)等級(jí)考試二級(jí)VB程序設(shè)計(jì)題】相關(guān)文章：
計(jì)算機(jī)等級(jí)考試二級(jí)VB程序設(shè)計(jì)填空題06-25
計(jì)算機(jī)等級(jí)考試二級(jí)VB程序設(shè)計(jì)模擬試題07-13
計(jì)算機(jī)等級(jí)考試二級(jí)VB程序設(shè)計(jì)選擇練習(xí)06-01
計(jì)算機(jī)二級(jí)考試VB程序設(shè)計(jì)選擇題05-25
2015全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)VB語(yǔ)言程序設(shè)計(jì)考試大綱05-25
計(jì)算機(jī)等級(jí)考試二級(jí)VB試題及答案06-20
計(jì)算機(jī)等級(jí)考試二級(jí)VB考前練習(xí)01-10