Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

vbÖÐÈçºÎËæ»úѡȡ³µÅƺŠ- VB / ¿Ø¼þ

¢ÙÒªÇóÓÃVisualBasic6.0ÌṩµÄϵͳº¯Êý¼°³£Óÿؼþ£¬½áºÏѧϰ¹ýµÄ³£ÓÃËã·¨Íê³ÉÉè¼Æ¡£
¢ÚÔÚÉè¼Æ³ÌÐòµÄ¹ý³ÌÖУ¬ÒªÇó»áʹÓð´Å¥(commandbutton)¡¢×éºÏÁбí¿ò(combo)£¬Îı¾¿ò(text)¡¢±êÇ©(label)¡¢¿ò¼Ü(frame)¡¢¸´Ñ¡¿ò(check)µÈ»ù±¾¿Ø¼þµÄÊôÐÔ¡¢·½·¨ºÍÏà¹ØÊ¼þ¡£
¢ÛÒªÇóÔÚ³ÌÐòÖÐÄܹ»Ëæ»úÉú³ÉÒ»¸öÊý×Ö×Ö·û´®¡£×Ö·û´®µÄ³¤¶È¡¢¶ÔijЩλµÄÌØÊâÒªÇ󣨱ØÐë¾ß±¸³¤¶ÈÉèÖá¢×îºóһλÊÇ·ñ¿ÉÒÔΪ¡°4¡±¡¢ÈÎһλÊÇ·ñ¿ÉÒÔΪ4¡¢¾üÓÃÅÆÕÕ¡¢¾¯ÓÃÅÆÕÕÕâЩ×î³£¼ûÒªÇ󣩿ÉÓÉÓû§ÉèÖã¬×îÖÕÉú³É·ûºÏÒªÇóµÄ»ú¶¯³µ³µÅƺÅÏÔʾ¸øÓû§¡£
¢ÜÒªÇóʹÓÃÑ­»·Ëã·¨±£Ö¤Ã¿´Îµ¥»÷Ñ¡ºÅ°´Å¥±ØÄܲúÉúÒ»¸ö·ûºÏÒªÇóµÄºÅÂë¡£

Äãµ½µ×ÏëÎÊʲô£¿²»»áÊÇÉÏÃæµÄÈ«²»¶®°É£¿

Õâ¸öÈ˺ÃÏñûÓÐѧ¹ýVB¡£¢Ù¢ÚÍêÈ«ÊÇvb»ù´¡£¬Ò»¸ö³ÌÐòÐèÒªÕâô¶à¶«Î÷Âð£¿

ÕâÊǵÀ×÷ÒµÌâ

àÅ ÊǵÀ×÷ÒµÌ⣬¾ÍÊÇûɶ˼· £¡£¡

Ï£Íû´ó¼ÒÖ¸µ¼Ò»Ï £¬ÎÒ¸ÕѧVBû¶àÉÙÈÕ×Ó£¬»ù±¾ÉÏ»¹Ã»Õ¦ÈëÃÅÄØ£¡£¡


Private Sub Combo1_KeyPress(KeyAscii As Integer)
  If KeyAscii = 13 Then 'ASCIIÂëÖÐenter¼üֵΪ13£¬ÒâΪ°´ÁËenter¼ü
  Combo1.AddItem Combo1.Text, 0 '½ÓÊÕÊäÈëµÄºÅÂë
  Combo1.SelStart = 0 'ÉèÖÃÆðʼ×éºÏ¿òµÄλÖÃ
  Combo1.SelLength = Len(Combo1.Text) 'ÉèÖÃ×éºÏ¿òµÄ³¤¶È
   
  End If
  If KeyAscii = 27 Then 'ASCIIÂëÖÐescape¼üֵΪ27
  If Combo1.ListIndex <> -1 Then
  Combo1.RemoveItem Combo1.ListIndex 'ÒÆÈ¥Ñ¡Ïî
  End If
  End If
End Sub

Private


Ïà¹ØÎÊ´ð£º

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

vb ÖÐ - VB / »ù´¡Àà

ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£
Õâ¸ö£¿¡£¡£¡£
Ã²ËÆÃ»·¨¡£
ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£
Ï´εã»÷µÄÈç¹ ......

vb - VB / ·Ç¼¼ÊõÀà

Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:o=& ......

vbÒì²½ÎÊÌâ - VB / »ù´¡Àà

ÏÖÔÚСµÜÔÚÓÃvb6.0±àд³ÌÐò£¬Óöµ½Òì²½µÄÎÊÌ⣬¾ßÌåÈçÏ£º
µã»÷°´Å¥Aʱ£¬µ÷ÓÃÍⲿµÄdll(C++)£¬´ËdllÊÇͬ²½·µ»ØÊý¾Ý¡£´ËʱÈç¹ûÔ¶³ÌδÏìÓ¦£¬ÎҵijÌÐò½çÃæ¾Í»á¿¨ËÀ¡£Òò´ËÎÒÏëµ½ÓÃtimerÀ´ÊµÏÖÒì²½ £¬µ«ÊDz»Çå³þ¾ßÌåµÄÊµÏ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