- 相關(guān)推薦
計(jì)算機(jī)等級考試二級VB程序設(shè)計(jì)練習(xí)題
對于計(jì)算機(jī)等級開始想拿高分就要多做練習(xí)題，下面是小編分享的計(jì)算機(jī)等級考試二級VB程序設(shè)計(jì)練習(xí)題，希望對你有幫助!
【計(jì)算機(jī)等級考試二級VB程序設(shè)計(jì)題一】
1.編寫事件代碼，求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ī)等級考試二級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ī)等級考試二級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ī)等級考試二級VB程序設(shè)計(jì)練習(xí)題]相關(guān)文章：
1.計(jì)算機(jī)等級考試二級VB程序設(shè)計(jì)題
2.計(jì)算機(jī)等級考試二級VB程序設(shè)計(jì)填空題
3.計(jì)算機(jī)等級考試二級VB程序設(shè)計(jì)選擇題
4.計(jì)算機(jī)等級考試二級VB程序設(shè)計(jì)模擬試題
5.計(jì)算機(jī)等級考試二級VB考試題及答案
6.計(jì)算機(jī)等級考試二級VB考點(diǎn)：VB的過程設(shè)計(jì)
7.2017計(jì)算機(jī)考試二級VB語言程序設(shè)計(jì)考試大綱
8.計(jì)算機(jī)等級考試二級Access練習(xí)題（一）
9.計(jì)算機(jī)等級考試二級VB考點(diǎn)：進(jìn)程條和滑塊
10.計(jì)算機(jī)等級考試二級VB考點(diǎn)：數(shù)組的概念
【計(jì)算機(jī)等級考試二級VB程序設(shè)計(jì)練習(xí)題】相關(guān)文章：
計(jì)算機(jī)等級考試二級VB程序設(shè)計(jì)填空題09-22
計(jì)算機(jī)等級考試二級Web程序設(shè)計(jì)考試大綱10-08
計(jì)算機(jī)等級考試二級VB考點(diǎn)：Print方法，Cls方法，Tab函數(shù)09-16
全國計(jì)算機(jī)等級考試二級Access數(shù)據(jù)庫程序設(shè)計(jì)考試大綱07-11
9月計(jì)算機(jī)二級考試《VB》強(qiáng)化練習(xí)題和答案07-28