2009年9月計(jì)算機(jī)等考二級(jí)VB模擬題及解析(13)

　　(10) 下列程序的功能是：將數(shù)據(jù)1，2，…，10寫入順序文件Base.txt中，請(qǐng)?zhí)羁铡?/P>

　　Private Sub Form_Click()

　　Dim i As Integer

　　Open 【11】 As #1

　　For i=1 To 10

　　【12】

　　Next i

　　Close #1

　　End Sub

　　正確答案: 1.("Base.txt" For Output) 2.(Print #1, i)

　　(11) 下面的程序用于根據(jù)文本框Text中輸入的內(nèi)容進(jìn)行以下處理：

　　若Text為1，則打印"您的成績(jī)?yōu)閮?yōu)秀!";若Text為2，則打印"您的成績(jī)?yōu)榱己?"

　　若Text為3，則打印"您的成績(jī)?yōu)橐话?;否則打印"您的成績(jī)一般以下!"，請(qǐng)?zhí)羁铡?/P>

　　Private Sub Command1_Click()

　　Select Case Val(Text1.Text)

　　Case 【13】

　　Print "您的成績(jī)?yōu)閮?yōu)秀!"

　　Case 【14】

　　Print "您的成績(jī)?yōu)榱己?"

　　Case 【15】

　　Print "您的成績(jī)?yōu)橐话?

　　Case Else

　　Print "您的成績(jī)一般以下!"

　　End Select

　　End Sub

　　正確答案: 1.(1) 2.(2) 3.(3)