VB¿ìËÙÈëÃÅ

2.3 VBµÄ¶ÔÏó¡¢ÊôÐÔ¡¢Ê¼þºÍ·½·¨ 2.3.1 ¶ÔÏó(Object)

¶ÔÏóÊÇ´úÂëºÍÊý¾ÝµÄ×éºÏ£¬¿ÉÒÔ×÷Ϊһ¸öµ¥Î»À´´¦Àí¡£¶ÔÏó¿ÉÒÔÊÇÓ¦ÓóÌÐòµÄÒ»²¿·Ö£¬±ÈÈç¿ÉÒÔÊǿؼþ»ò´°Ìå¡£Õû¸öÓ¦ÓóÌÐòÒ²ÊÇÒ»¸ö¶ÔÏó¡£Ï±íÁгöÁËÔÚ Visual Basic ÖпÉÄÜÓõ½µÄ¼¸ÖÖÀàÐ͵ĶÔÏó£º Ê¾Àý ÃèÊö ÃüÁî°´Å¥ ´°Ìå Êý¾Ý¿â ͼ±í ´°ÌåÉϵĿؼþ£¬ÏóÃüÁî°´Å¥ºÍ¿ò¼Ü£¬ËüÃǶ¼ÊǶÔÏó¡£ Visual Basic ¹¤³ÌÖеÄÿһ¸ö´°Ìå¶¼ÊǶÀÁ¢µÄ¶ÔÏó¡£ Êý¾Ý¿âÊǶÔÏ󣬲¢ÇÒ»¹°üº¬ÆäËû¶ÔÏó£¬Èç×ֶΡ¢Ë÷ÒýµÈ¡£ Microsoft Excel ÖеÄͼ±íÊǶÔÏó¡£ ÔÚVisual BasicÖд´½¨Ó¦ÓóÌÐò£¬ÆäʵҲ¾ÍÊǺͶÔÏó´ò½»µÀ£¬°üÀ¨Ê¹ÓÃVisual BasicÌṩ

µÄ¶ÔÏó£¨Èç¿Ø¼þ¡¢´°ÌåºÍÊý¾Ý·ÃÎʶÔÏóµÈ£©£¬ÒÔ¼°ÔÚÒ»¸öVisual BasicÓ¦ÓóÌÐòÄÚ²¿¿ØÖÆÁíÒ»¸öÓ¦ÓóÌÐò¶ÔÏ󣬻¹¿É½¨Á¢×Ô¼ºµÄ¶ÔÏ󣬶¨ÒåËüÃǵÄÊôÐԺͷ½·¨µÈ¡£

¶ÔËùÓжÔÏóµÄʹÓö¼ÊÇͨ¹ýÆäÊôÐÔ¡¢Ê¼þºÍ·½·¨½øÐеġ£ÔÚVisual BasicÖУ¬³Æ¶ÔÏóµÄÊý¾Ý£¨ÉèÖúÍÊôÐÔ£©ÎªÊôÐÔ£¬³Æ¸÷ÖÖ¿ÉÔÚ¶ÔÏóÉϲÙ×÷µÄ¹ý³ÌΪ·½·¨¡£Ê¼þÊǿɱ»¶ÔÏóʶ±ðµÄ¶¯×÷£¬ÀýÈçµ¥»÷Êó±êºÍ°´Ï¼üÅ̼ü£¬»¹¿É±àд´úÂëÀ´ÏìӦʼþ¡£

ÔÚVisual BasicÖУ¬Ö÷ÒªÓÐÁ½ÖÖ¶ÔÏ󣺴°ÌåºÍ¿Ø¼þ¡£ ´°ÌåÊÇÒ»ÖÖ¶ÔÏó£¬ÓÉÊôÐÔ¶¨ÒåÆäÍâ¹Û¡¢ÓÉ·½·¨¶¨ÒåÆäÐÐΪ¡¢ÓÉʼþ¶¨ÒåÆäÓëÓû§µÄ½»»¥¡£Í¨¹ýÉèÖô°ÌåÊôÐÔ²¢±àдÏìӦʼþµÄ Visual Basic ´úÂ룬¾ÍÄܶ¨Òå³öÂú×ãÓ¦ÓóÌÐòÐèÒªµÄ¶ÔÏó¡£

