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

VBϰÌâ(2016)

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

46¡¢Ö´ÐÐÏÂÃæµÄ³ÌÐò¶Îºó£¬±äÁ¿aµÄֵΪ£¨ £© a=3

For i=0 to 10 step 3 a=a+i/3 Next i Print a

A.3 B.4 C.9 D.6

47¡¢Ö´ÐÐÏÂÃæµÄ³ÌÐò¶Îºó£¬Ñ­»·²ÎÊýi¡¢jµÄÖµ·Ö±ðΪ£¨ £© For i=1 to 3

For j=4 to 1 setp -1 Print i*j Next j Next i

A.4ºÍ0 B.3ºÍ4 C.4ºÍ1 D.3ºÍ0

48¡¢ÓÉ¡°For i=1 To 16 Step 3¡±¾ö¶¨µÄÑ­»·½á¹¹±»Ö´ÐУ¨ A.6 B.4 C.5 D.7 49¡¢Do Ñ­»·Ìå

Loop While<Ìõ¼þ>

ÔòÒÔÏÂÐðÊöÖдíÎóµÄÊÇ£¨ £©¡£

A.Èç¹û¡°Ìõ¼þ¡±×ÜÊÇΪTrue£¬Ôò²»Í£µØÖ´ÐÐÑ­»·Ìå B.Èô¡°Ìõ¼þ¡±ÊÇÒ»¸öΪ0µÄ³£Êý£¬ÔòÒ»´ÎÒ²²»Ö´ÐÐÑ­»·Ìå C.¡°Ìõ¼þ¡±¿ÉÒÔÊǹØÏµ±í´ïʽ¡¢Âß¼­±í´ïʽ»ò³£Êý D.Ñ­»·ÌåÖпÉÒÔʹÓÃExit DoÓï¾ä

50¡¢ÏÂÃæ³ÌÐò¶ÎÔËÐкó£¬ÏÔʾµÄ½á¹ûÊÇ£¨ £©¡£

Dim x as integer if x then print x else print x+1 A.1 B.0 C.-1 D.ÏÔʾ³ö´íÐÅÏ¢ 51¡¢ÏÂÁÐÑ­»·Õý³£½áÊøµÄÊÇ£¨ £©¡£ A¡¢i=1 B¡¢ i=5 Do Do i=i+1 i=i+1

Loop until i=10 Loop until i¡´0 C¡¢i=10 D¡¢i=6 Do Do

£©´Î¡£ i=i+1 i=i-2

Loop while i¡µ0 Loop until i=1 52¡¢ÉèÓÐÈçÏÂÊý×éÉùÃ÷Óï¾ä£¬________ÊÇÕýÈ·µÄ¡£

A.Dim a(2 3) As Integer B.Dim a(m,n) As Integer C.Dim a[3,2] As Integer D.Dim a(2,3) As Integer

