黄色在线观看视频-黄色在线免费看-黄色在线视频免费-黄色在线视频免费看-免费啪啪网-免费啪啪网站

首頁 - 網校 - 題庫 - 直播 - 雄鷹 - 團購 - 書城 - 模考 - 論壇 - 導航 - 510 -
首頁考試吧網校題庫直播雄鷹510團購書城模考論壇實用文檔作文大全寶寶起名
2014中考
法律碩士
2014高考
MBA考試
2014考研
MPA考試
在職研
中科院
考研培訓 自學考試 成人高考
四 六 級
GRE考試
攻碩英語
零起點日語
職稱英語
口譯筆譯
申碩英語
零起點韓語
商務英語
日語等級
GMAT考試
公共英語
職稱日語
新概念英語
專四專八
博思考試
零起點英語
托福考試
托業考試
零起點法語
雅思考試
成人英語三級
零起點德語
等級考試
華為認證
水平考試
Java認證
職稱計算機 微軟認證 思科認證 Oracle認證 Linux認證
公 務 員
導游考試
物 流 師
出版資格
單 證 員
報 關 員
外 銷 員
價格鑒證
網絡編輯
駕 駛 員
報檢員
法律顧問
管理咨詢
企業培訓
社會工作者
銀行從業
教師資格
營養師
保險從業
普 通 話
證券從業
跟 單 員
秘書資格
電子商務
期貨考試
國際商務
心理咨詢
營 銷 師
司法考試
國際貨運代理人
人力資源管理師
廣告師職業水平
衛生資格 執業醫師 執業藥師 執業護士
會計從業資格
基金從業資格
統計從業資格
經濟師
精算師
統計師
會計職稱
法律顧問
ACCA考試
注冊會計師
資產評估師
高級經濟師
審計師考試
高級會計師
注冊稅務師
國際內審師
理財規劃師
美國注冊會計師
一級建造師
安全工程師
設備監理師
公路監理師
公路造價師
二級建造師
招標師考試
物業管理師
電氣工程師
建筑師考試
造價工程師
注冊測繪師
質量工程師
巖土工程師
注冊給排水
造價員考試
注冊計量師
環保工程師
化工工程師
暖通工程師
咨詢工程師
結構工程師
城市規劃師
材料員考試
監理工程師
房地產估價
土地估價師
安全評價師
房地產經紀人
投資項目管理師
環境影響評價師
土地登記代理人
寶寶起名
繽紛校園
實用文檔
入黨申請
英語學習
思想匯報
作文大全
工作總結
求職招聘 論文下載 直播課堂
您現在的位置: 考試吧 > 計算機等級考試 > 計算機二級考試 > VB > 模擬試題 > 正文

2014年計算機二級考試VB專家預測試卷及答案3