¿Ø¼þÊǰüÀ¨ÔÚ´°Ìå¶ÔÏóÄڵĶÔÏó¡£Ã¿ÖÖÀàÐ͵Ŀؼþ¶¼ÓÐ×Ô¼ºµÄÒ»Ì×ÊôÐÔ¡¢·½·¨ºÍʼþ£¬ÒÔÊÊÓÃÓÚÌØ¶¨µÄÄ¿µÄ¡£Ò»Ð©¿Ø¼þ×îÊʺÏÔÚÓ¦ÓóÌÐòÖÐÊäÈë»òÏÔʾÎı¾¡£ÁíһЩ¿Ø¼þÄܹ»·ÃÎÊÆäËüµÄÓ¦ÓóÌÐòºÍ´¦ÀíÊý¾Ý£¬¾ÍÏóÕâЩԶ³ÌÓ¦ÓóÌÐòÊÇÓû§×Ô¼ºµÄ´úÂëÒ»Ñù¡£

2.3.2 ÊôÐÔ(Properties)

ËùÓжÔÏó¶¼¾ßÓÐ×Ô¼ºµÄÊôÐÔ¡¢·½·¨ºÍʼþ¡£¿ÉÒÔ°ÑÊôÐÔ¿´×÷Ò»¸ö¶ÔÏóµÄÐÔÖÊ£¬°Ñ·½·¨¿´×÷¶ÔÏóµÄ¶¯×÷£¬°Ñʼþ¿´×÷¶ÔÏóµÄÏìÓ¦¡£

¸Ä±ä¶ÔÏóµÄÊôÐԾͿɸıä¶ÔÏóµÄÌØÐÔ»òÍâ¹Û£¬´Ó¶øÊµÏÖ¶Ô¶ÔÏóµÄ¿ØÖÆ¡£

VBÖÐÓÐÁ½ÖÖÀàÐ͵ÄÊôÐÔ£¬ÔÚÔËÐÐʱ¿ÉÒÔÉèÖò¢¿É»ñµÃÖµµÄÊôÐÔ½Ð×ö¶ÁдÊôÐÔ£¬ÔÚÔËÐÐʱֻÄܶÁÈ¡µÄÊôÐÔ½Ð×öÖ»¶ÁÊôÐÔ¡£

¶ÁдÊôÐÔ¿ÉÓÃÀ´ÉèÖÃÊôÐÔµÄÖµ¡£ ͨ¹ý´úÂëÉèÖöÔÏóµÄÊôÐԵĸñʽΪ£º ¶ÔÏóÃû.ÊôÐÔÃû=ÉèÖõÄÊôÐÔÖµ

ÀýÈ磬ͨ¹ý¸Ä±äTextBox ¿Ø¼þµÄText ÊôÐÔ£¬¾Í¿ÉÒԸıäÎı¾¿òµÄÄÚÈÝ£º

Text1.Text = \

ÉÏÒ»¾ä´úÂë±íʾÔÚÎı¾¿ò¶ÔÏóText1ÖÐÏÔʾ¡°hello¡±×Ö·û´®¡£

ÓеÄÊôÐÔ¿ÉÔÚÉè¼ÆÊ±ÉèÖ㬼´¿ÉÔÚ¡°ÊôÐÔ¡±´°¿ÚÉèÖÃÕâЩÊôÐÔµÄÖµ¶øÎÞÐè±àд´úÂë¡£ ¶ÁÈ¡ÊôÐÔÖµ¿ÉÒÔ»ñÖª¶ÔÏóµÄ״̬¡£ÔÚ´ó¶àÊýÇé¿öÏ¿ÉÒÔÓÃÒÔÏÂÓï·¨»ñµÃÊôÐÔÖµ£º ±äÁ¿=¶ÔÏóÃû.ÊôÐÔÃû

ÀýÈ磬Èç¹ûÏ£Íû·µ»ØTextBox¿Ø¼þµÄText ÊôÐÔÖµ£¬ÒÔÈ·¶¨Îı¾¿òµÄÄÚÈÝ£º a= Text1.Text

ÉÏÒ»¾ä±íʾ°ÑÎı¾¿ò¶ÔÏóText1ÖÐÏÔʾµÄ×Ö·û´®·µ»Ø¸³Öµ¸ø±äÁ¿a¡£

2.3.3 ʼþ(Event)

¶ÔÏó»¹ÓÐʼþ¡£µ±¶ÔÏóµÄij·½ÃæÓб䶯ʱ¾Í´¥·¢ÁËʼþ¡£ÀýÈ磬ÊÕÒô»ú¿ÉÄÜÓС°ÒôÁ¿µ÷½Ú¡±Ê¼þ£¬µç»°¿ÉÄÜÓС°ÏìÁ塱ʼþ£¬µÈµÈ¡£

