2007Äê9Ô¼ÆËã»ú¶þ¼¶VBÄ£ÄâÊÔÌâ(5)¼°´ð°¸

(21) ÒÔÏÂÊôÓÚVisual BasicºÏ·¨µÄÊý×éÔªËØÊÇ
A) x8       
B) x£Û8£Ý
      C) s(0)       
      D) v£Û8£Ý
 ÕýÈ·´ð°¸:  C

(22) ±àдÈçÏÂÁ½¸öʼþ¹ý³Ì£º
Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)
 Print Chr(KeyCode)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
 Print Chr(KeyAscii)
End Sub
ÔÚÒ»°ãÇé¿öÏÂ(¼´²»°´×¡Shift¼üºÍËø¶¨´óд¼üʱ) ÔËÐгÌÐò£¬Èç¹û°´"A"¼ü£¬Ôò³ÌÐòÊä³öµÄ½á¹ûÊÇ

A)  A        
     a
B)  a
            A        
C) A        
            A         
      D)  a
           a
ÕýÈ·´ð°¸:  C

(23) Ҫʹ²Ëµ¥ÏîMenuOneÔÚ³ÌÐòÔËÐÐʱʧЧ£¬Ê¹ÓõÄÓï¾äÊÇ
A) MenuOne.Visible=True   
B) MenuOne.Visible=False
C) MenuOne.Enabled=True   
D) MenuOne.Enabled=False
ÕýÈ·´ð°¸:  D

(24) ÔÚ´°ÌåÉϽ¨Á¢Í¨ÓöԻ°¿òÐèÒªÌí¼ÓµÄ¿Ø¼þÊÇ
A) Data¿Ø¼þ      
B) From¿Ø¼þ
      C) CommonDialog¿Ø¼þ    
    D) VBComboBox¿Ø¼þ
ÕýÈ·´ð°¸:  C

(25) ÔÚVisual BasicÖУ¬Òª½«Ò»¸ö´°Ìå¼ÓÔص½ÄÚ´æ½øÐÐÔ¤´¦Àíµ«²»ÏÔʾ£¬Ó¦Ê¹ÓõÄÓï¾äÊÇ
A) Load       
B) Show
C) Hide       
D) Unload
ÕýÈ·´ð°¸:  A

(26) ÔËÐÐÏÂÁгÌÐò¶Îºó£¬ÏÔʾµÄ½á¹ûΪ
J1=23
J2=32
If J1<J2 Then Print J2 Else Print J1
A) 23     
B) 32
C) 55     
D) 2332
ÕýÈ·´ð°¸:  B

(27) ÏÂÁÐÓï¾äÕýÈ·µÄÊÇ
A) If A¡ÙB Then Print "A²»µÈÓÚB"
B) If A<>B Then Printf "A²»µÈÓÚB"
C) If A<>B Then Print "A²»µÈÓÚB"
D) If A¡ÙB Print "A²»µÈÓÚB"
ÕýÈ·´ð°¸:  C

(28) ÏÂÃæÓï¾äÕýÈ·µÄÊÇ
A) If x<3ª³y And x>y Then y=x^3
B) If x<3ª³y And x>y Then y=3x
C) If x<3ª³y:x>y Then y=x^3
D) If x<3ª³y And x>y Then y=x* *3
ÕýÈ·´ð°¸:  A

(29) ¼ÆËãzµÄÖµ£¬µ±x´óÓÚyʱ£¬z=x£»·ñÔòz=y¡£ÏÂÁÐÓï¾ä´íÎóµÄÊÇ
A) If x>=y Then z=x : z=y   
B) If x>=y Then z=x Else z=y
C) z=y : If x>=y Then z=x   
D) If x<=y Then z=y Else z=x
ÕýÈ·´ð°¸:  A

(30) ÏÂÁгÌÐò¶ÎÖ´Ðнá¹ûΪ
x=5
y=-6
If Not x>0 Then x=y-3 Else y=x+3
Print x-y; y-x
A) -3 3       
B) 5 -9
C) 3 -3       
D) -6 5
ÕýÈ·´ð°¸:  A