µÚÒ»·¶ÎÄÍø - רҵÎÄÕ·¶ÀýÎĵµ×ÊÁÏ·ÖÏíÆ½Ì¨

½­ËÕÊ¡¶þ¼¶¿¼ÊÔVBÊÔÌâ»ã×Ü

À´Ô´£ºÓû§·ÖÏí ʱ¼ä£º2025/5/25 1:07:40 ±¾ÎÄÓÉloading ·ÖÏí ÏÂÔØÕâÆªÎĵµÊÖ»ú°æ
˵Ã÷£ºÎÄÕÂÄÚÈݽö¹©Ô¤ÀÀ£¬²¿·ÖÄÚÈÝ¿ÉÄܲ»È«£¬ÐèÒªÍêÕûÎĵµ»òÕßÐèÒª¸´ÖÆÄÚÈÝ£¬ÇëÏÂÔØwordºóʹÓá£ÏÂÔØwordÓÐÎÊÌâÇëÌí¼Ó΢ÐźÅ:xxxxxxx»òQQ£ºxxxxxx ´¦Àí£¨¾¡¿ÉÄܸøÄúÌṩÍêÕûÎĵµ£©£¬¸ÐлÄúµÄÖ§³ÖÓëÁ½⡣

Ê¡¶þ¼¶¿¼ÊÔ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£¬Ôò±í´ïʽ ac AND b<>c µÄÖµ_______¡£A A. True B. False C. Yes D. No 12 ΪÁ˸øx,y,zÈý¸ö±äÁ¿¸³³õÖµ1£¬ÏÂÃæÕýÈ·µÄ¸³Öµ 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

ËÑË÷¸ü¶à¹ØÓÚ£º ½­ËÕÊ¡¶þ¼¶¿¼ÊÔVBÊÔÌâ»ã×Ü µÄÎĵµ
½­ËÕÊ¡¶þ¼¶¿¼ÊÔVBÊÔÌâ»ã×Ü.doc ½«±¾ÎĵÄWordÎĵµÏÂÔØµ½µçÄÔ£¬·½±ã¸´ÖÆ¡¢±à¼­¡¢ÊղغʹòÓ¡
±¾ÎÄÁ´½Ó£ºhttps://www.diyifanwen.net/c0pzbf8pgq252amx9ksub_1.html£¨×ªÔØÇë×¢Ã÷ÎÄÕÂÀ´Ô´£©
ÈÈÃÅÍÆ¼ö
Copyright © 2012-2023 µÚÒ»·¶ÎÄÍø °æÈ¨ËùÓÐ ÃâÔðÉùÃ÷ | ÁªÏµÎÒÃÇ
ÉùÃ÷ :±¾ÍøÕ¾×ðÖØ²¢±£»¤ÖªÊ¶²úȨ£¬¸ù¾Ý¡¶ÐÅÏ¢ÍøÂç´«²¥È¨±£»¤ÌõÀý¡·£¬Èç¹ûÎÒÃÇ×ªÔØµÄ×÷Æ·ÇÖ·¸ÁËÄúµÄȨÀû,ÇëÔÚÒ»¸öÔÂÄÚ֪ͨÎÒÃÇ£¬ÎÒÃǻἰʱɾ³ý¡£
¿Í·þQQ£ºxxxxxx ÓÊÏ䣺xxxxxx@qq.com
ÓåICP±¸2023013149ºÅ
Top