8、在窗體上畫兩個(gè)文本框（其Name屬性分別為Text1和Text2）和一個(gè)命令按鈕（其Name屬性為Command1），然后編寫如下的事件過程：
   Private Sub Command1_Click()
       X = 0
       Do While x<50
          X = ( x + 2 ) * ( x + 3 )
          N = n+1
       Loop
       Text1.Text = Str(n)
       Text2.Text = Str(x)
   End Sub
   程序執(zhí)行后，單擊命令按鈕，在兩個(gè)文本框中顯示的值分別為__________。
   A)1和0        B)2和72       C)3和50        D)4和168

   9、假定窗體上有一個(gè)標(biāo)簽，名為Lable1。為了使該標(biāo)簽透明并且沒有邊框，則正確的屬性設(shè)置為__________。
   A) Lable1.BackStyle = 0
      Lable1.BorderStyle = 0
   B) Lable1.BackStyle = 1
      Lable1.BorderStyle = 1
   C) Lable1.BackStyle = true
      Lable1.BorderStyle = true
   D) Lable1.BackStyle = Flase
      Lable1.BorderStyle = False

   10、對窗體編寫如下代碼：
   Option Base 1
   Private Sub Form_KeyPress (KeyAscii As Integet)
       A = Array (237,126,87,48,498)
       M1 = a (1)
       M2 = 1
       If KeyAscii = 13 Then
          For  I = 2 To 5
            If a (i)>m1 then
               M1 = a(i)
               M2 = I
            End if
          Next I
       End if
       Print m1
       Print m2
   End Sub
  程序執(zhí)行后，按回車鍵，輸出結(jié)果為
   A)48           B)237            C)498           D)498
      4               1                5               4

二、  填空題
1、設(shè)有如下的Visual Basic表達(dá)式：
   5 * X^2 – 3 * X – 2 – Sin(a) / 3
   它相當(dāng)于代數(shù)式     [1]     。
2、執(zhí)行下面的程序段后，s的值為     [2]      。
   s = 5
   For I 2.6 To 4.9 Step 0.6
   S = S + 1
   Next I
3、為了在運(yùn)行時(shí)把圖形文件picfile.jpg裝入圖片框Picture1，所使用的語句為     [3]     。
4、如果要將某個(gè)菜單項(xiàng)設(shè)計(jì)為分隔線，則該菜單項(xiàng)的標(biāo)題應(yīng)設(shè)置為     [4]      。
5、假定建立一個(gè)工程，該工程包括兩個(gè)窗體，其名稱（Name屬性）分別為Form1和Form2，啟動窗體為Form1。在Form1上畫一個(gè)命令按鈕Command1，程序運(yùn)行后，要求當(dāng)單擊該命令按鈕時(shí)，F(xiàn)orm1窗體消失，顯示窗體Form2，請?jiān)?nbsp;    [5]    和    [6]    處將程序補(bǔ)充完整。
   Private Sub Command1_Click()
         [5]         Form1
      Form2.     [6]    
   End Sub

答案:

公共基礎(chǔ)知識

   一、選擇題

�牐牐�1）D (2)C (3)D (4)B

�牐�二、填空題

�牐�(1)[1]O(Nlog2 N)
�牐�(2)[2]功能模型
�牐�(3)[3]軟件外部功能
�牐�(4)[4]二維表

Visual Basic語言程序設(shè)計(jì)

   一、選擇題

   （1）D     （2）B     （3）B     （4）C     （5）D
   （6）C     （7）C     （8）B     （9）A     （10）C
 
   二、填空題

   （1） [1]     5x2 – 3x – sina/2
   （2） [2]     9
   （3） [3]     Picture1.picture = LoadPicture("picfile.jpg")
   （4） [4]      -
   （5） [5]     Unload
         [6]     Show

上一頁  [1] [2]