來源:考試吧 2014-3-11 14:01:43 考試吧:中國教育培訓第一門戶 模擬考場
2014年計算機二級考試VB專家預測試卷及答案提供給各位考生備考,更多考試資料請持續關注考試吧計算機等級考試頻道!
第 1 頁:單選題
第 5 頁:操作題
第 7 頁:參考答案

  31.目錄列表框的Path屬性的作用是( )。

  A.顯示當前驅動器或指定驅動器上的某目錄下的文件名

  B.顯示當前驅動器或指定驅動器上的目錄結構

  C.顯示根目錄下的文件名

  D.顯示該路徑下的文件

  32.以下敘述中錯誤的是( )。

  A.在KeyPress事件過程中不能識別鍵盤的按下與釋放

  B.在KeyPress事件過程中不能識別回車鍵

  C.在KeyDown和KeyUp事件過程中,將鍵盤輸入的“A”和“a”視作相同的字母

  D.在KeyDown和KeyUp事件過程中,從大鍵盤上輸出的“1”和從右側小鍵盤上輸入的“1”被視作不同的字符

  33.以下關于文件的敘述中,錯誤的是( )。

  A.順序文件中的記錄一個接一個地順序存放

  B.隨機文件中記錄長度是隨機的

  C.執行打開文件的命令后,自動生成一個文件指針

  D.LOF函數返回給文件分配的字節數

  34.窗體上有1個名稱為List1的列表框,其中已經輸入了若干個項目,如圖所示;還有

  2個文本框,名稱分別為Text1、Text2,1個名稱為Command1的命令按鈕,并有下列事件過程。

  Private Sub Command1_Click()

  Dim str As String,S As String.k As Integer

  s=Text1

  str =""

  For k=Listl.ListCount-1 To 0 Step-1

  If InStr(List1.List(k),s)>0 Then

  str=str & List1.List(k)&""

  End If

  Next k

  If str=""Then

  Text2="沒有匹配的項目"

  Else

  Text2=str

  End If

  End Sub

  

  程序運行時,在Text1中輸入"京",單擊命令按鈕,則在Text2中顯示的內容是( )。

  A.京

  B.北京南京

  C.南京北京

  D.沒有匹配的項目

  35.以下關于KeyPress事件過程中參數KeyAscii的敘述正確的是( )。

  A.KeyAscii參數是所按鍵的ASCII碼

  B.KeyAscii參數的數據類型為字符串

  C.KeyAscli參數可以省略

  D.KeyAscii參數是所按鍵上標注的字符

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

  Private Sub Command1_Click()

  Print fun("ABCDEFG")

  End Sub

  Function fun(st As String)As string

  stlen=Len(st)

  temp=""

  For k=1 To stlen/2

  temp=temp+Mid(st,k,1)+Mid(st,stlen-k+1,1)

  Next k

  fun=temp

  End Function

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

  A.ABCDEFG

  B.AGBFCE

  C.GFEDCBA

  D.AGBFCED

  37.在窗體E先后畫2個圖片框,名稱分別為Picture1和banana,banana中添加了香蕉

  圖片,如圖1所示,且將banana.DragMode屬性設置為1。要求程序運行時,可以用鼠標把banana拖拽到Picture1中,如圖2所示。能實現此功能的事件過程是( )。

  

  A.Private 3ub Form—DragDrop(Source As Control,X As Single,Y As Single)

  banana.Move Picture1.Left+X,Picture1.Top+Y

  End Sub

  B.Private Sub banana_DragDrop(Source As Control,X As Single,Y As Single)

  Source.Move Picture1.Left+X,Picture 1.Top+Y

  End Sub

  C.Private Sub Picturei_DragDrop(Source As Control,X As Single,Y As Single)

  Source.Move Picture1.Left+X,Picture1.Top+Y

  End Sub

  D.Private Sub Picture1_DragDrop(Source As Control,X As Single,Y As Single)

  banana.Move banana.Left+X,banana.Top +Y

  End Sub

  38.在窗體上面1個名稱為Command1的命令按鈕,然后編寫下列事件過程

  Option Base 1

  Private Sub,Command1 Click()

  Dim a(5,5)ks Integer

  For i=1 To j

  For j=1 To 5

  a(i,j)=(i+j)*5\10

  Next j

  Next i

  S=0

  For i=1 To j

  s=s+a(i,i)

  Next i

  Print s

  End Sub

  程序運行后,單擊命令按鈕,輸出結果是( )。

  A.15

  B.13

  C.11

  D.9

  39.在窗體上從仨到右有Text1、Text2兩個文本框,如圖所示,要求程序運行時,在Text1 中輸入1個分數后按回車鍵,則判斷分數的合法性,若分數為0~100中的1個數,則光標移到Text2中;否則光標不動,并彈出對話框顯示“分數錯”。下列程序中正確的是( )。

  

  A. Private Sub Text1_KeyPress(KeyAscii As Integer)

  If KeyAscii==13 Then

  ’回車符的ASCIl碼是13

  a=Val(Text1)

  If a>=0 Or a<=100 Then

  Text2.SetFocus

  Else

  Text1.SetFocus:MsgBox("分數錯")

  End If

  End If

  End Sub

  B. Private Sub Textl—KeyPress(KeyAscii As Integer)

  If KeyAseii=13 Then

  ’回車符的ASCIl碼是13

  a=Val(Text1)

  If a>=0 And a<=100 Then

  Textl.SetFocus

  Else

  Text2.SetFocus:MsgBox("分數錯")

  End If

  End If

  End Sub

  C.Private Sub Text1_KeyPress(KeyAscii As Integer)

  If KeyAscii=13 Then

  ’回車符的ASCII碼是13

  a=Val(Text1)

  If a<0 And a>100 Then

  Text2.SetFocus

  Else

  Text1.SetFocus:MsgBox("分數錯")

  End If

  End If

  End Sub

  D.Private Sub Text1_KeyPress(KeyAscii As Integer)

  If KevAscii=13 Then

  ’回車符的ASCII碼是13

  a=Val(Textl)

  If a>=0 Aad a<=100 Then

  Text2.SetFocus

  Else

  Text1.SetFocus:MsgBox("分數錯")

  End If

  End If

  End Sub

  40.在窗體上畫2個命令按鈕,名稱分別為Command1、Command2,然后編寫下列事件過程。

  Const n=5.m=4

  Dim a(m,n)

  Private Sub+Command1 Click()

  k=1

  For i=1 To m

  For j=1 To n

  a(i,j)=k

  k=k+1

  Next j

  Next i

  End Sub

  Private Sub Command2 Click()

  summ=0

  For i=1 To m

  For j=1 To n

  If i=1 Or i=m Then

  summ=summ+a(i,j)

  Else

  If j=1 Or j=n Then

  summ=summ+a(i,j)

  End If

  End If

  Next j

  Next i

  Print summ

  End Sub

  過程Command1_Click()的作用是在二維數組a中存放1個m行n列的矩陣;過程Command2 Click()的作用是( )。

  A.計算矩陣外圍一圈元素的累加和

  B.計算矩陣除外圍一圈以外的所有元素的累加和

  C.計算矩陣第1列和最后一列元素的累加和

  D.計算矩陣第1行和最后一行元素的累加和

