ÎÒÓиöLISTBOXÈçºÎ°ÑÀïÃæµÄÈ«²¿Êý¾Ýµ¼³öµ½ÎÒÑ¡ÔñµÄtxtÎļþÀïÃæ.ÎÒµ¼ÈëÊÇÕâÑù×öµÄ,Äǵ¼³öÓ¦¸ÃÔõÑùÄØ.
Dim d As String
CommonDialog2.Filter = "ËùÓÐÎļþ(*.*)|*.*"
CommonDialog2.ShowOpen
d = CommonDialog2.FileName
Open d For Input As #1
Do While Not EOF(1)
Line Input #1, temp
List1.AddItem te ......
    
        
    
    ÕâÊÇVBÖеÄÁ½¶Î´úÂë.¿´²»Ã÷°×.Çë¸ßÈËÖ¸½Ì
Private Declare Function setWindowPos Lib "user 32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Private Declare Function GetUserName Lib &quo ......
    
        
    
    ÓÐûÓÐÈËÖªµÀÕâ¾äVB´úÂ룺
  G.DrawImage(My.Resources.ResourceManager.GetObject("P" & Int(Rnd() * 5) + 1), New Rectangle(I * 16 + 2, 2, 16, 16), New Rectangle(0, 0, 16, 16), GraphicsUnit.Pixel)
»»³ÉC#ÊÇʲôÒâ˼£¿
ResourceManager.GetObject ·µ»ØÖ¸¶¨µÄ Object ×ÊÔ´µÄÖµ¡£
DrawImage(I ......
    
        
    
       VBÖÐ µÄDataEnv1.Connection.ConnectionString=connstring
   ÓÐʲôÓÐ .ÒѾ¶¨ÒåÁËÒ»¸öÊý¾Ý¿âµÄÁ¬½Ó
   µ«DataEnvl ÊÇϵͳ¶¨Ò廹³ÌÐòÔ±¶¨Òå
DataEnv1Ã²ËÆ ÊǸö±¨±í¿Ø¼þ   
Êý¾Ý»·¾³£¨DataEnvironment£©ÊÇϵͳ¶¨ÒåµÄ£¬¸÷ÖÖÊôÐÔÒª³ÌÐòԱд´úÂëÐ޸ģ¬¿ÉÓÃÊó±êÓÒÑ¡Ôñ¼üÊôÐÔÈ¥Ð޸ġ£
 ......
    
        
    
    ÔÚVBÖÐÈçºÎʵÏÖµ¥»÷Ò»¸ö°´Å¥¾Í¿ÉÒÔ´ò¿ª¼ÆËã»ú¹ÜÀí¡¢±¾µØ×é²ßÂÔ¡¢ÍøÂçÊôÐÔ°¡£¡¿ÉÒÔÓÃshellº¯Êýµ÷ÓÃÂð£¿ÄǸÃÈçºÎʵÏÖÄØ£¿
Shell ("cmd /c gpedit.msc"), vbHide '´ò¿ª±¾µØ×é²ßÂÔ
Shell ("cmd /ccompmgmt.msc"), vbHide '´ò¿ª¼ÆËã»ú¹ÜÀí
ÔÚ¡°¿ªÊ¼²Ëµ¥¡±¡¢¹ÜÀí¹¤¾ß ÀïÃæ£¬ÓÒ»÷¸÷¹¤¾ß£¬Ñ¡Ôñ¡°ÊôÐÔ¡±£¬¾ ......
    
        
    
    vb¶ÁÈ¡xmlÎļþ,´ó¼ÒºÃ,ÎÒÓÐÒ»¸öxmlÎļþ
<?xml version="1.0" encoding="GB2312" ?>
   <NewDataSet>    
   <WorkFlow>    
   <FlowName>²âÊÔÁ÷³Ì1</FlowName>    
   <FlowGUID>441B264D</FlowGUID>    
  ......
    
    	 
	 ×ܼǼÊý:1659; ×ÜÒ³Êý:277; ÿҳ6 Ìõ; 
Ê×Ò³ ÉÏÒ»Ò³ [3] [4] [5] [6] 7 
[8] [9] [10] [11] [12]  ÏÂÒ»Ò³ βҳ