ʼþÊÇ´°Ìå»ò¿Ø¼þʶ±ðµÄ¶¯×÷¡£Ê¼þ¿ÉÒÔͨ¹ýÖîÈçµ¥»÷Êó±ê»ò°´Ï°´¼üµÄ²Ù×÷¶ø²úÉú£¬Ò²¿ÉÒÔͨ¹ý³ÌÐòµÄ¿ØÖƶø²úÉú£¬ÉõÖÁ¿ÉÒÔÓÉÁíÒ»¸ö´°¿ÚµÄ²Ù×÷¶ø²úÉú¡£

ÔÚÏìӦʼþʱ£¬Ê¼þÇý¶¯Ó¦ÓóÌÐòÖ´ÐÐ Basic ´úÂë¡£Visual Basic µÄÿһ¸ö´°ÌåºÍ¿Ø¼þ¶¼ÓÐÒ»¸öÔ¤¶¨ÒåµÄʼþ¼¯¡£Èç¹ûÆäÖÐÓÐÒ»¸öʼþ·¢Éú£¬¶øÇÒ£¬ÔÚ¹ØÁªµÄʼþ¹ý³ÌÖдæÔÚ´úÂ룬Ôò Visual Basic µ÷ÓøôúÂë¡£

¾¡¹Ü Visual Basic ÖеĶÔÏó×Ô¶¯Ê¶±ðÔ¤¶¨ÒåµÄʼþ¼¯£¬µ«ÒªÅж¨ËüÃÇÊÇ·ñÏìÓ¦¾ßÌåʼþÒÔ¼°ÈçºÎÏìÓ¦¾ßÌåʼþÔòÊDZà³ÌµÄÔðÈÎÁË¡£´úÂ벿·Ö£¨¼´Ê¼þ¹ý³Ì£©Óëÿ¸öʼþ¶ÔÓ¦¡£ ÏëÈÿؼþÏìӦʼþʱ£¬¾Í°Ñ´úÂëдÈëÕâ¸öʼþµÄʼþ¹ý³ÌÖ®ÖС£

¶ÔÏóËùʶ±ðµÄʼþÀàÐͶàÖÖ¶àÑù£¬µ«¶àÊýÀàÐÍΪ´ó¶àÊý¿Ø¼þËù¹²ÓС£ÀýÈ磬´ó¶àÊý¶ÔÏó¶¼ÄÜʶ±ðclick ʼþ£ºÈç¹ûµ¥»÷´°Ì壬ÔòÖ´Ðд°ÌåµÄµ¥»÷ʼþ¹ý³ÌÖеĴúÂ룻Èç¹ûµ¥»÷ÃüÁî°´Å¥£¬ÔòÖ´ÐÐÃüÁî°´Å¥µÄ click ʼþ¹ý³ÌÖеĴúÂ롣ÿ¸öÇé¿öÖеÄʵ¼Ê´úÂ뼸ºõÍêÈ«²»Ò»Ñù¡£

Ðí¶àʼþ°éËæÆäËüʼþ·¢Éú¡£ÀýÈ磬ÔÚ DblClick£¨×ó¼üË«»÷£© ʼþ·¢Éúʱ£¬MouseDown¡¢MouseUpºÍClickʼþÒ²»á·¢Éú¡£

2.3.4 ·½·¨(Method)

³ýÁËÊôÐÔÒÔÍ⣬¶ÔÏó»¹Óз½·¨¡£·½·¨ºÍÊôÐÔ¶¼ÊǶÔÏóµÄÒ»²¿·Ö¡£Ò»°ã˵À´£¬·½·¨¾ÍÊÇÒªÖ´Ðе͝×÷£¬¶øÊôÐÔ¾ÍÊÇÒªÉèÖûò¼ìË÷µÄÌØÐÔ¡£ÒÔ²¦ºÅ´òµç»°ÎªÀý¡£¿ÉÒÔ˵µç»°ÓÐÒ»¸ö¡°²¦ºÅ¡±·½·¨£¬²¦Ò»¸ö 7 λµç»°ºÅÂëµÄÓï·¨¾ÍÊÇ£º

Phone.Dial 5551111

ÔÚ´úÂëÖÐʹÓ÷½·¨Ê±ÈçºÎÊéдÓï¾ä£¬ÕâÈ¡¾öÓڸ÷½·¨ÒªÇó¶àÉÙ²ÎÊý£¬ÒÔ¼°ÊÇ·ñ·µ»ØÒ»¸öÖµ¡£Èç¹û·½·¨²»ÒªÇó²ÎÊý£¬ÔòÓÃÒÔÏÂÓï·¨±àд´úÂ룺

¶ÔÏóÃû.·½·¨Ãû

