版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、下面不是VB工作模式的是(C)
A.設(shè)計(jì)模式B.運(yùn)行模式C.編模匯式D.中斷模式
2、可視化編程的最大優(yōu)點(diǎn)是(C)
A.具有標(biāo)準(zhǔn)工具箱
B.一個(gè)工程文件由若干個(gè)窗體文件組成
C.不需要編寫大量代碼來描述圖形對(duì)象
D.所見即所得
3、下列不能打開屬性窗口的操作是(C)
A.執(zhí)行“視圖”菜單中的“屬性窗口”命令
B.按F4鍵C.按Ctrl+T
D.單擊工具欄上的“屬性窗口”按鈕
4、下列可以打開立即窗口的操作是(D)
A.Ctrl+DB.Ctrl+EC.Ctrl+FD.Ctrl+G
5、VisualBasic的編程機(jī)制是(D)
A.可視化B.面向?qū)ο驝.面向圖形D.事件驅(qū)動(dòng)
1、以F能夠觸發(fā)文本框Change事件的操作是(D)
A.文本框失去焦點(diǎn)B.文本框獲得焦點(diǎn)
C.設(shè)置文本框的焦點(diǎn)D.改變文本框的內(nèi)容
2、應(yīng)用程序設(shè)計(jì)完成后,應(yīng)將程序保存,保存的過程是(D)
A.只保存窗體文件即可
B.只保存工程文件即可
C.先保存工程文件,之后保存窗體文件
D.先保存窗體文件(或標(biāo)準(zhǔn)模塊文件),之后還要保存工程文件
3、VB應(yīng)用程序的運(yùn)行模式是(C)
A.解釋運(yùn)行模式B.編譯運(yùn)行模式C.兩者都有D.匯編模式
4、任何控件都具有的屬性是(C)
A.TEXTB.CAPTIONC.NAMED.FORECOLOR
5、決定控件上文字的字體、字形、大小及效果的屬性是(D)
A.TEXTB.CAPTIONC.NAMED.FONT
6、在窗體上建立了多個(gè)控件,如TEXT、LABEL1,COMMANDI,若要使程序-運(yùn)行
焦點(diǎn)就定位在COMMAND1控件上,應(yīng)將C0MMAND1控件的(B)設(shè)置為0
A.INDEXB.TABINDEXC.TABSTOPD.ENABLED
7、運(yùn)行時(shí),當(dāng)用戶向文本框輸入新的內(nèi)容,或在程序代碼中對(duì)文本框的TEXT屬性進(jìn)
行賦值從而改變了文本框的TEXT屬性值時(shí),將觸發(fā)文本框的(D)事件
A.CLICKB.DBLCLICKC.GOTFOCUSD.CHANGE
8、在運(yùn)行時(shí),按TAB鍵跳過了一個(gè)可以獲得焦點(diǎn)的控件(如文本框),則可能是因?yàn)椋―)
A.該控件的TABSTOP屬性值為TRUEB.該控件的TABINDEX屬性值為FALSE
C.該控件的ENABLED屬性值為TRUED.該控件的ENABLED屬性值為FALSE
9、為了防止用戶隨意將光標(biāo)置于控件上,應(yīng)(D)
A.將控件的TABINDEX屬性設(shè)置為0
B.將控件的TABSTOP屬性設(shè)置為TRUE
C.將控件的TABSTOP屬性設(shè)置為FALSE
D.將控件的ENABLED屬性設(shè)置為FALSE
10、若要使標(biāo)簽控件顯示時(shí),不覆蓋其背景內(nèi)容,應(yīng)設(shè)置標(biāo)簽控件的(D)屬性
A.BACKCOLORB.BORDERSTYLE
C.FORECOLORD.BACKSTYLE
Ik如果要在文本框中輸入字符時(shí),只顯示某個(gè)字符,如星號(hào)(*),運(yùn)行時(shí),在文本框
中輸入的字符仍然顯示出來,而不顯示星號(hào),原因可能是(B)
A.文本框的MULTILINE屬性值為TRUE
B.文本框的LOCKED屬性值為TRUE
C.文本框的MULTILINE屬性值為FALSE
D.文本框的LOCKED屬性為FALSE
12、在運(yùn)行階段,要在文本框TEXT1獲得焦點(diǎn)時(shí)選中文本框中所有內(nèi)容,對(duì)應(yīng)的事件
過程是(A)
A.PrivateSubTextl_GotFocus()
Textl.SelStart=O
Text1,Sellength=Len(Textl.Text)
EndSub
B.PrivateSubTextl_LostFocus()
Textl.SelStart=O
Text1.Sellength=Len(Textl.Text)
EndSub
C.PrivateSubTextl_Change()
Textl.SelStart=O
Text1.Sellength=Len(Text1.Text)
EndSub
D.PrivateSubTextl_SetFocus()
Textl.SelStart=O
Text1.Sellength=Len(Text1.Text)
EndSub
13>VisualBasic繼承了Basic語言簡(jiǎn)單易用的語法特點(diǎn),同時(shí)支持面向?qū)ο蟮木幊虣C(jī)制,
其中構(gòu)成其控件(對(duì)象)的三要素是(D)
A.屬性、事件、事件過程B.控件、窗體、事件
C.屬性、過程、方法D.屬性、事件、方法
14、決定標(biāo)簽(Label)顯示的屬性是(C)
A.TextB.NameC.CaptionD.Alignment
15、命令按鈕的標(biāo)題文字由(B)屬性來設(shè)置。
A.TextB.CaptionC.NameD.(名稱)
16、若要設(shè)置文本的顯示顏色,則可用(B)屬性來實(shí)現(xiàn)。
A.BackColorB.ForecolorC.FillColorD.Backstyle
17、在運(yùn)行時(shí),若要調(diào)用某命令鈕的Click事件過程,則可設(shè)置該命令鈕對(duì)象的(B)屬性
為Ture來實(shí)現(xiàn)。
A.EnabledB.ValueC.DefaultD.Cancel
18、在運(yùn)行時(shí),若要獲得用戶在文本框中所選擇的文本,可通過訪問(D)屬性來實(shí)現(xiàn)。
A.SelStartB.SelLenghtC.TextD.SelText
1、以下哪個(gè)是合法的變量(D)
A.rightB.abc@123C.123_abcD.abl23c
2、下列說法錯(cuò)誤的是(B)
A.在同一模塊不同過程中的變量可以同名
B.不同模塊中定義的全周變量不可以同名
c.引用另一模塊中的全局變量時(shí).,必須在變量名前加模塊名
D.同一模塊中不同級(jí)的變量可以同名
3、把MsgBox的返回值轉(zhuǎn)換為數(shù)值應(yīng)該使用的函數(shù)是(D)
A.LogB.StrC.LenD.Vai
4、語句DIMAA(3,4,5)中定義的數(shù)組有(C)個(gè)元素
A.12B.60C.120D.345
5、下面程序運(yùn)行后輸出的結(jié)果是(B)
A$="CHINA"
B$=STRING$(3,A$)
PRINTB$
END
A.CHIB.CCCC.INAD.AAA
6、以下語句的輸出結(jié)果是(C)
PrintFormat$(32548.5,"000,000.00")
A.32548.5B.325,485.00C.032,548,50D.32,548,50
7、以下敘述中錯(cuò)誤的是(D)
A.如果過程被定義為Static類型,則該過程中的局部變量都是Static類型
B.Sub過程中不能嵌套定義Sub過程
C.Sub過程中可以嵌套調(diào)用Sub過程
D.事件過程可以像通用過程一樣由用戶定義過程名
8、VisualBasic提供的OnErrorResumenext錯(cuò)誤陷阱語句表示(C)
A.當(dāng)發(fā)生錯(cuò)誤忖,使程序轉(zhuǎn)跳到語句標(biāo)號(hào)為0的程序塊
B.當(dāng)發(fā)生錯(cuò)誤時(shí),不使用錯(cuò)誤處理程序塊
C.當(dāng)發(fā)生錯(cuò)誤時(shí),忽略錯(cuò)誤行,繼續(xù)執(zhí)行下一語句
D.當(dāng)發(fā)生錯(cuò)誤時(shí),終止本過程執(zhí)行,繼續(xù)執(zhí)行下一過程
9、在VisualBasic中,若要將控制權(quán)交給操作系統(tǒng)則通過(D)的語句。
A.EndB.ExitDoC.ExitSubD.DoEvents
10、在VisualBasic中語句的續(xù)行號(hào)采用(A)
A.空格與下劃線B.下劃線與空格C.空格與短線D.短線與空格
11、假定有以下程序段:
Fori=lto3
Forj=5to1Step-1
Printi*j
Nextj,i
則語句Printi*j的執(zhí)行次數(shù)是(A)
A.15B..16C.17D.18
12、從健盤上輸入兩個(gè)字符串,分別保存在變量strl、str2中。確定第:個(gè)字符串在第一
個(gè)字符串中起始位置的函數(shù)是(D)
A.LeftB.MidC.StringD.Instr
13、如果將布爾常量值TRUE賦值給一個(gè)整型變量,則整型變量的值為(B)
A.0B.-1C.TRUED.FALSE
14、下列敘述不正確的是(B)
A.注釋語句是非執(zhí)行語句,僅對(duì)程序的內(nèi)容起注釋作用,它不被解釋和編譯
B.注釋語句可以放在代碼中的任何位置
C.注釋語句不能放在續(xù)行符的后面
D.代碼中加入注釋語句的目的是提高程序的可讀性
15、語句PRINT“INT(-13.2)";INT(-13.2)的輸出結(jié)果為(D)
A.INT(-13.2)=-13.2B.INT(-13.2)=13.2
C.INT(-13.2)=-13D.INT(-13.2)=-14
16、如果TAB函數(shù)的參數(shù)小于1,則打印位置在第(B)列
A.0B.1C.2D.3
17、變量未賦值時(shí),數(shù)值型變量的值為(A)
A、0B.空C.1D.無任何值
18、下列語句中正確的是(D)
A.txt1,text+txt2.text=txt3.textB.command1,name=cmdok
C.121abeLcaption=1234D.a=inputbox("hello")
19、假設(shè)變量BOOLVAR是一個(gè)布爾型變量,則下面正確的賦值語句是(D)
A.BOOLVAR=tTRUE,B.BOOLVAR=.TRUE
C.BOOLVAR=#TRUE#D.BOOLVAR=3<4
20、以下()程序段可以實(shí)施X、Y變量值的變換(C)
A.Y=X:X=YB.Z=X:Y=Z:X=Y
C.Z=X:X=Y:Y=ZD.Z=X:W=Y:Y=Z:X=Y
21、語句PRINT“SGN(-26)=";SGN(-26)的輸出結(jié)果為(D)
A.SGN(-26)=26B.SGN(-26)=-26
C.SGN(-26)=+lD.SGN(-26)=-l
22、讀下面程序段,判斷變量Str2的取值是(B)
DimStrl,Str2asString
Str1="University”
Str2=STRING$(3,Strl)
A.UniB.UUU
C.ityD.yyy
23、VB支持自定義數(shù)據(jù)類型,在某程序中我們定義了如下類型:
TypeStudent
numberAsstring
nameAsString
ageAsInteger
EndType
針對(duì)上述定義,如下幾項(xiàng)用法正確的是(B)
A.S="張三"B.DimsAsStudent
s.name="張紅”
C.DimsAsTypeStudentD.DimsAsType
二"張三"二"張三“
24、一個(gè)工程中包含兩個(gè)名稱分別為Forml、Form2的窗體,一個(gè)名稱為mdlFunc的標(biāo)
準(zhǔn)模塊。假定在Forml、Form2和mdlFunc中分別建立了自定義過程,其定義格式為:
Forml中定義的過程:
PrivateSubfrmfunction1()
EndSub
Form2中定義的過程:
PublicSubfrmfunction2()
EndSub
mdlFunc中定義的過程:
PublicSubmdlFunction()
EndSub
在調(diào)用上述過程的程序中,如果不指明窗體或模塊的名稱,則以下敘述中正確的是(B)
A.上述三個(gè)過程都可以在工程中的任何窗體或模塊中直接被調(diào)用
B.只有mdlFunction過程能夠被工程中各個(gè)窗體或模塊直接被調(diào)用
C.frmfunction1只能在forml中調(diào)用,而frmfunction?則可以在所有模塊或窗體中被
直接調(diào)用
D.上述三個(gè)過程都只能在各自被定義的模塊中直接調(diào)用
25、VB中Do……Loop結(jié)構(gòu)既可以構(gòu)成當(dāng)型循環(huán),也可以構(gòu)成直到型循環(huán),根據(jù)下面的
代碼:
Dimi,nasInteger
n=20
i=1
Do
Printi;
i=i+2
LoopUntili>20
判斷循環(huán)結(jié)構(gòu)的類型和循環(huán)體的執(zhí)行次數(shù),正確的選項(xiàng)是(B)
A.當(dāng)型循環(huán),20次B.直到型循環(huán),10次
C.當(dāng)型循環(huán),10次D.直到型循環(huán),20次
26、在程序中,使用InputBox函數(shù)可以接受用戶的輸入,如果要把它的返回值轉(zhuǎn)換為數(shù)
值型的數(shù)據(jù),應(yīng)該使用的函數(shù)是(A)
A.VaiB.Len
C.StrD.Log
27、動(dòng)態(tài)數(shù)組因?yàn)樵诔绦蜻\(yùn)行前無法確定數(shù)組的大小,所以經(jīng)常根據(jù)程序的運(yùn)行情況,
對(duì)數(shù)組進(jìn)行重新定義,以下關(guān)于VB中動(dòng)態(tài)數(shù)組的敘述中不正確的是(B)
A.可以用ReDim語句重新定義動(dòng)態(tài)數(shù)組,并且可以進(jìn)行多次重定義
B.首次用Dim進(jìn)行動(dòng)態(tài)數(shù)組聲明的時(shí)候,必須指明它的類型和上下界
C.Preserve為ReDim語句的可選參數(shù),用于保留動(dòng)態(tài)數(shù)組原來的內(nèi)容
D.當(dāng)對(duì)動(dòng)態(tài)數(shù)組使用Erase語句進(jìn)行釋放操作時(shí),將釋放其內(nèi)存
28、VB中的控件也叫做部件或組件,主要包括三類,以下哪?項(xiàng)不屬于VB控件的分類
(C)
A.控件B.可插入對(duì)象
C.ADO控件D.ActiveX控件
29、表達(dá)式4+5\6*7/8Mod9的值是(B)
A.4B.5C.6D.7
30、可以同時(shí)刪除字符串前導(dǎo)和尾部空白的函數(shù)是(C)
A.LtrimB.RtrimC.TrimD.Mid
1、當(dāng)程序運(yùn)行時(shí),在窗體上單擊鼠標(biāo),以下哪個(gè)事件是窗體不會(huì)接收到()
A.MouseDownB.MouseUpC.LoadD.Click
2、窗體Forml的Name屬性是Frml,它的單擊事件過程名是()
A.Forml_ClickB.Form_ClickC.Frml_ClickD.Me_Click
3、用于設(shè)置通用對(duì)話框控件顯示文件類型的屬性是()
A.FilterB.PathC.ParternD.FoleName
4、用于從內(nèi)存刪除窗體的命令是()
A.MoveB.HideC.UnloadD.Delete
5、用于返回窗體可用區(qū)域?qū)挾鹊膶傩允牵ǎ?/p>
A.ScaleWidthB.ScaleLeftC.ScaleHeightD.ScaleTop
6、下列關(guān)于屬性設(shè)置的敘述錯(cuò)誤的是:()
A.一個(gè)控件具有什么屬性是VB預(yù)先設(shè)計(jì)好的,用戶不能改變
B.一個(gè)控件具有什么屬性是VB預(yù)先設(shè)計(jì)好的,用戶可以改變
C.一個(gè)控件的屬性即可以在屬性窗口中設(shè)置,也可以用程序代碼設(shè)置
D.一個(gè)控件的屬性在屬性窗口中設(shè)置,還可以利用程序代碼為其設(shè)置新值
7、下列說法正確的是()
A.對(duì)象屬性只能在“屬性窗口”中設(shè)置
B.一個(gè)新的工程可以在“工程窗口”中建立
C.必須先建立一個(gè)工程,才能開始設(shè)計(jì)應(yīng)用程序
D.只能在“代碼窗口”中編寫程序代碼
8、下列關(guān)于窗體上控件的基本操作錯(cuò)誤的是()
A.按下?次DEL鍵只能刪除?個(gè)控件
B.按下?次DEL鍵可以同時(shí)刪除多個(gè)控件
C.按住SHIFT鍵,然后單擊每個(gè)要選擇的控件,可以同時(shí)選中多個(gè)控件
D.按住ALT鍵,然后單擊每個(gè)要選擇的控件,可以同時(shí)選中多個(gè)控件
9、下列關(guān)于設(shè)置控件屬性的敘述正確的是()
A.用戶必須設(shè)置屬性值
B.所有的屬性值都可以由用戶隨意設(shè)定
C.屬性值不必一一重新設(shè)置
D.不同控件的屬性項(xiàng)都完全一樣
10、不可以通過下列()操作將焦點(diǎn)賦給對(duì)象
A.運(yùn)行時(shí)使用TAB鍵B.在代碼中用CALL語句調(diào)用
C.在代碼中用SETFOCUS方法D.用訪問鍵或用鼠標(biāo)單擊選擇對(duì)象
11、要在FORM_LOAD事件過程中使用PRINT方法在窗體上輸出一定的內(nèi)容,應(yīng)()
A.設(shè)置窗體的VISIBLE屬性B.設(shè)置窗體的CAPTION
C.調(diào)用窗體的SHOW方法D.設(shè)置窗體ENABLED屬性
12、下面()對(duì)象無CAPTION屬性
A.FORMB.COMMANDBUTTONC.TEXTBOXD.LABEL
13、通用對(duì)話框控件和文件列表框控件中,都能根據(jù)文件的類型對(duì)要顯示的文件進(jìn)行篩
選過濾,后者使用()屬性進(jìn)行該項(xiàng)設(shè)置。
A.PatternB.PathC.FilterD.FileName
14、對(duì)于復(fù)選框控件chkBoy,如果在程序中設(shè)置它為選中狀態(tài),下面語句正確的是()
A.chkBoy.Checked=trueB.chkBoy.Value=true
C.chkBoy.Selected=trueD.chkBoy.Value=1
15、計(jì)時(shí)器(Timer)控件用于每隔一段時(shí)間自動(dòng)觸發(fā)一次Timer事件,可以有規(guī)律地重
復(fù)執(zhí)行一段程序,它用于設(shè)置兩次事件時(shí)間間隔的屬性是()
A.IntervalB.SmallChange
C.LargeChangeD.Max
16、以下關(guān)于VB中窗體(Form)的說法中,不正確的描述為()
A.執(zhí)行UnloadForm語句后,窗體Form消失,但仍在內(nèi)存中
B.當(dāng)窗體的Enabled屬性為False時(shí),通過鼠標(biāo)和鍵盤對(duì)窗體的操作都被禁止
C.窗體的Height、width屬性用于設(shè)置窗體的高和寬
D.窗體的load事件在加載窗體時(shí)發(fā)生
17、關(guān)于滾動(dòng)條控件,下面說法錯(cuò)誤的是()
A.點(diǎn)擊滾動(dòng)條的箭頭,可以改變它的value值,從而引發(fā)Change事件
B.拖動(dòng)滾動(dòng)框,可以觸發(fā)Scroll事件
C.通常,水平滾動(dòng)條的值從左向右遞增,垂直滾動(dòng)條的值自上而下遞增
D.拖動(dòng)滾動(dòng)框,可以觸發(fā)Change事件,而且是連續(xù)觸發(fā)的
18、在窗體上放置一個(gè)命令按鈕,名稱為Commands單擊命令按鈕時(shí),執(zhí)行如下事件
過程:
PriVateSubCommand1_C1ick()
a$="softwareandhardware"
b$=Right(a$,8)
c$=Mid(a$,l,8)
Msgboxa$,b$,c$,l
EndSub
則在彈Hl的信息框的標(biāo)題欄中顯示的信息是()
A.softWareandhardwareB.software
C.hardwafeD.出現(xiàn)錯(cuò)誤
19、在多重窗體程序設(shè)計(jì)中,關(guān)鍵的問題是要解決不同窗體之間的銜接和窗體的顯示、
關(guān)閉等問題,以下關(guān)于窗體的相關(guān)語句和方法的敘述中,錯(cuò)誤的是()
A.Load語句用于加載指定窗體,即在內(nèi)存中創(chuàng)建該窗體
B.Show方法兼具Load語句的功能,可以將窗體顯示出來
C.Hide方法用于將窗體隱藏起來
D.Unload語句用來釋放窗體,但窗體并沒從內(nèi)存中消
20、滾動(dòng)條控件的屬性中,表示取值范圍最大值的屬性是()
A.MaxB.LargeChange
C.MinD.Value
21、程序中如果需要檢測(cè)和控制鼠標(biāo)的位置和狀態(tài)的改變,就需要使用鼠標(biāo)事件,其中
下血哪個(gè)選項(xiàng)用于表示拖動(dòng)事件()
A.DragDropB.MouseDown
C.MouseUpD.MouseMove
22、為了使用通用對(duì)話框進(jìn)行打開文件的操作,應(yīng)將通用對(duì)話框的Action屬性設(shè)定為()。
A.0B.1C.2D.3
1、C2、B3、A4、C5、A6、A7、C8、A9、C10、B11、C
12、C13、A14、D15、A16、A17、D18、D19、D20、A21、C
22、B
填空題一
1當(dāng)用戶單擊滾動(dòng)條的空白處時(shí);滑塊移動(dòng)的增量值山______屬性決定。
Largechange
2當(dāng)用ReDim語句要改變動(dòng)態(tài)數(shù)組的大小時(shí),數(shù)組元素的值會(huì);用關(guān)鍵字
可保留數(shù)組元素原來的值。丟失Preserve
3為了使計(jì)時(shí)器控件Timer1每隔0.5秒觸發(fā)一次Timer事件,應(yīng)將Timerl控件的
屬性設(shè)置為.Interval500
4在用ShowFont方法打開通用對(duì)話框中的字體對(duì)話框前,必須先設(shè)置屬性。數(shù)
值為oAction4
5已知A$="87654321",則表達(dá)式Val(Left$(A$,4)+Mid$(A$,4,2))的值為。
876554
6在剛建立工程時(shí),使窗體上的所有控件具有相同的字體格式,應(yīng)對(duì)的屬
性進(jìn)行設(shè)置。窗體Font
*7專門用來處理文本文件的訪問模式是o順序訪問模式
8在窗體上已建立多個(gè)控件如Text1、Label!,Command1,若要使程序一運(yùn)行焦點(diǎn)就定位
在Commandl控件上,應(yīng)對(duì)Commandl控件設(shè)置____屬性的值為?Tabindex0
9假定有一個(gè)通用對(duì)話框控件CommonDialogl,除了用CommonDialogl.Action=3顯示顏
色對(duì)話框之外,還可以用方法顯示。Showcolor
10在VB中,若要設(shè)定每個(gè)數(shù)組默認(rèn)的下界固定為1,其聲明語句是。
OptionBase1
II表達(dá)式3出血*131)+20產(chǎn)生值的范圍為。20-150
12在過程體、用—方式聲明的局部變量,其值可以保留至下次過程被調(diào)用。Static
13已知a=3.5,b=5.0,c=2.5,d=True,則表達(dá)式:a>=0ANDa+c>b+3ORNOTd的值是
oFalse
14不管是在窗口頂部菜單條上顯示的菜單,還是隱藏的菜單,都可以方法把它們作
為彈出菜單在程序運(yùn)行期間顯示出來。Popupinenu
15表達(dá)式CHR(ASC("A"))的值為。"A"
填空題二
1為了使計(jì)時(shí)器控件Timer1每隔0.5秒觸發(fā)一次Timer事件,應(yīng)將Timerl控件的屬
性設(shè)置為。Interval500
*2VB的模塊分為3類、它們是隨機(jī),順序,二進(jìn)制
*3專門用來處理文本文件的訪問模式是。.txt
4列表框中的和屬性是數(shù)組。listselected
*5"指定文件號(hào)為1.按寫操作的方式打開A:\Myfile.txt,則需要使用代碼Open
"a:\Myfile.txt"forAs#l"input
6在通用對(duì)話框中,用于返回用戶所選的文件名(包括路徑名)的屬性是o
filename
7在文本框中,通過屬性能獲得當(dāng)前插入點(diǎn)所在的位置。seistart
8復(fù)選框?qū)傩栽O(shè)置為2時(shí),變成灰色,禁止用戶選擇。value
9產(chǎn)生一個(gè)"C"?"L”范圍內(nèi)的大寫字符表達(dá)式為。"chr(int(rnd*10+67))
10如果菜單標(biāo)題的某個(gè)字母前輸入一個(gè)符號(hào),那么該字母就成了熱鍵字母;如果在建
立菜單時(shí)在標(biāo)題文本框中輸入一個(gè)"",那么顯示時(shí)形成一個(gè)分隔符。-(減號(hào))
11滾動(dòng)條響應(yīng)的重要事件有和Change。scroll
12取字符變量S中,第5個(gè)字符起的6個(gè)字符的表達(dá)式為。mid(s,5,6)
13不管是在窗口頂部菜單條上顯示的菜單,還是隱藏的菜單,都可以方法把它們作
為彈出菜單在程序運(yùn)行期間顯示出來。通過popupmenu
*14指定文件號(hào)為1,按讀操作的方式打開A:\Myfile.txt,則需要使用代碼Open
"a:\Myfile.txt"forAs#1Inpul
15表達(dá)式CHR(ASC("A"))的值為o"A"
16定時(shí)器控件只有一個(gè)Timer事件,產(chǎn)生Timer事件的兩個(gè)條件為和
oEnabled屬性為True和Interval為非0
17表達(dá)式Int(68.555*100+0.5)/100的值是。68.56
18在窗體上已建立多個(gè)控件如Textl、Label1Command1,若要使程序一運(yùn)行焦點(diǎn)就定位
在Commandl控件匕應(yīng)對(duì)Commandl控件設(shè)置Tabindex屬性的值為。0
錯(cuò)誤!嵌入對(duì)象無效。
(l)combol.additmcomboI.text(2)combo1.listcount-1
(3)val(combo1.list(i)<min(4)1(5)combol.list(i+l)
錯(cuò)誤!嵌入對(duì)象無效。
(l)load(2)loadpicture(3)move
下列程序在程序運(yùn)行時(shí)可在組合框輸入若干個(gè)數(shù)值數(shù)據(jù)(用回車犍添加),單擊“交換”
按鈕,找出組合框內(nèi)最大數(shù)和最小數(shù)所在的位置,并把兩者對(duì)調(diào)。(見圖)
PrivateSubCombo1_KeyPress(KeyAsciiAsInteger)
IfKeyAscii=13Then
U)
EndIf
EndSub
PrivateSubCommandl_ClickQ
Min=W(Combol.List(0))
k=0
Max=W(Combol.List(0))
j=0
Fori=1To⑵
IfW(Combo1.List(i))<MinThen
Min=W(Combol.List(i))
⑶
EndIf
If(4)Then
Max=\&l(Combol.List(i))
j=i
EndIf
Nexti
(5)=Min
Combol.list(k)=max
EndSub
(l)combo1.additemcombo1.text(2)combo1.listcount-1(3)k=i
(4)val(combol.list(i))>max(5)combol.list(j)
下面的程序用于產(chǎn)生20個(gè)[0,99]中的隨機(jī)整數(shù),并將其中
的偶數(shù)打印出來。清在空白處填入相應(yīng)的程序,使之完整。
Privatesubcommandl_click()
Fori=lto20
x=⑴_(tái)_____
Ifx/2=(2)thenprintx
Nexti
Endsub
(l)int(md*100)(2)x\2
在程序中輸出20個(gè)在[10,97]中的隨機(jī)整數(shù)d,每行輸出4個(gè)整數(shù)。
請(qǐng)?jiān)诳瞻滋幪钊胂鄳?yīng)的程序,使之完整。"
Privatesubcommandl_click()^
Fori=lto20。
d=⑴川
printd。
If(2)thenprint。
Next
Endsub"
(l)int(rnd*88+10)(2)imod4=0
以下程序用于計(jì)算N=1+(1+3)+(1+3+5)+…+(1+3+5+…+39)。,
PrivateSubCommandlClick。/
T=0,
M=l^
Sum=0*-'
Dov
T=T+(1)
Sum=Sum+(2),
M=M+2”
LoopWhile(3)+,
Print"Sum=Sum。
d
EndSub。
.?
(l)m(2)t(3)m<40
下面的程序的功能是找出一個(gè)最小整數(shù),其被13、23、33整
除后余數(shù)分別為1、2、3,清在空白處填入相應(yīng)的程序,使之完整。
Privatesubcommandl_click()
DimIasinteger,flagasinteger
1=35
Flag=l
Do
1=1+1
IfImod13=1andQJthen
printI
flag=0
Endif
Loopwhileflag=l
Endsub
(1)Imod23=2andImod33=3
本程序的功能是用于判斷輸入的正整數(shù)是否為升序數(shù)。使用輸入對(duì)話框輸入數(shù)據(jù),判斷
結(jié)果顯示在標(biāo)簽框Lablel中□超格2.5分)
設(shè)正整數(shù)n=did2",如果diWdi+i(i=l,2,....,m-l)>則n是一個(gè)升序數(shù)(即右邊
的數(shù)字大于等于左邊的敬字),如:1269,448是升序數(shù),而2485不是升序數(shù)。
PrivateSubForm_Click(;
DimnAsString,flagAsBoolean
n=(1)(畸輸入正整數(shù):")
flag=(2)
Fori=1ToLen(n)-11Len(n)測(cè)試字符串長(zhǎng)度
IfMid(n,i,1)>(3)Then
flag=False
(4)'退出
EndIf
Nexti
If(5)Then
Label1,Caption=n&11是升序數(shù)"
Else
Label1,Caption=n&"不是升序數(shù)"
EndIf
EndSub
(l)inputbox⑵true(3)mid(n,i+l,l)(4)exitfor(5)flag
以下程序在文本框Textl中輸入任一字符串,并按相反的次序顯示在Text2中。,
PrivateSubCommandlClick。3
DimnAsString,cAsString,dAsStrings
n=Textl.Text4-1
m=(1)/
Fori=tnTo1step-1
c=hdid6i,i,1)*-,
d=d&(2),
NextW
(3)=d-
EndSub。
(I)len(n)(2)c(3)textl
下面程序按每行1。個(gè)數(shù)打印出30
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 生物實(shí)踐教學(xué)反饋機(jī)制計(jì)劃
- 小班親密關(guān)系與信任建立工作計(jì)劃
- 制定有效的投資預(yù)算方案計(jì)劃
- 教學(xué)理念與實(shí)踐反思計(jì)劃
- 典雅酒店客房租賃合同三篇
- 特殊教育需求學(xué)生的支持策略計(jì)劃
- +Unit+2+Hobbies+pronunciation++周測(cè)卷 譯林版(2024)七年級(jí)英語上冊(cè)
- 2024-2030年中國(guó)門戶網(wǎng)站行業(yè)投資趨勢(shì)以及可行性分析研究報(bào)告
- 2024-2030年中國(guó)銀礦石市場(chǎng)供需格局與競(jìng)爭(zhēng)格局分析研究報(bào)告
- 煙草公司合同模板
- 班級(jí)環(huán)境美化的具體措施計(jì)劃
- 2024年高等教育自學(xué)考試自考《英語二》試卷及解答參考
- 2025年高考語文一輪復(fù)習(xí)文言文實(shí)詞專練:課內(nèi)文言實(shí)詞遷移訓(xùn)練(三)
- 期中(1至2單元)作業(yè)題(試題)-2024-2025學(xué)年一年級(jí)上冊(cè)數(shù)學(xué)青島版
- 牛津譯林版英語2024七年級(jí)上冊(cè)全冊(cè)單元知識(shí)清單(默寫版)
- 北師大版數(shù)學(xué)七年級(jí)上冊(cè)單元試卷【全冊(cè)合集】
- 《新質(zhì)生產(chǎn)力:發(fā)展新動(dòng)能》筆記
- 小學(xué)生誠(chéng)信教育主題班會(huì) 誠(chéng)信伴我行守護(hù)真善美 課件
- 《8和9的加減法》(省一等獎(jiǎng))課件
- 《人像攝影》PPT課件(完整版)
- 有毒有害氣體應(yīng)急預(yù)案;
評(píng)論
0/150
提交評(píng)論