上一頁  1 2 3 4 5 6 7 8 9 10 11 下一頁

  相關推薦:

  2014年計算機二級C++考試精選試題及答案匯總

  考試吧考后首發2014年3月計算機等考真題及答案通知熱點文章

  考試吧推薦:2014年3月計算機二級考前沖刺備考專題

文章搜索
版權聲明:如果計算機等級考試網所轉載內容不慎侵犯了您的權益,請與我們聯系800@exam8.com,我們將會及時處理。如轉載本計算機等級考試網內容,請注明出處。
Copyright © 2004- 考試吧計算機等級考試網 All Rights Reserved 
中國科學院研究生院權威支持(北京) 電 話:010-62168566 傳 真:010-62192699
主站蜘蛛池模板: 国产精品1024永久免费视频 | 成年片免费网址网站 | 三级黄色在线视频 | 又大又粗又爽的三级小视频 | 精品亚洲成a人在线观看 | 久久久亚洲国产精品主播 | 日韩插插| 亚洲一级高清在线中文字幕 | 羞羞视频官网 | 亚洲视频一区二区在线观看 | 日本欧美中文 | 久久亚洲不卡一区二区 | 女人牲交视频一级毛片 | 天堂资源在线中文 | 免费看欧美一级特黄a大片 免费看欧美一级特黄α大片 | 精品国产一区二区三区不卡在线 | 亚洲无线一二三四区 | 丝袜足控免费网站xx网站 | 国产视频黄色 | 日韩欧美一区二区在线观看 | 亚洲欧洲日本精品 | 男人操女人免费网站 | 日本高清不卡一区久久精品 | 国产97免费视频 | 欧美激情在线播放一区二区三区 | 很黄很色又爽很黄很色又爽 | 日韩在线观看一区二区不卡视频 | 成年看片免费高清观看 | 一卡二卡在线 | 久久亚洲国产成人亚 | 91香蕉视频导航 | 欧美最新的精品videoss | 国产成人一区二区三区在线播放 | 午夜影院一区二区 | 免费看三级黄色片 | 国产免费一级高清淫曰本片 | 国产亚洲午夜精品a一区二区 | 国产成人ae在线观看网站站 | 亚洲综合网国产福利精品一区 | 欧美性色黄在线视 | 一级看片免费视频囗交 |