奶头挺立呻吟高潮av全片,成人试看120秒体验区,性欧美极品v,A片高潮抽搐揉捏奶头视频

試題

9月計算機二級考試VB復習題

時間:2024-08-17 22:07:25 試題 我要投稿
  • 相關推薦

2017年9月計算機二級考試VB復習題

  2017年計算機二級考試馬上就要開始了,你報考了VB科目嗎?為了方便考生備考計算機二級考試VB 科目。下面是小編為大家帶來的計算機二級考試VB復習題,歡迎閱讀。

2017年9月計算機二級考試VB復習題

  復習題一:

  1.在窗體上畫一個名稱為Text1的文本框,一個名稱為Command1的命令按鈕,然后編寫如下事件過程和通用過程:

  Private Sub Command1_Click( )

  n = Val(Text1.Text)

  If n2 = n/2 Then

  f = f1(n)

  Else

  f = f2(n)

  End If

  Print f; n

  End Sub

  Public Function f1(ByRef x)

  x=x*x

  f1=x+x

  End Function

  Public Function f2(ByVal x)

  x=x*x

  f2=x+x+x

  End Function

  程序運行后,在文本框中輸入3,然后單擊命令按鈕,窗體上顯示的是(D)(單)

  A.72 36

  B.108 36

  C.72 6

  D.27 3

  2.在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下事件過程:

  Private Sub Command1_Click( )

  c = "1234"

  For i = 1 To 4

  c1 = Trim(Str( ))

  Print c1

  Next i

  End Sub

  程序運行后,單擊命令按鈕,要求在窗體上顯示如下內容

  1

  12

  123

  1234

  則在下劃線處應填入的內容為(B)(單)

  A.Right(c1,i)

  B.Left(c1,i)

  C.Mid(c1,i,1)

  D.Mid(c1,i,i)

  3.在窗體上畫一個名稱為Command1的命令按鈕和一個名稱為Text1的文本框,然后編寫如下事件過程:

  Private Sub Command1_Click( )

  n = Val(Text1.Text)

  For i = 2 To n

  For j = 2 To sqr(i)

  If i Mod j = 0 Then Exit For

  Next j

  If j >Sqr(i) Then Print i

  Next i

  End Sub

  該事件過程的功能是(C)(單)

  A.輸出n以內的奇數

  B.輸出n以內的偶數

  C.輸出n以內的素數

  D.輸出n以內能被j整除的數

  4.在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下通用過程和命令按鈕的事件過程:

  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

  Print s

  End Sub

  程序運行后,單擊命令按鈕,在窗體上顯示的是(C)(單)

  A.11

  B.10

  C.9

  D.8

  5.在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕,然后編寫如下事件過程:

  Private Sub Command1_Click( )

  Dim array1(10, 10) As Integer

  Dim i As Integer, j As Integer

  For i = 1 To 3

  For j = 2 To 4

  array1(i, j) = i + j

  Next j

  Next i

  Text1.Text = array1(2, 3) + array1(3, 4)

  End Sub

  程序運行后,單擊命令按鈕,在文本框中顯示的值是(D)(單)

  A.15

  B.14

  C.13

  D.12

  6.Visual Basic應用程序中標準模塊文件的擴展名是【BAS或.BAS】(注意不要寫點)。

  7.在菜單編輯器中建立一個菜單,其主菜單項的名稱為mnuEdit,Visible屬性為False,程序運行后,如果用鼠標右鍵單擊窗體,則彈出與mnuEdit相應的菜單。

  Private Sub Form_ 【mousedown】 (Button As Integer, Shift As Integer, X As Single, Y As Single)

  If Button=2 Then

  popupmenu mnuEdit

  End If

  End Sub

  8.在菜單編輯器中建立一個菜單,其主菜單項的名稱為mnuEdit,Visible屬性為False,程序運行后,如果用鼠標右鍵單擊窗體,則彈出與mnuEdit相應的菜單。以下是實現上述功能的程序,請填空。

  Private Sub Form mousedown (Button As Integer, Shift As Integer, X As Single, Y As Single)

  If Button=2 Then

  【popupmenu】 mnuEdit

  End If

  9.為了使計時器控件Timer1每隔0.5秒觸發一次Timer事件,應將Timer1控件的【Interval】屬性設置為500。

  10.為了使計時器控件Timer1每隔0.5秒觸發一次Timer事件,應將Timer1控件的Interval屬性設置為【500】。

  復習題二:

  1.雙擊窗體中的對象后,VB將顯示的窗口是(C)(單)

  A.工具箱

  B.項目(工程)窗口

  C.代碼窗口

  D.屬性窗口

  2.下述選項中,VB的程序設計方法是(B)(單)

  A.面向對象、順序驅動

  B.面向對象、事件驅動

  C.面向過程、事件驅動

  D.面向過程、順序驅動

  3.在VB中,要將一個窗體裝載到內存進行變量初始化等預處理,但沒有顯示該窗體,應使用的方法或語句是(C)(單)

  A.Show

  B.Unload

  C.Load

  D.Hide

  4.文本框的默認屬性是(B)(單)

  A.Caption

  B.Text

  C.Name

  D.Top

  5.標簽默認屬性是(A)(單)

  A.Caption

  B.Text

  C.Name

  D.Top

  6.執行以下程序段:

  a$="abbacddcba"

  For I=6 To 2 Step -2

  X=Mid(a,I,I)

  Y=Left(a,I)

  z=Right(a,I)

  z=Ucase(X&Y&z)

  Next I

  Print z

  輸出結果為(B)(單)

  A.ABA

  B.BBABBA

  C.ABBABA

  D.AABAAB

  7.在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下程序:

  Option Base 1

  Private Sub Command1_Click( )

  Dim a As Variant

  a=Array(1,2,3,4,5)

  Sum=0

  For I=1 To 5

  Sum = sum+a(I)

  Next I

  x=Sum/5

  For I =1 To 5

  If a(I)>x Then Print a(I);

  Next I

  End Sub

  程序運行后,單擊命令按鈕,在窗體上顯示的內容是(D)(單)

  A.1 2

  B.1 2 3

  C.3 4 5

  D.4 5

  8.假定一個工程由一個窗體文件Form1和兩個標準模塊文件Model1及Model2組成。Model1代碼如下:

  Public x As Integer

  Public y As Integer

  Sub S1( )

  x =1

  S2

  End Sub

  Sub S2( )

  y=10

  Form1.Show

  End Sub

  Model2的代碼如下:

  Sub Main( )

  S1

  End Sub

  其中Sub Main被設置為啟動過程。程序運行后,各模塊的執行順序是(C)(單)

  A.Form1->Model1->Model2

  B.Model1->Model2->Form1

  C.Model2->Model1->Form1

  D.Model2->Form1->Model1

  9.設有如下程序段:

  a$="beijingshanghai"

  b$=Mid(a$,InStr(a$,"g")+1)

  執行上面的程序段后,變量b$的值為【shanghai】

  10.以下程序段的輸出結果是【3】

  Num =0

  Do While num<=2

  num = num+1

  Loop

  Print num

  11.在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下事件過程:

  Private Sub Command1_Click( )

  Move 500,500

  End Sub

  程序運行后,單擊命令按鈕,執行的操作為(A)(單)

  A.命令按鈕移動到距窗體左邊界、上邊界各500的位置

  B.窗體移動到距屏幕左邊界、上邊界各500的位置

  C.命令按鈕向左、上方向各移動500

  D.窗體向左、上方向各移動500

  12.在窗體上有若干控件,其中有一個名稱為Text1的文本框。影響Text1的Tab順序的屬性是(D)(單)

  A.TabStop

  B.Enabled

  C.Visible

  D.TabIndex

  13.在窗體上畫一個名稱為List1的列表框,為了對列表框中的每個項目都能進行處理,應使用的循環語句為(A)(單)

  A.For i=0 To List1.ListCount-1 ......  Next i

  B.For i=0 To ListCount-1 ...... Next i

  C.For i=1 To List1.listCount  ...... Next i

  D.For i=1 To ListCount ...... Next i

  14.以下Case語句中錯誤的是(C)(單)

  A.Case 0 To 10

  B.Case Is>10

  C.Case Is>10 And Is<50

  D.Case 3,5,Is>10

  15.以下關于圖片框控件的說法中,錯誤的是(D)(單)

  A.可以通過Print方法在圖片框中輸出文本

  B.清空圖片框控件中圖形的方法之一是加載一個空圖形

  C.圖片框控件可以作為容器使用

  D.用圖片框控件的Stretch屬性可以自動調整圖片框中圖形的大小

  16.執行語句s=Len(Mid("VisualBasic",1,6))后,s的值是(A)(單)

  A.Visual

  B.Basic

  C.6

  D.11

  17.以下敘述中錯誤的是(D)(單)

  A.下拉式菜單能用菜單編輯器建立

  B.在多窗體程序中,每個窗體都可以建立自己的菜單系統

  C.能夠對菜單項的Click事件編程

  D.如果把一個菜單項的Enabled屬性設置為False,則該菜單項不可見

  18.在窗體上畫一個命令按鈕,其名稱為Command1,然后編寫如下事件過程:

  Private Sub Command1_Click( )

  a = "12345"

  Print Format$(a, "000.00")

  End Sub

  程序運行后,單擊命令按鈕,窗體上顯示的是(B)(單)

  A.123.45

  B.12345.00

  C.12345

  D.00123.45

  19.以下關于函數過程的敘述中,正確的是(A)(單)

  A.函數過程形參的類型與函數返回值的類型沒有關系

  B.在函數過程中,過程的返回值可以有多個

  C.當數組作為函數過程的參數時,既能以傳值方式傳遞,也能以傳址方式傳遞

  D.如果不指明函數過程參數的類型,則該參數不能有數據類型的參數

  20.以下關于變量作用域的敘述中,正確的是(C)(單)

  A.用dim定義變量是靜態變量

  B.靜態變量必須在標準模塊中聲明

  C.用public定義變量是全局變量

  D.Static類型變量的作用域范圍是它所在的窗體或模塊文件

  21.確定一個控件在窗體上的位置的屬性是(C)(單)

  A.Width和Height

  B.Width或Height

  C.Top和Left

  D.Top或Left

  22.在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕,然后編寫如下事件過程:

  Private Sub Command1_Click( )

  Text1.Text = "Visual"

  Me.Text1 = "Basic"

  Text1 = "Program"

  End Sub

  程序運行后,如果單擊命令按鈕,則在文本框中顯示的是(C)(單)

  A.Visual

  B.Basic

  C.Program

  D.出錯

  23.以下關系表達式中,其值為False的是(A)(單)

  A."ABC">"AbC"

  B."the"<>"they"

  C."VISUAL"=UCase("Visual")

  D."Integer">"Int"

  24.語句Print int(5/4*65) Mod 2的輸出結果是(B)(單)

  A.0

  B.1

  C.2

  D.3

  25.在窗體上畫一個文本框、一個標簽和一個命令按鈕,其名稱分別為Text1、Label1和Command1,然后編寫如下兩個事件過程:

  Private Sub Command1_Click( )

  strText = InputBox("請輸入")

  Text1.Text = strText

  End Sub

  Private Sub Text1_Change( )

  Label1.Caption = Right(Trim(Text1.Text), 3)

  End Sub

  程序運行后,單擊命令按鈕,如果在輸入對話框中輸入abcdef,則在標簽中顯示的內容是(D)(單)

  A.空

  B.abcdef

  C.abc

  D.def

  26.在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下事件過程:

  Private Sub Command1_Click( )

  x = -5

  If x >0 Then

  y = x ^ 2

  Else

  y = x

  End If

  Print y

  End Sub

  程序運行后,單擊命令按鈕,窗體上顯示的是(A)(單)

  A.-5

  B.25

  C.1

  D.-1

  27.一個工程中含有窗體Form1、Form2和標準模塊Model1,如果在Form1中有語句Pubilc X As

  Integer,在Model1中有語句Pubilc Y As Integer,則以下敘述中正確的是(A)(單)

  A.變量X、Y的作用域相同

  B.Y的作用域是Model1

  C.在Form1的任何地方中可以直接使用Y

  D.在Form2中可以直接使用X和Y

  28.在窗體上畫一個名稱為Drive1的驅動器列表框,一個名稱為Dir1的目錄列表框。當改變當前驅動器時,目錄列表框應該與之同步改變。設置兩個控件同步的命令放在一個事件過程中,這個事件過程是(A)(單)

  A.Drive1_Change

  B.Drive1_Click

  C.Dir1_Click

  D.Dir1_KeyPress

  29.在窗體上畫一個命令按鈕(其NAME屬性為Command1),然后編寫如下代碼:

  Option Base 1

  Private Sub Command1_Click( )

  Dim a

  s = 0

  a = Array(1, 2, 3, 4)

  For I = 4 To 1 Step -1

  s = s + a(I)

  Next I

  Print s

  End Sub

  運行上面的程序,單擊命令按鈕,其輸出結果是(D)(單)

  A.4321

  B.1234

  C.34

  D.10

  30.在窗體上畫一個名稱為Text1的文本框,編寫以下代碼:

  Private Sub Text1_KeyPress(KeyAscii As Integer)

  If KeyAscii < 65  Or  KeyAscii> 90 Then

  msgBox "請輸入大寫字母"

  KeyAscii = 0

  End If

  End Sub

  以下能說明該事件過程正確是(A)(單)

  A.要求文本框只能接收大寫字母的輸入

  B.要求文本框只能接收小寫字母的輸入

  C.要求文本框只能接收數字的輸入

  D.要求文本框只能接收65到90之間的數值的輸入


【9月計算機二級考試VB復習題】相關文章:

9月計算機二級考試VB真題10-11

2017年9月計算機二級考試VB基礎題05-22

2017年9月計算機二級考試VB測試題08-16

2017年9月計算機二級VB考試模擬測試練習05-22

2016年9月計算機二級《VB》上機試題07-07

2023年9月計算機二級《VB》考題與答案09-05

2017年3月計算機二級考試《VB》考試題及答案08-22

2017年9月計算機二級考試《VB》自測試題07-22

2017計算機二級VB復習題及答案08-30

2013年3月計算機二級考試VB筆試題及答案08-23

主站蜘蛛池模板: 凤台县| 梁河县| 孝昌县| 鄯善县| 无极县| 阜新市| 东台市| 闵行区| 图片| 罗定市| 盐津县| 绍兴县| 芜湖县| 龙口市| 高淳县| 汕尾市| 民县| 安徽省| 五大连池市| 高州市| 广安市| 北海市| 五指山市| 遵化市| 郑州市| 永靖县| 永城市| 绍兴市| 临沧市| 东海县| 合山市| 元氏县| 稷山县| 安仁县| 策勒县| 察哈| 新密市| 泰顺县| 泸州市| 康马县| 中超|