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

VB Treeview¿Ø¼þµÄÏêϸʹÓÃ

                                       
VB Treeview¿Ø¼þÏêϸʹÓ÷½·¨
1¡¢ÊôÐÔ
ÕâÀïÖ»¸ø´ó¼Ò½éÉÜTreeview¿Ø¼þµÄ¼¸¸ö³£Óûù±¾ÊôÐÔ
appearanceÊôÐÔ£ºÉèÖÿռäÊÇ·ñÒÔ3DЧ¹ûÏÔʾ
ÏêϸµÄÍâ¹ÛÉèÖÿÉÒÔתµ½´Ë¿Ø¼þµÄ“×Ô¶¨Òå”Ò³Ãæ½øÐÐÉèÖÃ
checkboxesÊôÐÔ£ºÔÚÊ÷µÄÿһÏîµÄÅԱߣ¬ÊÇ·ñÏÔʾһ¸ö¸´Ñ¡¿ò£¬ÀàËÆcheckbox¿Ø¼þµÄ×÷ÓÃ
hottrackingÊôÐÔ£ºµ±Êó±êÖ¸Õë¾­¹ýij¸öÌõĿʱ£¬ÕâЩÌõÄ¿ÊÇ·ñÍ»³öÏÔʾ£¬ÀàËÆÍøÒ³µÄ³¬Á´½ÓЧ¹û
labeleditÊôÐÔ£º¾ö¶¨Óû§ÊÇ·ñÄܱ༭¿Ø¼þÖÐÁгöµÄÏîÄ¿£¬´ËÏîÈç¹û²»Ïë±»¸Ä±ä£¬¿É½«ÊôÐÔÖµÉèÖÃΪ1
linestyleÊôÐÔ£ºÉèÖÃÁгöµÄÿÏîÖ®¼äµÄÐÐÑùʽ£¬¼´£¬Èç¹ûΪ1£¬Ôòµ±Ç°ÏîÏ»¹ÓÐ×ÓÏîµÄʱºò£¬ËüµÄÇ°Ãæ»áÏÔʾ“+”ºÅ£¬Èç¹ûֵΪ2£¬Ôò²»ÏÔʾ“+”
singleselÊôÐÔ£ºÉèÖÃÔÚÊ÷ÖÐÑ¡ÔñеÄÌõĿʱ£¬ÊÇ·ñÕ¹¿ª´ËÌõÄ¿²¢ÊÕ£ǰһ¸öÌõÄ¿£¬¼´£¬ÉèÖÃΪTrueʱ£¬²¢ÇÒµ±Ç°Ñ¡ÖеÄÌõÄ¿ÓÐ×ÓÏîµÄʱºò£¬»á°Ñ×ÓÏîÕ¹¿ª£¬²¢½«Ô­À´ÄãÑ¡ÖеÄÌõÄ¿ÊÕ££¬ÕâÒ»µãºÜʵÓá£
styleÊôÐÔ£ºÉèÖÃTreeview¿Ø¼þµÄÿ¸öÁбíµÄ×é³É·½Ê½£¬±ÈÈç“ͼƬ”+“Îı¾”·½Ê½£¬µÈµÈ£¬ÕâÑùÄã¾Í¿ÉÒÔ°ÑTreeviewŪµÃ¸üºÃ¿´Ò»Ð©¡£
2¡¢Ó÷¨½éÉÜ£º
Ò»¡¢Treeview¿Ø¼þÌí¼ÓÌõÄ¿ºÍ×ÓÌõĿͨ³£Ê¹ÓÃADD·½·¨£¬ÆäÓï·¨ÈçÏ£º
Nodes.Add(relative,[relationship][,key][,text][,image][,selectedimage])
ÆäÖУº
relationship ²ÎÊýÊÇͨ¹ý¹ØÏµ½Úµã²ÎÊýÓëнڵãÁ¬½ÓµÄÁíÒ»¸ö½Úµã£»²ÎÊý¿ÉÄÜÊÇÒÔÏÂÇé¿ö£º
1-tvwlast    ¸Ã½ÚµãÖÃÓÚËùÓÐÆäËûµÄÔÚrelativeÖб»ÃüÃûµÄͬһ¼¶±ðµÄ½ÚµãµÄºóÃæ
2-tvwNext    ¸Ã½ÚµãÖÃÓÚÔÚrelativeÖб»ÃüÃû½ÚµãµÄºóÃæ
3-tvwPrevius ¸Ã½ÚµãÖÃÓÚÔÚrelativeÖб»ÃüÃûµÄ½ÚµãµÄÇ°Ãæ
4-tvwChild   ¸Ã½Úµã³ÉΪÔÚrelativeÖб»ÃüÃûµÄ½ÚµãµÄµÄ×Ó½Úµã
ÏêϸÓï¾ä¿É²Î¿¼ÏÂÁгÌÐò´úÂë:
´´½¨¸¸½ÚµãÌõÄ¿
TreeView.Nodes.Add , , "Father", "Father"
´´½¨´Ë½ÚµãµÄ×Ó½ÚµãÌõÄ¿
TreeView.Nodes.Add "Father", tvwChild, , "Child"
×¢Òâ´´½¨×Ó½ÚµãµÄʱºò,relative²ÎÊýΪ¸¸½ÚµãµÄÎı¾"Father"
¶þ¡¢Ìí¼ÓͼÏñ
Ϊ½Úµã²åÈëͼÏó¿É²Î¿¼Óï¾ä£º
¡¡¡¡¡¡Treeview.node(index).image="ͼƬÃû"
¿ÉÒÔ²Î


