欧美日韩不卡一区二区三区,www.蜜臀.com,高清国产一区二区三区四区五区,欧美日韩三级视频,欧美性综合,精品国产91久久久久久,99a精品视频在线观看

試題

計算機等級考試二級VB程序設(shè)計題

時間:2025-01-16 13:12:03 試題 我要投稿

計算機等級考試二級VB程序設(shè)計題

  計算機二級考試是全國計算機等級考試(National Computer Rank Examination,簡稱NCRE)四個等級中的一個等級,考核計算機基礎(chǔ)知識和使用一種高級計算機語言編寫程序以及上機調(diào)試的基本技能。那么計算機等級考試二級VB程序設(shè)計題會怎么考?以下僅供參考!

計算機等級考試二級VB程序設(shè)計題

  【計算機等級考試二級VB程序設(shè)計題一】

  1.編寫事件代碼,求1—100之間能被5整除或被7整除的數(shù)的累加和,要求單擊窗體時執(zhí)行事件代碼,并在窗體上輸出運行結(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

  【計算機等級考試二級VB程序設(shè)計題二】

  求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

  【計算機等級考試二級VB程序設(shè)計題三】

  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

  程序運行后,單擊命令按鈕,如果輸入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

  單擊命令按鈕后,程序的運行結(jié)果為:

  1、6

  2、9

【計算機等級考試二級VB程序設(shè)計題】相關(guān)文章:

計算機等級考試二級VB程序設(shè)計填空題06-25

計算機等級考試二級VB程序設(shè)計模擬試題07-13

計算機等級考試二級VB程序設(shè)計選擇練習(xí)06-01

計算機二級考試VB程序設(shè)計選擇題05-25

2015全國計算機等級考試二級VB語言程序設(shè)計考試大綱05-25

計算機等級考試二級VB試題及答案06-20

計算機等級考試二級VB考前練習(xí)01-10

計算機二級考試VB程序設(shè)計選擇練習(xí)05-27

全國計算機等級考試二級VB試卷03-08