必胜高考网_全国高考备考和志愿填报信息平台

必勝高考網 > 計算機類 > 計算機等級 > 資訊 >

2014年9月計算機二級Access預測選擇題(3)

時間: 家輝2 資訊

  考點11:模塊VBA基礎

  1.運行下列程序段,結果是( )。

  For m = 10 To 1 Step 0

  k = k + 3

  Next m答案:B

  A)形成死循環

  B)循環體不執行即結束循環

  C)出現語法錯誤

  D)循環體執行一次后結束循環

  2.假設某一數據庫表中有一個地址字段,查找地址最后兩個字為“8號”的記錄的準則是( )。答案:A

  A)Right([地址],2)="8號"

  B)Right([地址],4)="8號"

  C)Right("地址",2)="8號"

  D)Right("地址",4)="8號"

  3.以下合法的表達式是( )。答案:B

  A)教師編號between 100000 and 200000

  B)[性別]="男" or"女"

  C)[基本工資]>=1000[基本工資]<=10000

  D)[性別]like"男"=[性別]="女"

  4.下列Case語句中錯誤的是( )。答案:C

  A)Case 0 To 10

  B)Case Is>10

  C)Case Is>10 And Is<50

  D)Case 3,5,Is>10

  5.下列數組聲明語句中,正確的是( )。答案:B

  A)Dim A[3,4] As Integer

  B)Dim A(3,4)As Integer

  C)Dim A[3;4] As Integer

  D)Dim A(3;4)As Integer

  6.在窗體上有一個命令按鈕Command1,編寫事件代碼如下:

  Private Sub Command1_Click()

  Dim x As Integer, y As Integer

  x = 12: y = 32

  Call Proc(x, y)

  Debug.Print x; y

  End Sub

  Public Sub Proc(n As Integer, ByVal m As Integer)

  n = n Mod 10

  m = m Mod 10

  End Sub

  打開窗體運行后,單擊命令按鈕,立即窗口上輸出的結果是( )。答案:A

  A)2 32

  B)12 3

  C)2 2

  D)12 32

  7.以下過程的功能是向數組中增加字符,則程序中下畫線處應為( )

  Private Sub AddToArray(arr(),arraycount%,ByVal charstring)

  Dim i%, found As Boolean

  found=False

  For i=1 To arraycount

  If array(i)=charstring Then

  found=True

  Exit For

  End If

  Next i

  If Not found Then

  arraycount= arraycount+1

  ———

  arr(arraycount)=charstring

  End If

  End Sub答案:B

  A)ReDim arr(arraycount)

  B)ReDim Preserve arr(arraycount)

  C)Dim arr(arraycount)

  D)Dim Preserve arr(arraycount)

  8.以下窗體加載事件程序如下:

  Private Sub Form_Load()

  Do

  b = b + 1

  If b = 5 Then Exit Do

  Loop

  Msgbox b

  End Sub

  此程序運行結果為( )。答案:A

  A)5

  B)6

  C)7

  D)8

  9.在VBA中,如果沒有顯式聲明或用符號來定義變量的數據類型,變量的默認數據類型為( )。答案:D

  A)Boolean

  B)Integer

  C)String

  D)Variant

  10.給定日期DD,計算該日期當月最大天數的正確表達式是( )。答案:D

  A)Day(DD)

  B)Day(DateSerial(Year(DD),Month(DD),day(DD)))

  C)Day(DateSerial(Year(DD),Month(DD),0))

  D)Day(DateSerial(Year(DD),Month(DD)+1,0))

  11.VBA 表達式3*3\3/3 的輸出結果是( )。答案:C

  A)0

  B)1

  C)3

  D)9

  12.在窗體上有一個命令按鈕Command1和一個文本框Text1,編寫事件代碼如下:

  Private Sub Command1_Click()

  Dim i, j, x

  For i = 1 To 20 Step 2

  x = 0

  For j = i To 20 Step 3

  x = x + 1

  Next j

  Next i

  Text1.Value = Str(x)

  End Sub

  打開窗體運行后,單擊命令按鈕,文本框中顯示的結果是( )。答案:A

  A)1

  B)7

  C)17

  D)400

  13.假定有以下程序段:

  n=0

  for i=1 to 3

  for j=-4 to -1

  n=n+1

  next j

  next i

  運行完畢后,n的值是( )。答案:D

  A)0

  B)3

  C)4

  D)12

  14.下列變量名中,合法的是( )。答案:C

  A)4A

  B)A-1

  C)ABC_1

  D)private

  15.以下返回值是“False”的語句是( )。答案:D

  A)Value=(10>4)

  B)Value=("ab"<>"aaa")

  C)Value=("周"<"劉")

  D)Value=(#2004/9/13#<=#2004/10/10#)

  16.定義了二維數組A(2 to 5,5),該數組的元素個數為( )。答案:B

  A)20

  B)24

  C)25

  D)36

  17.要將“選課成績”表中學生的成績取整,可以使用( )。答案:B

  A)Abs([成績])

  B)Int([成績])

  C)Sqr([成績])

  D)Sgn([成績])

  18.在調試VBA程序時,能自動被檢查出來的錯誤是( )。答案:A

  A)語法錯誤

  B)邏輯錯誤

  C)運行錯誤

  D)語法錯誤和邏輯錯誤

  19.有關VBA程序運行錯誤處理說法錯誤的是( )。答案:D

  A)無論怎樣為程序代碼作徹底地測試與排錯,程序錯誤仍可能出現

  B)VBA中提供On Error GoTo語句來控制當有錯誤發生時程序的處理

  C)“On Error GoTo 標號”語句在遇到錯誤發生時,程序轉移到標號所指位置代碼執行

  D)“On Error GoTo 0”語句表示發生錯誤時,跳轉至首行位置并向下執行

  20.VBA中定義符號常量可以用關鍵字( )。答案:A

  A)Const

  B)Dim

  C)Public

  D)Static

  21.在模塊的聲明部分使用“Option Base 1”語句,然后定義二維數組A(2 to 5,5),則該數組的元素個數為( )。答案:A

  A)20

  B)24

  C)25

  D)36