ÏÂÀýÖУ¬Óà Refresh ·½·¨ÖØ»­Í¼Æ¬¿ò£º Picture1.Refresh ' Ç¿ÆÈÖØ»­¿Ø¼þ¡£

ÓÐЩ·½·¨£¬ÈçÉÏÃæµÄ Refresh £¬¼ÈÎÞ²ÎÊýÓÖ²»·µ»ØÖµ¡£

Èç¹û·½·¨ÒªÓöà¸ö²ÎÊý£¬¾ÍÓöººÅ½«ËüÃÇ·Ö¿ª¡£ÀýÈ磬 Circle ·½·¨¾ÍÒªÓôú±í´°ÌåÉÏÔ²µÄλÖᢰ뾶ºÍÑÕÉ«µÄ²ÎÊý£º

' »­Ò»¸ö°ë¾¶Îª 1200 ç¾µÄÀ¶É«Ô°¡£ Form1.Circle (1600, 1800), 1200, vbBlue

Èç¹ûÒª±£´æ·½·¨µÄ·µ»ØÖµ£¬¾Í±ØÐë°Ñ²ÎÊýÓÃÀ¨ºÅÀ¨ÆðÀ´¡£ÀýÈ磬GetData·½·¨´Ó¼ôÌù°å·µ»ØÒ»ÕÅͼƬ£º

Picture = Clipboard.GetData (vbCFBitmap)

Èç¹ûûÓзµ»ØÖµ£¬Ôò²ÎÊý²»»á³öÏÖÔÚÀ¨ºÅÖС£ÀýÈ磬AddItem ·½·¨Ã»Óзµ»ØÖµ¡£ List1.AddItem \ ' ÔÚÁбí¿òÖÐÌí¼Ó \¡£

2.4 Visual BasicÓïÑÔ»ù´¡ 2.4.1 ´úÂë±àд¹æÔò

ºÍÈκαà³ÌÓïÑÔÒ»Ñù£¬Visual Basic ÓÐ×ÔÉíµÄ×éÖ¯¡¢±à¼­ºÍ¸ñʽ»¯´úÂë¹æÔò¡£ ´ó¶àÊý´úÂë¶¼ÔÚ¡°´úÂë±à¼­Æ÷¡±´°¿ÚÉϱàд¡£ÏÂͼËùʾΪ¡°´úÂë±à¼­Æ÷¡±´°¿Ú¡£

1¡¢´úÂëÊéд

£¨1£©½«µ¥ÐÐÓï¾ä·Ö³É¶àÐÐ

µ±Ò»¸öÓï¾äºÜ³¤Ê±£¬¾¡¹Ü¿ÉÒÔͨ¹ý´úÂë´°¿ÚÏ·½µÄˮƽ¹ö¶¯ÌõÀ´²é¿´£¬µ«ÊÇ»¹ÊÇÏԵò»·½±ã£¬Îª´Ë£¬¿ÉÒÔʹÓÃÐøÐзû£¨Ò»¸ö¿Õ¸ñºóÃæ¸úÒ»¸öÏ»®Ïߣ©½«³¤Óï¾ä·Ö³É¶àÐС£ÓÉÓÚʹÓÃÐøÐзû£¬ÎÞÂÛÔÚ¼ÆËã»úÉÏ»¹ÊÇ´òÓ¡³öÀ´µÄ´úÂë¶¼±äµÃÒ×¶Á¡£ÏÂÃæÓÃÐøÐзû ( _) ½«´úÂë·Ö³ÉÈô¸ÉÐУº

Data1.RecordSource = _

\

& \& \

ÔÚͬһÐÐÄÚ£¬ÐøÐзûºóÃæ²»ÄܼÓ×¢ÊÍ¡£

£¨2£©½«¶à¸öÓï¾äºÏ²¢µ½Í¬Ò»ÐÐÉÏ

ͨ³££¬Ò»ÐÐÖ®ÖÐÓÐÒ»¸ö Visual Basic Óï¾ä£¬¶øÇÒ²»ÓÃÓï¾äÖÕ½á·û¡£µ«ÊÇÒ²¿ÉÒÔ½«Á½¸ö»ò¶à¸öÓï¾ä·ÅÔÚͬһÐУ¬Ö»ÊÇÒªÓÃðºÅ (:) ½«ËüÃÇ·Ö¿ª¡£

Text1.Text = \µ«ÊÇ£¬ÎªÁ˱ãÓÚÔĶÁ´úÂ룬×îºÃ»¹ÊÇÒ»ÐзÅÒ»¸öÓï¾ä¡£