Ïà¹ØÎĵµ£º

VBÔõÑùÅжϡ¢·ÀÖ¹³ÌÐòÖØ¸´Ö´ÐÐ

Private Sub Form_load()
    'ÅжϳÌÐòÊÇ·ñÒѾ­ÔËÐÐ
    If App.PrevInstance
Then
     MsgBox "±¾³ÌÐòÒѾ­ÔËÐУ¡", vbInformation Or vbOKOnly, "ÌáʾÐÅÏ¢"
     Unload
Me
     Exit Sub
&n ......

c# ÑéÖ¤Âë×é¼þ ¿Évb£¬asp£¬netµ÷ÓÃ

      ½ñÌ칫˾ҪÇóÓÃC#д¸öÑéÖ¤Âë×é¼þ£¬ÈÃasp¿ÉÒÔµ÷Óã¬ÔÚÍøÉÏÕÒÁËÒ»¶Ñ×ÊÁÏ£¬ÖÕÓÚ¸øÎÒ¸ø¸ã³öÀ´ÁË£¬ÒòΪ±¾È˵ÚÒ»´Îд×é¼þ£¬Ò²ÊǵÚÒ»´Î·¢±íÎÄÕ£¬ËùÓпÉÄÜ˵µÄ²»ÊǺܺ㬴ó¼ÒÇë¼ûÁ¡£
      csdnÉÏÓÐÕâôƪÎÄÕ£¬Ïëѧϰд×é¼þµÄ¿ÉÒÔÈ¥¿´¿´£ºhttp://blog.csdn.net/KimmKi ......

VB¶Áȡע²á±í

Private Type SECURITY_ATTRIBUTES
   nLength As Long
   lpSecurityDescriptor As Long
   bInheritHandle As Boolean
End Type
Dim lang As String
Private Declare Function RegOpenKeyEx Lib "advapi32.dll" Alias "RegOpenKeyExA" (ByVal hkey As Long, ByV ......

vb´ò°üÏòµ¼ Éú³É°²×°Îļþ

vb¿ª·¢Èí¼þÊÇÔÚÒ»¶¨µÄ»·¾³Ï½øÐеģ¬Èçvisual basic 6.0  mssql»òaccessµÈ£¬µ«ÊÇ×îÖÕÈí¼þÒª¸ø¹ã´óȺÖÚʹÓ㬱ðÈ˲»¿ÉÄܶ¼°²×°ÕâЩ¶«Î÷£¬ËùÒÔÐèÒª´ò°ü£¬Éú³É°²×°Îļþ£¬¾ÍÏëÎÒÃÇÏÂÔØµÄºÜ¶à°²×°³ÌÐò£¬¶¼ÊÇ´ò°üºóµÄ½á¹û£¡
µ«ÊÇÖµµÃ×¢ÒâµÄÊÇ£¬´ò°üµÄ¹ý³ÌÖУ¬ÓÐÌí¼Ó£¬É¾³ý×é¼þ¹©ÄãÑ¡Ôñ£¬Èç¹ûÓõ½Ïà¶Ô·¾¶£¬¸½¼þ£¬ÍâÁªµ ......

VB¸´ÖÆÎļþ¼ÐµÄ·½·¨(·ÇFSO)

http://www.webuc.net/ddf3/archive/2005/08/25/6142.aspx
²»ÓÃFSOµÄ¸´ÖÆÎļþ¼ÐµÃ·½·¨£¿
ÓÃAPIº¯Êý SHFileOperation
ÒÔÏÂÊÇʹÓÃSHFileOperationɾ³ý¸´ÖÆÒƶ¯ÎļþµÄÀý×Ó£¬¿ÉÒÔ¸´ÖÆÎļþ¼Ð
Private Type SHFILEOPSTRUCT
¡¡¡¡hwnd As Long
¡¡¡¡wFunc As Long
¡¡¡¡pfrom As String
¡¡¡¡pTo As String
¡¡¡¡fFlags As ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