離線考核《VB程序設計(高起專)》滿分100分一、填空題(每空2分,共20分。)1.語句Print Int(12345.6789*100+0.5)/100的輸出結果是: __________。2. 在

可做奧鵬全部院校在線離線作業(yè)畢業(yè)論文QQ:3230981406 微信:aopopenfd777

發(fā)布時間:2020-04-17 00:22:21來源:admin瀏覽: 89 次

離線考核
《VB程序設計(高起專)》
滿分100分
一、填空題(每空2分,共20分。)
1.語句Print Int(12345.6789*100+0.5)/100的輸出結果是: __________。
2. 在窗體上畫一個文本框和一個圖片框,然后編寫如下兩個事件過程:
  Private Sub Form_Click()  
          Text1.Text = "VB程序設計"  
  End Sub
  Private Sub Text1_Change()  
          Picture1.Print "VB Programming"  
  End Sub
  程序運行后,單擊窗體,在文本框中顯示的內容是_________________ ,而在圖片框中顯示的內容是_________________   。

3.在窗體上畫一個文本框,名稱為Text1,然后編寫如下程序:
Private Sub Form_Load_()
Open "d:\temp\dat.txt" _________________
Text1.Text=""
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
_________________        
Close #1
End
Else
_________________  
Text1.Text=""
End If
End Sub
以上程序的功能是:在D 盤temp 文件夾下建立一個名為dat.txt 的文件,在文本框中輸入字符,每次按回車鍵都把當前文本框中的內容寫入文件dat.txt,并清除文本框中的內容:如果輸入“END”,則不寫入文件,直接結束程序。請?zhí)羁铡?br/>
4.某人編寫下列函數(shù)來判斷a 是否為素數(shù),若是,則函數(shù)返回True;否則返回False。
Function prime(a As Integer)As Boolean
Dim k As Integer,isprime As Boolean
If a<2 Then
Isprime = False
Else
Isprime = True
k=2
Do While k<a/2 And isprime
If a Mod k=0 Then
isprime=False
Else
k=k+1
End If
Loop
End If
prime=isprime
End Function
在測試時發(fā)現(xiàn)有1 個非素數(shù)也被判斷為素數(shù),這個錯判的數(shù)是 _________________  。


5.下列程序的功能是把文件filel.txt 中重復字符去掉后(即若有多個字符相同,則只保留1 個)寫入文件file2.txt。請?zhí)羁铡?br/>Private Sub Command1_Click( )
Dim inchar As String, temp As String, outchar As String
outchar=""
Open "file1.txt" For Input As #1
Open "file2.txt" For Output As #2
_________________         
inchar=Input$(n,1)
For k=1 To n
temp=Mid(inchar,k,1)
If InStr(outchar,temp)= _________________    Then
outchar=outchar & temp
End If
Next k
Print #2, _________________   
Close #2
Close #1
End Sub

二、判斷題(正確的用“T”表示,錯誤的用“F”表示。每小題2分,共20分。)
(     )1. 可獲得字符 ASCII 碼值的函數(shù)為 Chr( )。
(     )2. 靜態(tài)變量只能在過程中定義而不能在通用聲明段中定義。
(     )3. 命令按鈕 Command1 的單擊事件代碼如下:
Private  Sub  Command1_Click()
Dim  I  As  Integer
I=I+1
End  Sub
單擊按鈕 3 次,I 的值為 3。
(     )4. 一個符號常量可以賦同一類型的不同值。
(     )5. InputBox 函數(shù)可以不帶參數(shù)調用,而 MsgBox 函數(shù)則要求至少帶一個參數(shù)調用。
(     )6. LoadPicture 是 VB 的一個函數(shù),用于將指定的圖片文件調入內存。
(     )7. 各種控件的所有屬性都可以在設計模式下通過屬性窗口設置,也都可以在運行模式下通過程序語句進行賦值。
(     )8. Input#  語句是從文件中讀取數(shù)據項, Line Input#  讀取的是文件中的一行,而 InputBox 函數(shù)要求從鍵盤輸入數(shù)據。
(     )9. 用菜單編輯器設計菜單時,  頂層菜單不能加快捷鍵,但可以在菜單標題中的字母前插入“&”符號來設置熱鍵。
(     )10.定時器控件的時間間隔設為 0 或 Enabled 屬性設為 False都將停止觸發(fā) Timer 事件。
三、編程題(每小題30分,共60分。)
1. 在名稱為Form1 的窗體上畫一個文本框,其名稱為Text1,在屬性窗口中把文本框的MultiLine屬性設置為True,編寫事件過程實現(xiàn)單擊窗體時把磁盤文件smtext1.txt 的內容讀到內存并在文本框中顯示出來,然后把該文本框中的內容存入磁盤文件smtext2.txt。(文件位置在D盤的test文件夾里)。
2. 已知登錄界面,由兩個標簽( Label1、Labe12 )和兩個文本框 (txtName 、 txt Password )以及兩個按鈕(cmdExit、cmdOk) 組成。其中,口令文本框 (txtPassword )的 PasswordChar 屬性已經設置為“*”,運行時要求輸入姓名和密碼,單擊cmdExit按鈕退出程序,單擊cmdOk按鈕則判斷在兩個文本框中輸入的內容是否為“Guest”和“12345”,是則彈出消息框,顯示“歡迎使用本系統(tǒng)!”,并將1!+2!+3!+…+10!的值作為窗體(Form1)的標題顯示;否則顯示“對不起,你不是本系統(tǒng)用戶!”,寫出相應的事件過程。

作業(yè)咨詢 論文咨詢
微信客服掃一掃

回到頂部