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

VB treeview ¶àÖØÑ¡ÔñµÄÎÊÌâ - VB / ¿Ø¼þ

ÔÚVBÖУ¬×Ô¶¯Éú³ÉµÄÊ÷¿Ø¼þÈçͼ£ºÎÒÏëÔڿؼþÖа´×¡SHIFT¼üÑ¡ÔñFoldersÏÂÃæµÄÎļþ¡£
´úÂëÈçÏ£º
 Try
  If ParentCategoryNode.Text = "Folders" Then
  If e.Shift Then
  For i = 0 To ParentCategoryNode.Nodes.Count - 1
  [color=#3366FF]If ParentCategoryNode.Nodes(i).Checked Then
  MessageBox.Show(tvProject.SelectedNode.Nodes.Item(i).Text.ToString())
  End If  
  Next
  End If
  End If
  Catch ex As Exception
  MessageBox.Show(ex.Message)
  End Try[/color]
Èç¹ûÈ¥µôÀ¶É«µÄIFÅжϣ¬Ôò¿ÉÒÔ½«FolderÏÂÃæµÄÎļþ¶¼µ¯³öÀ´£¬µ«ÊÇ£¬Èç¹û¼ÓÁËIFÅжϣ¬¾Í»á³öÏÖÒì³£¡£¶ÔÁË£¬ÕâÀïµÄÒì³£»¹Êǵã»÷ÁËFolderÏÂÃæµÄÎļþ¾Í»á³öÏÖ¡£
²»ÖªµÀÎÒµÄÎÊÌâÓÐûÓÐÃèÊöÇå³þ£¬ÇëÄãÃǰïæ£¡
°ï¶¥£¡~~

.net


Ïà¹ØÎÊ´ð£º

vb - VB / »ù´¡Àà

ÎÒÏë°ÑwordÁí´æÎªxmlÖ®ºó£¬ÓÃvb¶ÁÈ¡Õâ¸öxmlµÄÄÚÈÝ£¬ÇëÎÊÈçºÎʵÏÖ£¿
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......

vb - VB / »ù´¡Àà

vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......

vb¶ÁÈ¡xml - VB / »ù´¡Àà

ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xm ......

VBÈçºÎ»ñµÃ±ðµÄ³ÌÐòÉϵıí¸ñÄÚÈÝ£¿ - VB / API

ÎÒµÄÒªÇóÊÇ£ºÍ¨¹ýץȡ±ðµÄ³ÌÐòÉϵıí¸ñµÄ¾ä±ú£¬È»ºó¶ÁÈ¡Õâ¸ö±í¸ñµÄÄÚÈÝ¡£
±í¸ñ¾ä±ú£¨ÀàÃû£ºMSFlexGridWndClass£©ÎÒÒÑ×¥µ½£¬½ÓÏÂÀ´ÈçºÎ¶ÁÈ¡±í¸ñµÄÄÚÈݾͲ»»áÁË£¿ÇóÖú¡£

ÄܰѴúÂë·¢À´Ñ§Ï°Ï²»£¿
244326867@qq.com ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