Ê¡¶þ¼¶¿¼ÊÔVBÊÔÌâ»ã×Ü
Ê¡¶þ¼¶¿¼ÊÔVBÊÔÌâ»ã×Ü
£¨2006Äê6Ô£©
ǰÑÔ£º±¾¸¨µ¼×ÊÁÏÖ÷ÒªÔÚÓÚ½éÉÜÊ¡¶þ¼¶¿¼ÊԵĻù±¾ÌâÐͺͻù±¾¿¼µã£¬ËùÒÔ½¨Òé´ó¼ÒÔÚµÚÒ»±é¿´±¾×ÊÁÏʱ£¬Ó¦ÈÏÕæ×öºÃÿһÌ⣬ÔÚÓöµ½²»»á»ò²»¶®µÄÌâʱ£¬Á¢¼´µ½¿Î±¾ÖÐÕÒ±¾ÌâÏà¹ØµÄ֪ʶµã²¢Åª¶®ÕâЩ֪ʶµã£¬È»ºóÔÙÀ´·ÖÎö´ËÌ⣬ÒÔ´ïµ½¶Ô¿¼µã¸÷¸÷»÷ÆÆµÄÄ¿µÄ£¬Èç´ËÏÂÈ¥±ã¿ÉÕÆÎÕÊ¡¶þ¼¶¿¼ÊԵļ¸ºõËùÓп¼µã£¬´Ó¶ø¿ÉÒÔÓ¦¸¶Ç§±äÍò»¯µÄ¿¼ÌâÁË¡£±¾×ÊÁÏÄڵĿ¼ÌâÖ»ÊÇ¿¼ÊÔÌâ¿âÖеÄһС²¿·Ö¶øÒÑ£¬Çв»¿ÉÖ»×ö³ö±¾×ÊÁÏÄÚ¸÷ÌâµÄ´ð°¸£¬¶øÃ»ÕÆÎÕÆä¿¼µã֪ʶ£¬Õ⽫»áµ¼Öºó»Úμ°µÄºó¹û¡£´ËÍ⣬½¨Òé´ó¼ÒÔÚÕÆÎÕ¿¼ÊÔÌâÐͺͿ¼µãºó£¬Ó¦ÉÏ»úʵ¼Ê²Ù×÷£¬ÓÈÆä¶ÔÓÚÄÜÁ¦²âÊÔÌâ¸üÓ¦ÒÑÉÏ»úÁ·Ï°ÎªÖ÷£¬ÕÆÎÕ×öÌâ²½ÖèºÍ»ù±¾¼¼ÇÉ£¬·½¿ÉÈ¡µÃÀíÏëµÄ³É¼¨¡£×îºóԤף´ó¼ÒÔÚÊ¡¶þ¼¶¿¼ÊÔÖÐÈ¡µÃÓÅÒìµÄ³É¼¨£¡
µÚÒ»²¿·Ö ֪ʶ²âÊÔÌâ
Ò»¡¢Ñ¡ÔñÌ⣨ÿÌ×ÊÔ¾íÓÐ20¸öÑ¡ÔñÌ⣬ÿÌâ1·Ö£©
1 ÒÔÏÂ4ÖÖÃèÊöÖУ¬´íÎóµÄÊÇ_______¡£ D A. ³£Á¿ÔÚ³ÌÐòÖ´ÐÐÆÚ¼äÆäÖµ²»»á·¢Éú¸Ä±ä
B. ¸ù¾ÝÊý¾ÝÀàÐͲ»Í¬£¬³£Á¿¿É·ÖΪ×Ö·ûÐͳ£Á¿ ¡¢ÊýÖµ³£Á¿¡¢ÈÕÆÚ/ʱ¼äÐͳ£Á¿ºÍ²¼¶ûÐͳ£Á¿ C. ·ûºÅ³£Á¿ÊÇÓÃÒ»¸ö±êʶ·ûÀ´´ú±íÒ»¸ö³£Êý£¬ºÃÏóÊÇΪ³£Êýȡһ¸öÃû×Ö£¬µ«ÈÔ±£³Ö³£ÊýµÄÐÔÖÊ D. ·ûºÅ³£Á¿µÄʹÓúͱäÁ¿µÄʹÓÃûÓвî±ð 2 ÏÂÃæºÏ·¨µÄ³£Á¿ÊÇ_______¡£ D
A. 1/2 B. 'abcd' C. 1.2*5 D. False
3 Visual BasicÖпÉÒÔÓÃÀàÐÍ˵Ã÷·ûÀ´±êʶ±äÁ¿µÄÀàÐÍ£¬ÆäÖбíʾ»õ±ÒÐ͵ÄÊÇ_______C A. %£¨ÕûÐÍ£» & ³¤ÕûÐÍ£© B. #£¨Ë«¾«¶È£»£¡µ¥¾«¶È£© C. @ D. $£¨×Ö·û´®ÐÍ£© 4 ÒÔϹؼü×ÖÖУ¬²»Äܶ¨Òå±äÁ¿µÄÊÇ_______¡£ A
A. Declare B. Dim C. Public D. Private 5 ÓÃÊ®Áù½øÖƱíʾVisual BasicµÄÕûÐͳ£Êýʱ£¬Ç°ÃæÒª¼ÓÉϵķûºÅÊÇ_______¡£ A
A) &H£¨hex£© B) &O(8;oct)(&D Ê®½øÖÆ;&B ¶þ½øÖÆ) C) H D) O 6 Visual BasicÈÕÆÚ³£Á¿µÄ¶¨½ç·ûÊÇ_______¡£ A
A. ## B.¡®¡¯ C. () D. {} 7 Êýѧ¹ØÏµ3¡Üx<10±íʾ³ÉÕýÈ·µÄVB±í´ïʽΪ_______¡£ B A. 3<=x<10 B. 3<=x AND x<10 C. x>=3 OR x<10 D. 3<=x AND <10
8 \\£¬/£¬Mod£¬*ËĸöËãÊõÔËËã·ûÖУ¬ÓÅÏȼ¶±ð×îµÍµÄÊÇ_______¡£ C £¨Óɸߵ½µÍ£º^£¬ -£¬ * ºÍ/ £¬\\£¬ mod£¬ +ºÍ -£»º¯Êý£¬ËãÊõ£¬×Ö·û£¬¹ØÏµ£¬Âß¼£¨not,and ,or,xor£©£©
A. \\ B. / C. Mod D. * 9 ÏÂÃæÓï¾äÖÐÓзǷ¨µ÷ÓõÄÊÇ_______¡£ C
A. x=SGN(-1) B. x=FIX(-1) (sgn:ÅжÏÕý¸ººÅ£»sqr:ƽ·½¸ù£»chr:ÕÒ³ö¶ÔÓ¦AscallÂë C. x=SQR(-1) D. x$=CHR$(65) µÄ×Ö·û)
10 ±í´ïʽ23/5.8¡¢23\\5.8¡¢23 Mod 5.8µÄÔËËã½á¹û·Ö±ðÊÇ_______¡£ B A. 3¡¢3.9655¡¢3 B. 3.9655¡¢3¡¢5 C. 4¡¢4¡¢5 D. 3.9655¡¢4¡¢3
11 Èç¹û±äÁ¿ a=2¡¢b=\¡¢c=\¡¢d=5£¬Ôò±í´ïʽ a
µÚ 1 Ò³ ¹² 50 Ò³
Ê¡¶þ¼¶¿¼ÊÔVBÊÔÌâ»ã×Ü
A) x=1¡Ãy=1¡Ãz=1 B) x=1,y=1,z=1 C) x=y=z=1 D) xyz=1
13 ÒÔÏÂ4ÀàÔËËã·û£¬ÓÅÏȼ¶×îµÍµÄÊÇ_______¡£ D
A. ËãÊõÔËËã·û B. ×Ö·ûÔËËã·û C. ¹ØÏµÔËËã·û D. Âß¼ÔËËã·û 14 ÒÑÖªa=\£¬Ôò±í´ïʽLeft(a, 4) +Mid(a, 4, 2)µÄÖµÊÇ_______¡£B A) 123456 B) \ 15 ÉèÓÐÈçϵļǼÀàÐÍ
Type Student number As String name As String age As Integer End Type
ÔòÕýÈ·ÒýÓøüǼÀàÐͱäÁ¿µÄ´úÂëÊÇ_______¡£ B
A. Student.name=\Õźì\ B. Dim s As Student
s.name=\Õźì\
C. Dim s As Type Stuent D. Dim s As Type s.name=\Õźì\Õźì\
16 ÏÂÁгÌÐòÔËÐÐʱ£¬´Ó¼üÅÌÊäÈë×Ö·û\£¬ÔòÊä³ö½á¹ûÊÇ_______¡£ A
Private Sub Form_Click() op$=InputBox(\ If op$=\
If op$=\(aĬÈÏΪ0) Print a End Sub
A. -2 B. 0 C. +2 D. +0 17 ÏÂÁгÌÐò¶ÎµÄÔËÐнá¹ûΪ_______¡£ B
For i=3 To 1 Step -1 Print Space(5-i); For j=1 To 2*i-1 Print \ Next j Print Next i
A. * B.***** C. ***** D. ***** *** *** *** *** ***** * * * 18 Ö´ÐÐ PRINT 18/2*3,-3^2 ÃüÁîºó£¬Êä³ö½á¹ûΪ_______¡£ C A. 3 9 B. 3-9
C. 27 -9 D. -9 27 19 Ö´ÐÐ PRINT 9.4\\3.7,9.4 MOD 3.7 ÃüÁîºó£¬Êä³ö A ½á¹ûΪ_______¡£
A. 2 1 B. 3 0 C. 2 20 D. 1 2 20 ÔËÐÐÒÔϳÌÐòºó£¬Êä³ö½á¹ûΪ_______¡£ C
x%=1/4
y%=11/4 PRINT x%;y%
µÚ 2 Ò³ ¹² 50 Ò³
Ê¡¶þ¼¶¿¼ÊÔVBÊÔÌâ»ã×Ü
END A. 0.25 0.75 B. 0 2 C. 0 3 D. 1 3 21 ´°ÌåÀïÓÐÁ½¸ö¶ÔÏ󣬷ֱðÊÇͼƬ¿òPicture1ºÍ±êÇ©Label1¡£ÄÇôÏÂÃæ¹ØÓÚPrint·½·¨µÄʹÓÃÖУ¬´íÎóµÄÒ»ÌõÊÇ_______¡£ D
A. Picture1.Print 147 B. Print 147
C. Printer£¨´òÓ¡»ú£©.Print 147 D. Label1.Print 147
22 ÏÂÃæµÄ_______Óï¾ä¿ÉÒÔʵÏÖ£ºÏÈÔÚ´°ÌåÉÏÊä³ö´óд×ÖĸA£¬È»ºóÔÚͬһÐеĵÚ10ÁÐÊä³öСд×Öĸb¡£ B
A. Print \ B. Print \ £¨spc(n):Êä³öÏÂÒ»¸ö±í´ï C. Print \ʽ֮ǰ²åÈën¸ö¿Õ¸ñ£© 23 ÔĶÁÏÂÃæµÄ³ÌÐò¶Î£º
n1=InputBox(\ÇëÊäÈëµÚÒ»¸öÊý£º\n2=InputBox(\ÇëÊäÈëµÚ¶þ¸öÊý£º\Print n1+n2
µ±ÊäÈë·Ö±ðΪ111ºÍ222ʱ£¬³ÌÐòÊä³öΪ______¡£ A
A. 111222 B. 222 C. 333 D. ³ÌÐò³ö´í
24 Óï¾äPrint Format (\ µÄÊä³ö½á¹ûÊÇ_______¡£ B £¨>ÔòÊǽ«Ð¡Ð´×ª±äΪ´ó A. HELLO B. hello C. He D. he д£© 25 Óï¾ä Print (a=2) And (b=-2) µÄÊä³ö½á¹ûÊÇ_______¡£ D £¨±äÁ¿a,b ¾ù䶨Ò壩 A. True B. ½á¹û²»È·¶¨ C. -1 D. False 26 ÒÔϳÌÐò¶ÎÔËÐкó£¬Êä³ö×Ö·ûµÄÅÅÁÐ˳ÐòÊÇ_______¡£ D
For i=1 To 6
If i Mod 2=0 Then Print \ Else Print \ End If
Next i
A. #*#*# B. ##### C. ***** D. *#*#*# 27 ÓÃMSGBOXº¯ÊýÏÔʾµÄ¶Ô»°¿ò£¬ÒÔÏÂÐðÊöÕýÈ·µÄÊÇ_______¡£ D
A) ¸Ã¶Ô»°¿òÓÐÒ»¸ö¡°È·¶¨¡±°´Å¥ B) ¸Ã¶Ô»°¿òÓС°ÊÇ¡±£¬¡°·ñ¡±Á½¸ö°´Å¥ C) ¸Ã¶Ô»°¿òÓС°ÊÇ¡±£¬¡°·ñ¡±£¬¡°È¡Ïû¡±Èý¸ö°´Å¥
D) ¸Ã¶Ô»°¿òͨ¹ýÑ¡Ôñ²ÎÊý¿ÉÒԵõ½ÒÔÉϲ»Í¬µÄµÄ°´Å¥×éºÏ 28 ÓëÓï¾äDim abc%×÷ÓÃÏàͬµÄÓï¾äÊÇ_______¡£ A
A) Dim abc As Integer B) Dim abc As Long C) Dim abc As String D) Dim abc As Date
29 Éèa=1,b=2,c=3,d=4£¬Ôò±í´ïʽIIf(a
A. 4 B. 3 C. 2 D. 1 £¨IIf(Âß¼±í´ïʽ,Öµ1,Öµ 2£©Èô±í´ïʽÕýÈ·£¬Ôò·µ»ØÖµ1£¬·ñÔòΪ2£© 30 ±í´ïʽInt(198.555*100+0.5)/100µÄֵΪ _______¡£ C
A. 198 B. 199.6 C. 198.56 D. 200
31 Ҫʹ±äÁ¿x¸³ÖµÎª1¡«100¼ä£¨º¬1£¬²»º¬100£©µÄÒ»¸öËæ»úÕûÊý£¬ÕýÈ·µÄÓï¾äÊÇ_______¡£D A. x=Int(100*Rnd) B. x=Int(101*Rnd) C. x=1+Int(100*Rnd) D. x=1+Int(99*Rnd)
32 Visual Basic±í´ïʽ Cos(0)+Abs(1)+Int(Rnd(1))µÄÖµÊÇ_______¡£ D
µÚ 3 Ò³ ¹² 50 Ò³
Ê¡¶þ¼¶¿¼ÊÔVBÊÔÌâ»ã×Ü
A. 1 B. -1 C. 0 D. 2
33 ±í´ïʽInt(5*Rnd+1)* Int(5*Rnd-1) ÖµµÄ·¶Î§ÊÇ_______¡£ D
A. [0,15] B. [-1,15] C. [-4,15] D. [-5,15] 34 µ±º¯ÊýMsgBox·µ»ØÖµÎª1£¬¶ÔÓ¦µÄ·ûºÅ³£Á¿ÊÇ vbOK£¬ÄÇô´Ëʱ±íʾÓû§×öµÄ²Ù×÷ÊÇ_______¡£ A A. Óû§µ¥»÷Á˶Ի°¿òÖеġ°È·¶¨¡±°´Å¥ B. Óû§µ¥»÷Á˶Ի°¿òÖеġ°È¡Ïû£¨2£©¡±°´Å¥ £¨ÖÐÖ¹3£»ÖØÊÔ4£»ºöÂÔ5£© C. Óû§µ¥»÷Á˶Ի°¿òÖеġ°ÊÇ£¨6£©¡±°´Å¥ D. Óû§µ¥»÷Á˶Ի°¿òÖеġ°·ñ£¨7£©¡±°´Å¥
35 ÔÚVisual BasicÖУ¬InputBoxº¯ÊýµÄĬÈÏ·µ»ØÖµÀàÐÍΪ×Ö·û´®£¬ÓÃInputBoxº¯ÊýÊäÈëÊýÖµÐÍÊý¾Ýʱ£¬ÏÂÁвÙ×÷ÖпÉÒÔÓÐЧ·ÀÖ¹³ÌÐò³ö´íµÄ²Ù×÷ÊÇ_______¡£ A
A. ÊÂÏȶÔÒª½ÓÊյıäÁ¿¶¨ÒåΪÊýÖµÐÍ £¨´Ëʱϵͳ»á×Ô¶¯×ª»»£© B. ÔÚº¯ÊýInputBoxÇ°ÃæÊ¹ÓÃStrº¯Êý½øÐÐÀàÐÍת»»
C. ÔÚº¯ÊýInputBoxÇ°ÃæÊ¹ÓÃValueº¯Êý½øÐÐÀàÐÍת»» (Ó¦¸ÃÊÇvalº¯Êý) D. ÔÚº¯ÊýInputBoxÇ°ÃæÊ¹ÓÃStringº¯Êý½øÐÐÀàÐÍת»» 36 ±í´ïʽLen(\³ÌÐòÉè¼ÆABC\µÄÖµÊÇ_______¡£ A
A. 10 B. 14 C. 20 D. 17
37 ¸³ÖµÓï¾äg = 123 + Mid(\Ö´Ðк󣬱äÁ¿gÖеÄÖµÊÇ_______¡£ D
A£© \£© 123C£© 12334 D£© 157
38 Èç¹ûxÊÇÒ»¸öÕýʵÊý£¬¶ÔxµÄµÚ3λСÊýËÄÉáÎåÈëµÄ±í´ïʽÊÇ_______¡£B A. 0.01 * Int(x + 0.005)
B. 0.01 * Int(100 * (x + 0.005)) £¨fix;cintÔÚÏàͬÐÎʽÏÂÒ²¿ÉÒÔ£© C. 0.01 * Int(100 * (x + 0.05)) D. 0.01 * Int(x + 0.05)
39 MsgBoxº¯ÊýµÄ·µ»ØÖµµÄÀàÐÍÊÇ_______¡£ A
A£© ÕûÊý B£© ×Ö·û´® C£©Âß¼Öµ D£© ÈÕÆÚ
40 ʹÓÃÏÂÁÐÓï¾ä£ºDim x(1 to 10,3) As Single£¬ÔòÊý×éÕ¼ÓÃÄÚ´æ¿Õ¼äµÄ×Ö½ÚÊýÊÇ_______¡£ A. 132 B. 80 C. 160 D. 120 41 Èôx=1£¬Ö´ÐÐÓï¾äIf x Then x = 0 Else x = 1µÄ½á¹ûÊÇ_______¡£ D A. ʵʱ´íÎó B. ±àÒë´íÎó C. x=1 D. x=0 42 ÏÂÁгÌÐò¶ÎµÄÑ»·½á¹¹Ö´Ðкó£¬iµÄÊä³öÖµÊÇ_______¡£ C
Dim y as Integer
For i = 1 To 10 Step 2 y = y + i Next i
Print i
A) 25 B) 10 C) 11 D) ÒòΪy³õÖµ²»ÖªµÀ£¬ËùÒÔ²»È·¶¨ 43 ÒÔϳÌÐò¶ÎµÄÔËÐнá¹ûÊÇ_______¡£ D
Private Sub Form_Click() x = 5 m = 1 n = 1 Do
m = m * n n = n + 1 Loop Until n > 5 Print x ^ 2 + m / 3
µÚ 4 Ò³ ¹² 50 Ò³
C
Ïà¹ØÍÆ¼ö£º