55821 主站蜘蛛池模板: 博博会2021_中国博物馆及相关产品与技术博览会【博博会】 | 河南档案架,档案密集架,手动密集架,河南密集架批发/报价 | 海外仓系统|国际货代系统|退货换标系统|WMS仓储系统|海豚云 | 今日娱乐圈——影视剧集_八卦娱乐_明星八卦_最新娱乐八卦新闻 | 乐泰胶水_loctite_乐泰胶_汉高乐泰授权(中国)总代理-鑫华良供应链 | 河南新乡德诚生产厂家主营震动筛,振动筛设备,筛机,塑料震动筛选机 | 垃圾压缩设备_垃圾处理设备_智能移动式垃圾压缩设备--山东明莱环保设备有限公司 | 数码管_LED贴片灯_LED数码管厂家-无锡市冠卓电子科技有限公司 | 辐射仪|辐射检测仪|辐射巡测仪|个人剂量报警仪|表面污染检测仪|辐射报警仪|辐射防护网 | 福建珂朗雅装饰材料有限公司「官方网站」 | 刹车盘机床-刹车盘生产线-龙口亨嘉智能装备 | 浙江皓格药业有限公司| 胀套-锁紧盘-风电锁紧盘-蛇形联轴器「厂家」-瑞安市宝德隆机械配件有限公司 | 创富网-B2B网站|供求信息网|b2b平台|专业电子商务网站 | 外贮压-柜式-悬挂式-七氟丙烷-灭火器-灭火系统-药剂-价格-厂家-IG541-混合气体-贮压-非贮压-超细干粉-自动-灭火装置-气体灭火设备-探火管灭火厂家-东莞汇建消防科技有限公司 | 不锈钢水箱生产厂家_消防水箱生产厂家-河南联固供水设备有限公司 | 广州二手电缆线回收,旧电缆回收,广州铜线回收-广东益福电缆线回收公司 | 车牌识别道闸_停车场收费系统_人脸识别考勤机_速通门闸机_充电桩厂家_中全清茂官网 | 螺旋叶片_螺旋叶片成型机_绞龙叶片_莱州源泽机械制造有限公司 | 防爆型气象站_农业气象站_校园气象站_农业四情监测系统「山东万象环境科技有限公司」 | 煤粉取样器-射油器-便携式等速飞灰取样器-连灵动 | 不锈钢监控杆_监控立杆厂家-廊坊耀星光电科技有限公司 | 小型手持气象站-空气负氧离子监测站-多要素微气象传感器-山东天合环境科技有限公司 | 广州监控安装公司_远程监控_安防弱电工程_无线wifi覆盖_泉威安防科技 | 飞利浦LED体育场灯具-吸顶式油站灯-飞利浦LED罩棚灯-佛山嘉耀照明有限公司 | 电缆接头_防水接头_电缆防水接头 - 乐清市新豪电气有限公司 | 金刚网,金刚网窗纱,不锈钢网,金刚网厂家- 河北萨邦丝网制品有限公司 | 软启动器-上海能曼电气有限公司 真空搅拌机-行星搅拌机-双行星动力混合机-广州市番禺区源创化工设备厂 | 昆明挖掘机修理厂_挖掘机翻新再制造-昆明聚力工程机械维修有限公司 | 全自动面膜机_面膜折叠机价格_面膜灌装机定制_高速折棉机厂家-深圳市益豪科技有限公司 | 水篦子|雨篦子|镀锌格栅雨水篦子|不锈钢排水篦子|地下车库水箅子—安平县云航丝网制品厂 | 知企服务-企业综合服务(ZiKeys.com)-品优低价、种类齐全、过程管理透明、速度快捷高效、放心服务,知企专家! | 自动记录数据电子台秤,记忆储存重量电子桌称,设定时间记录电子秤-昆山巨天 | 专业深孔加工_东莞深孔钻加工_东莞深孔钻_东莞深孔加工_模具深孔钻加工厂-东莞市超耀实业有限公司 | 食品机械专用传感器-落料放大器-低价接近开关-菲德自控技术(天津)有限公司 | 冰晶石|碱性嫩黄闪蒸干燥机-有机垃圾烘干设备-草酸钙盘式干燥机-常州市宝康干燥 | 粘度计NDJ-5S,粘度计NDJ-8S,越平水分测定仪-上海右一仪器有限公司 | 真空干燥烘箱_鼓风干燥箱 _高低温恒温恒湿试验箱_光照二氧化碳恒温培养箱-上海航佩仪器 | 京马网,京马建站,网站定制,营销型网站建设,东莞建站,东莞网站建设-首页-京马网 | 软文世界-软文推广-软文营销-新闻稿发布-一站式软文自助发稿平台 | 华中线缆有限公司-电缆厂|电缆厂家|电线电缆厂家 |