2¡¢ÔÚ´úÂëÖÐÌí¼Ó×¢ÊÍ

×¢ÊÍ·ûÓõ¥ÒýºÅ(')±íʾ£¬¸Ã·ûºÅºóÃæµÄÄÚÈÝÊÇ´úÂë¶ÎÖеÄ×¢ÊÍ£¬ÊǶԴúÂëµÄ˵Ã÷£¬ÕâÑù¿ÉÒÔ·½±ã¿ª·¢Õß×Ô¼º£¬·½±ãÒÔºó¿ÉÄܼì²éÔ´´úÂëµÄÆäËû³ÌÐòÔ±¡£Visual BasicÔÚÖ´ÐдúÂëʱ½«ºöÂԸ÷ûºÅºóÃæµÄÄÚÈÝ¡£ÀýÈ磺

' ÕâÊÇ´ÓÆÁÄ»×ó±ß ' ¿ªÊ¼µÄ×¢ÊÍ¡£

Text1.Text = \ 'ÔÚÎı¾¿òÖзŠ'»¶Ó­´Ê¡£

×¢ÊÍ¿ÉÒÔºÍÓï¾äÔÚͬһÐв¢Ð´ÔÚÓï¾äµÄºóÃæ£¬Ò²¿ÉÕ¼¾ÝÒ»ÕûÐС£ÉÏÊö´úÂë¶ÔÕâÁ½ÖÖÇé¿ö¶¼×÷ÁËʾ·¶¡£¼Çס£¬²»ÄÜÔÚͬһÐÐÉÏ£¬½«×¢ÊͽÓÔÚÐøÐзûÖ®ºó¡£

3¡¢Visual BasicµÄÃüÃûÔ¼¶¨

ÔÚ±àдVisual Basic´úÂëʱ£¬ÒªÉùÃ÷ºÍÃüÃûÐí¶àÔªËØ£¨ÈçSub ºÍ Function ¹ý³Ì¡¢±äÁ¿¡¢³£ÊýµÈµÈ£©¡£ÔÚVisual Basic´úÂëÖÐÉùÃ÷µÄ¹ý³Ì¡¢±äÁ¿ºÍ³£ÊýµÄÃû×Ö£¬±ØÐë×ñÑ­ÕâЩ¹æÔò£º

? ±ØÐëÒÔ×Öĸ¿ªÍ·¡£

? ²»¿ÉÒÔ°üº¬Ç¶ÈëµÄ¾äºÅ»òÕßÀàÐÍÉùÃ÷×Ö·û£¨¹æ¶¨Êý¾ÝÀàÐ͵ÄÌØÊâ×Ö·û£©¡£ ? ²»Äܳ¬¹ý 255 ¸ö×Ö·û¡£¿Ø¼þ¡¢´°Ìå¡¢ÀàºÍÄ£¿éµÄÃû×Ö²»Äܳ¬¹ý 40 ¸ö×Ö·û¡£ ? ²»ÄܺÍÊܵ½ÏÞÖÆµÄ¹Ø¼ü×ÖͬÃû¡£

Êܵ½ÏÞÖÆµÄ¹Ø¼ü×ÖÊÇVisual BasicʹÓõĴʣ¬ÊÇÓïÑÔµÄ×é³É²¿·Ö¡£ÆäÖаüÀ¨Ô¤¶¨ÒåÓï¾ä£¨±ÈÈç If ºÍ Loop£©¡¢º¯Êý£¨±ÈÈç Len ºÍ Abs£©ºÍ²Ù×÷·û£¨±ÈÈç Or ºÍ Mod£©¡£

¹ØÓڹؼü×Ö±íµÄ¸üÏêϸÐÅÏ¢£¬Çë²ÎÔÄVisual BasicÓïÑԲο¼ÊÖ²á»òÏà¹Ø½Ì²Ä¡£

2.4.2 Êý¾ÝÀàÐÍ

Êý¾ÝÊÇÐÅÏ¢µÄÎïÀí±íʾÐÎʽ£¬ÊdzÌÐò´¦ÀíµÄ¶ÔÏó¡£ÔÚVisual BasicÖУ¬¶Ô²»Í¬ÀàÐ͵ÄÊý¾ÝÓв»Í¬µÄ²Ù×÷·½Ê½ºÍ²»Í¬µÄȡֵ·¶Î§¡£Visual BasicÊý¾ÝÀàÐͰüÀ¨ Byte¡¢Boolean¡¢Integer¡¢

ÁªÏµ¿Í·þ£º779662525#qq.com(#Ìæ»»Îª@)