亚洲国产aⅴ,久久99精品九九九久久婷婷,日韩在线第三页,a在线视频免费观看,久久精品不卡毛片,国产精品无套,亚洲性图一区二区

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

時間:2024-07-07 17:37:03 學(xué)人智庫 我要投稿
  • 相關(guān)推薦

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

  對于計算機等級開始想拿高分就要多做練習(xí)題,下面是小編分享的計算機等級考試二級VB程序設(shè)計練習(xí)題,希望對你有幫助!

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

  【計算機等級考試二級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è)計練習(xí)題]相關(guān)文章:

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

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

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

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

5.計算機等級考試二級VB考試題及答案

6.計算機等級考試二級VB考點:VB的過程設(shè)計

7.2017計算機考試二級VB語言程序設(shè)計考試大綱

8.計算機等級考試二級Access練習(xí)題(一)

9.計算機等級考試二級VB考點:進程條和滑塊

10.計算機等級考試二級VB考點:數(shù)組的概念

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

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

計算機二級VB考試練習(xí)題08-18

計算機等級考試二級Web程序設(shè)計考試大綱10-08

計算機等級考試二級VB考點:Print方法,Cls方法,Tab函數(shù)09-16

計算機二級VB考試答題技巧10-06

全國計算機等級考試二級Access數(shù)據(jù)庫程序設(shè)計考試大綱07-11

計算機等級考試練習(xí)題10-23

9月計算機二級考試《VB》強化練習(xí)題和答案07-28

全國計算機二級《VB》練習(xí)題及答案(2)09-08

計算機二級考試VB考點:多媒體控件10-08