53¡¢ÔÚÉ趨Option Base 1ºó£¬¾­Dim arr(3,4£©As Integer ¶¨ÒåµÄÊý×éarrº¬ÓеÄÔª ËØ¸öÊýΪ£¨ £©¡£ A.20 B.19 C.12 D.9

54¡¢ÓÐÈçϳÌÐò´úÂ룬Êä³ö½á¹ûÊÇ£¨ £©¡£ Dim a(-3 to 6,5) n=Ubound(a,1) print n

A.5 B.-3 C.0 D.6

55¡¢ÓÃÏÂÃæµÄÓï¾äËù¶¨ÒåµÄÊý×éµÄÔªËØ¸öÊýÊÇ£¨ £©¡£ Dim b(-2 to 5,3 to 5)

A.25 B.11 C.24 D.21

56¡¢ÓÃRedim²»¿ÉÒԸı䶯̬Êý×éµÄ£¨ £©¡£ A.ÀàÐÍ B.´óС C.άÊý D.ϱêÖµ

57¡¢1 ¸ö¶þάÊý×é¿ÉÒÔ´æ·Å1 ¸ö¾ØÕó¡£ÔÚ³ÌÐò¿ªÊ¼ÓÐÓï¾äOption Base 0£¬ÔòÏÂÃæ¶¨Òå µÄÊý×éÖÐÕýºÃ¿ÉÒÔ´æ·Å1 ¸ö4¨w3 ¾ØÕ󣨼´Ö»ÓÐ12 ¸öÔªËØ£©µÄÊÇ£¨ £©¡£ A.Dim a(4,3)As Integer B.Dim a(-1 To -4,-1 To -3)As Integer C.Dim a(3,2)As Integer D.Dim a(-2 To 0,2)As Integer 58¡¢ÒÔÏÂÊý×鶨ÒåÓï¾äÖУ¬´íÎóµÄÊÇ£¨ £©¡£ A.Dim d(-10) B.Static a(10) As Integer C.Dim c(3,1 To 4) D.Dim b(0 To 5, 1 To 3)As Integer 59¡¢Dim a( )

a=Array(1,2,3,4,5)

for i=Lbound(a£©to Ubound(a) print a(i); next i

A.0 1 2 3 4 B.5 4 3 2 1 C.1 2 3 4 5 D.4 3 2 1 0 60¡¢ÒÔ϶¨ÒåÊý×é»ò¸øÊý×éÔªËØ¸³ÖµµÄÓï¾äÖУ¬ÕýÈ·µÄÊÇ______¡£ A¡¢Dim a As Variant B¡¢Dim a(10) As Integer a = Array(1,2,3,4,5) a = Array(1,2,3,4,5) C¡¢Dim a%(10) D¡¢Dim a(3),b(3) As Integer a(1) = \

a(1) = 1 a(2) = 2 b = a 61¡¢ÏÂÁÐÃèÊö²»ÕýÈ·µÄÊÇ£¨ £©¡£

A.ij¸ö×Ó¹ý³ÌÖÐÉùÃ÷µÄ¾Ö²¿±äÁ¿£¬ÆäʹÓ÷¶Î§½öÏÞ¶¨ÓÚ¸Ã×Ó¹ý³ÌÄÚ B.²»Í¬×Ó¹ý³ÌÖоßÓÐÏàͬµÄÃû³ÆµÄ¾Ö²¿±äÁ¿ÊÇͬһ±äÁ¿

C.ij¸ö×Ó¹ý³ÌÖÐÉùÃ÷µÄ¾Ö²¿±äÁ¿£¬ÆäÉúÃüÖÜÆÚ½öÏÞÓÚ¸Ã×Ó¹ý³Ì±»Ö´ÐеĹý D.²»Í¬×Ó¹ý³ÌÖеľֲ¿±äÁ¿¿ÉÒÔ¾ßÓÐÏàͬµÄÃû³Æ 62¡¢ÒÔϹØÓÚº¯Êý¹ý³ÌµÄÐðÊöÖдíÎóµÄÊÇ£¨ £©¡£ A.º¯Êý¹ý³ÌÒ»¶¨Óзµ»ØÖµ B.º¯Êý¹ý³ÌÒ»¶¨ÓвÎÊý

C.º¯Êý¹ý³Ì¿ÉÒÔÔÚ´°ÌåÄ£¿éºÍ±ê׼ģ¿éÖж¨Òå D.º¯Êý¹ý³Ì²ÎÊýµÄÀàÐÍÓë·µ»ØÖµµÄÀàÐÍÎÞ¹Ø

63¡¢ÓÐÒ»×Ó³ÌÐò¶¨ÒåΪPublic Sub aaa(a As Integer,b As Single)£¬ÕýÈ·µÄµ÷ÓÃÐÎʽ ÊÇ£¨ £©¡£

A.Call aaa 1,1.2 B.Call sub(1,1.2) C.aaa 1,1.2 D.sub 1,1.2 64¡¢ÏÂÁйØÓÚº¯Êý¹ý³ÌµÄÐðÊöÖУ¬ÕýÈ·µÄÊÇ£¨ £©¡£ A.º¯Êý¹ý³ÌÐβεÄÀàÐÍÓ뺯Êý·µ»ØÖµµÄÀàÐÍûÓйØÏµ

B.µ±Êý×é×÷Ϊº¯Êý¹ý³ÌµÄ²ÎÊýʱ£¬¼ÈÄÜÒÔ´«Öµ·½Ê½´«µÝ£¬Ò²ÄÜÒÔÒýÓ÷½Ê½´«µÝ C.º¯Êý¹ý³ÌµÄ·µ»ØÖµ¿ÉÒÔÓжà¸ö

D.Èç¹û²»Ö¸Ã÷º¯Êý¹ý³Ì²ÎÊýµÄÀàÐÍ£¬Ôò¸Ã²ÎÊýûÓÐÊý¾ÝÀàÐÍ 65¡¢ÔÚ¹ý³Ì¶¨ÒåÖÐÓ㨠£©±íʾÐβεİ´Öµ´«µÝ¡£ A.Var B.ByValue C.ByVal D.ByRef

66¡¢ÔÚVBµÄ´°Ìå»ò±ê׼ģ¿éµÄͨÓÃÉùÃ÷ÇøÓÃDimÓï¾äÉùÃ÷µÄ±äÁ¿³ÆÎª£¨ £©¡£ A.¹ý³Ì±äÁ¿ B.¾Ö²¿±äÁ¿ C.Ä£¿é¼¶±äÁ¿ D.È«¾Ö±äÁ¿ 67¡¢Private Sub Command1_Click() Dim x As Integer x=x+2 End sub

µ¥»÷Á½´ÎCommand1°´Å¥ºó£¬xµÄֵΪ£¨ £© A.4 B.3 C.2 D.5

68¡¢ÉèÖñêÇ©µÄ£¨ £©ÊôÐÔ£¬¿É¸Ä±äÆäÎÄ×Ö¶ÔÆë·½Ê½¡£ A.Alignment B.Justify C.Visible D.ÒÔÉ϶¼²»ÊÇ 69¡¢µ±Îı¾¿òµÄ£¨ £©ÊôÐÔΪTrueʱ£¬ScrollBarsÊôÐÔ²ÅÓÐЧ¡£ A. MultiLine B.MaxLength C.Enabled D.visible 70¡¢¿ÉÒÔ¿ØÖÆÁ¬Ðø·¢ÉúµÄ¡¢ÓйæÂɵÄʼþµÄ¿Ø¼þÊÇ£¨ £©¡£

A.Áбí¿ò B.½ø¶ÈÌõ C.ʱÖӿؼþ D.×éºÏ¿ò 71¡¢ÏÂÁУ¨ £©²»ÊôÓÚ×éºÏ¿òµÄ·ç¸ñ¡£

A.ÏÂÁÐʽÁбí¿ò B.¼òµ¥Áбí¿ò C.ÏÂÁÐʽ×éºÏ¿ò D.¼òµ¥×éºÏ¿ò

72¡¢µ±ÔËÐгÌÐòʱ£¬ÏµÍ³×Ô¶¯Ö´ÐÐÆô¶¯´°ÌåµÄij¸öʼþ¹ý³Ì£¬Õâ¸öʼþ¹ý³ÌÊÇ£¨ £©¡£ A.Click B.Unload C.Load D.GotFocus 73¡¢¸´Ñ¡¿òµÄValue ÊôÐÔΪ1ʱ£¬±íʾ£¨ £©¡£ A.¸´Ñ¡¿ò³Ê»ÒÉ«²»¿ÉÓà B.¸´Ñ¡¿ò²Ù×÷ÓÐÎó C.¸´Ñ¡¿ò±»Ñ¡ÖÐ D.¸´Ñ¡¿òδ±»Ñ¡ÖÐ 74¡¢ÒÔÏÂÐðÊöÖÐÕýÈ·µÄÊÇ£¨ £©¡£ A.´°ÌåÃû³Æ±ØÐëÓë´°ÌåÎļþµÄÃû³ÆÏàͬ B.³ÌÐòÒ»¶¨ÊÇ´Óij¸ö´°Ì忪ʼִÐеÄ

C.´°Ìå¼°´°ÌåÉÏËùÓпؼþµÄʼþ¹ý³Ì´úÂë¶¼±£´æÔÚ´°ÌåÎļþÖÐ D.ÔÚ¹¤³ÌÖÐÖ»ÓÐÆô¶¯´°Ìå¿ÉÒÔ½¨Á¢²Ëµ¥

75¡¢Òª¸Ä±äLabel¿Ø¼þÖÐÎÄ×ÖµÄÑÕÉ«£¬¿ÉÒÔÉèÖÃLabel¿Ø¼þµÄ£¨ £©ÊôÐÔ¡£ A.ForeColor B.FontColor C.FillColor D.BackColor 76¡¢¹ö¶¯Ìõ¿Ø¼þȡֵ·¶Î§×î´óÖµµÄÊôÐÔÊÇ£¨ £©¡£

A.MaxChange B.Value C.Max-Min D.LargeChange

77¡¢½«ÃüÁî°´Å¥µÄ£¨ £©ÊôÐÔÉèÖÃΪFalse£¬ÃüÁî°´Å¥ÔÚ´°ÌåÖоͿ´²»µ½ÁË¡£ A.Visible B.Default C.Cancel D.Enabled

78¡¢¼ÙÉè´°ÌåForm1µÄCaptionÊôÐÔΪFrmm£¬ËüµÄ¼ÓÔØÊ¼þ¹ý³ÌÃûÓ¦¸ÃΪ£¨ £© A.From1_Load B.Frmm_load C.Form_load D.Me_Load 79¡¢Èç¹ûÒª¸Ä±ä´°ÌåµÄ±êÌ⣬ÐèÒªÉèÖô°Ìå¶ÔÏóµÄ£¨ £©ÊôÐÔ A.BorderStyle B.Ãû³Æ C. Caption D.Title

80¡¢³ÌÐòÔËÐÐʱ£¬ÓÃÓÚ×Ô¶¯µ÷ÕûͼƬ¿ò£¨Picture¿Ø¼þ)´óС¡¢ÒÔÊÊÓ¦¿òÖÐͼÏñ´óСµÄÊô ÐÔÊÇ£¨ £©

A.AutoSize B. Stretch C.DrawPicture D. Picture 81¡¢´°ÌåÖзÅÖõĿؼþÊÇ£¨ £© A.ÊôÐÔ B.Àà C.¶ÔÏó D.¹ý³Ì

82¡¢ÒªÔÚ³ÌÐòÖмÓÔØ´°ÌåForm1µÄ±³¾°»­Ã棬ÕýÈ·µÄ³ÌÐò´úÂëÊÇ£¨£© A.From1.Picture=Load(ÎļþÃû) B.From1.Picture=LoadPicture(ÎļþÃû)

C.From1.Picture=SaveLoad(ÎļþÃû) D.From1.Picture=ÎļþÃû

83¡¢³ÌÐòÔËÐÐʱ£¬ÓÃÓÚ×Ô¶¯µ÷ÕûͼÏñ¿ò£¨Image¿Ø¼þ£©ÖÐÄÚÈÝ¡¢ÊÊӦͼÏñ¿ò´óСµÄÊôÐÔ ÊÇ£¨ £©

A.Stretch B.DrawPicture C.Picture D.AutoSize 84¡¢ÏÂÁпؼþÖÐûÓÐCaptionÊôÐÔµÄÊÇ£¨ £©¡£

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