VB第三章課后習(xí)題答案(20210110133743)_第1頁(yè)
VB第三章課后習(xí)題答案(20210110133743)_第2頁(yè)
VB第三章課后習(xí)題答案(20210110133743)_第3頁(yè)
VB第三章課后習(xí)題答案(20210110133743)_第4頁(yè)
VB第三章課后習(xí)題答案(20210110133743)_第5頁(yè)
免費(fèi)預(yù)覽已結(jié)束,剩余1頁(yè)可下載查看

下載本文檔

版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡(jiǎn)介

1、 、單項(xiàng)選擇題 1、 設(shè)x=4,y=6,則以下不能在窗體上顯示出“ A=10得語(yǔ)句就是() A、PrintA=x+yB、PrintA=;x+y C、Prin tA=+Str(x+y)D、Prin tA= b=4 PRINT b v a END 運(yùn)行后,輸出得結(jié)果就是 A、4 3 ( ) B、-1 C、 0 D、 顯示出 錯(cuò)信息 4、在窗體(名稱為Form1)上畫(huà)一個(gè)名稱為 Text1得文本框與一個(gè)名稱為 mand1得命令 按鈕,然后編寫(xiě)一個(gè)事件過(guò)程。程序運(yùn)行以后,如果在文本框中輸入一個(gè)字符,則把命 令按鈕得標(biāo)題設(shè)置為“計(jì)算機(jī)等級(jí)考試”。以下能實(shí)現(xiàn)上述操作得事件過(guò)程就是 A、 Private S

2、ub Text1_Cha nge() B、Private Sub man d1_Click() mand1、Caption= ”計(jì)算機(jī)等級(jí)考試” Capti on= ”計(jì)算機(jī)等級(jí)考試” End Sub End Sub C、Private Sub Form1_Click() D 、 Private Sub mand1_Click() Text1 、Caption= ”計(jì)算機(jī)等級(jí)考試”Text1 、Text= ”計(jì)算機(jī)等級(jí)考試” End Sub End Sub 5、假定有如下得窗體事件過(guò)程 : Private Sub Form_Click() a$ = Microsoft Visual Basic

3、 b$ = Right(a$, 5) c = Mid(a$, 1, 9) MsgBox a$, 34, b$, c$, 5 End Sub 程序運(yùn)行后單擊窗體 ,則在彈出得信息框中得標(biāo)題欄中顯示得信息就是( ) A、 Microsoft Visual B 、 Microsoft C、 Basic D 、 5 6、窗體上放置了三個(gè)文本框 ,若在 Text1 中輸入 456,在 Text2 中輸入 78,在程序中執(zhí)行了 語(yǔ)句 Text3=Text1+Text2 后 ,則在 Text3 中顯示 ( ) A、 434 B 、 45678 C、 溢出 D、 語(yǔ)法錯(cuò)誤 7、執(zhí)行下面得程序 ,單擊窗體 ,則

4、在窗體上顯示得就是 ()。 Option Explicit Private Sub Form_Click() Dim a As Integer, b As Integer, c As Integer b = 6: c = 6 、 5 a = b = c Print a End Sub A 、 1B、 -1C、 0D、 語(yǔ)法錯(cuò)誤 說(shuō)明 : False- 0 True -1 8、語(yǔ)句 PRINT “INT(-13 、2)=”;INT(-13 、2) 得輸出結(jié)果為 : A、 INT(-13 、2)= -13 、2 B 、 INT(-13 、2)= 13 、2 C、 INT(-13 、2)= -13D

5、、 INT(-13 、2)= -14 、填空題 1、在窗體上畫(huà)一個(gè)命令按鈕 ,然后編寫(xiě)如下事件過(guò)程 Private Sub mand1_Click() a = lnputBox(請(qǐng)輸入一個(gè)整數(shù)”) b = InputBox(請(qǐng)輸入一個(gè)整數(shù)”) Print a + b End Sub 程序運(yùn)行后,單擊命令按鈕,在輸入對(duì)話框中分別輸入321與456,輸出結(jié)果為_(kāi)321456 2、 執(zhí)行下面得程序段后,b得值為300 。 a=300 b=20 a=a+b b=a-b a=a-b 3、 在窗體上畫(huà)一個(gè)文本框與一個(gè)圖片框,然后編寫(xiě)如下兩個(gè)事件過(guò)程: Private Sub Form_Click() Te

6、xt1、Text = VB 程序設(shè)計(jì) End Sub Private Sub Text1_Change() Picture1、Print VB Programming End Sub 程序運(yùn)行后,單擊窗體,在文本框中顯示得內(nèi)容就是VB程序設(shè)計(jì),而在圖片框中顯示 得內(nèi)容就是 VB Programming 。 4、 在窗體上畫(huà)一個(gè)文本框,然后編寫(xiě)如下事件過(guò)程: Private Sub Form_Click() x = InputBox(請(qǐng)輸入一個(gè)整數(shù)”) Print x + Text1、Text End Sub 程序運(yùn)行時(shí),在文本框中輸入456,然后單擊窗體,在輸入對(duì)話框中輸入123,單擊確定”

7、按鈕后,則在窗體上顯示得內(nèi)容就是 123456 。 5、 如果在立即窗口中執(zhí)行以下操作: a = 8 (vCR就是回車鍵,下同) b = 9 Print a b 則輸出結(jié)果就是 False 。 6、在窗體上畫(huà)一個(gè)名稱為mand1得命令按鈕與三個(gè)名稱分別為L(zhǎng)abell、Label2、Label3 得標(biāo)簽,然后編寫(xiě)如下代碼: Private x As Integer N=10 Private Sub mand1_Click() Z=10+0=10 Y=0+10=10 Static y As Integer X=0+10=10 Dim z As Integer N=10 n = 10 Z=10+0=

8、10 z = n + z Y=10+10=20 X=10+10=20 y = y + z x = x + z N=10 Z=10+0=10 Label1、Caption = x Y=20+10=30 Label2、Caption = y X=20+10=30 Label3、Caption = z End Sub 運(yùn)行程序,連續(xù)三次單擊命令按鈕后,則三個(gè)標(biāo)簽中顯示得內(nèi)容分別就是30 30 10。 7、若在一個(gè)應(yīng)用程序窗體上,依次創(chuàng)建了 mandButton、TextBox、 Label等控件,則運(yùn)行 該程序顯示窗體時(shí),mandButton會(huì)首先獲得焦點(diǎn)。 &在窗體上畫(huà)一個(gè)名稱為mand1得命令按

9、鈕,然后編寫(xiě)如下事件過(guò)程: Private Sub ma nd1_Click() a$=VisualBasic Print String(3,a$) End Sub 程序運(yùn)行后,單擊命令按鈕,在窗體上顯示得內(nèi)容就是VVV 。 9、輸入下列程序 Private Sub mand1_Click() Text1 、Text= ” 努力” End Sub Private Sub mand2_Click() Textl、Text= ” 學(xué)習(xí)” End Sub 單擊mand2按鈕,又單擊mand1按鈕,在文本框中顯示 努力_ _ 。 10、要使Print方法在Form_Load()事件過(guò)程中有效,必須將_窗體得Visible 屬性設(shè)置為True,或者

溫馨提示

  • 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
  • 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ì)自己和他人造成任何形式的傷害或損失。

最新文檔

評(píng)論

0/150

提交評(píng)論