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

VB/VB.NET ½ûÖ¹Ò»¸ö³ÌÐòÔËÐжà´Î

VB.NET ½ûÖ¹Ò»¸ö³ÌÐòÔËÐжà´Î´úÂë:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If UBound(Diagnostics.Process.GetProcessesByName(Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0 Then
MsgBox("µ±Ç°³ÌÐòÒÑÔËÐÐ,Çë½áÊø½ø³ÌºóÖØÐ´ò¿ª£¡", vbOKOnly, "Ìáʾ")
Me.Close()
End If
End Sub
''''''''''''''''''''''''''''''''''''
'³ÌÐò´úÂ벿·Ö
'.................
'
'''''''''''''''''''''''''''''''''''
End Class
VB½ûÖ¹Ò»¸ö³ÌÐòÔËÐжà´Î´úÂë:
Private Sub Form_Load()
If App.PrevInstance Then
MsgBox "µ±Ç°³ÌÐòÒÑÔËÐÐ,Çë½áÊø½ø³ÌºóÖØÐ´ò¿ª£¡", vbOKOnly, "Ìáʾ"
End If
End Sub
''''''''''''''''''''''''''''''''''''
'³ÌÐò´úÂ벿·Ö
'.................
'
'''''''''''''''''''''''''''''''''''


Ïà¹ØÎĵµ£º

VCʵÏÖÀàËÆVBÖеÄLinkLabel¹¦ÄÜ

VCʵÏÖÀàËÆVBÖеÄLinkLabel¹¦ÄÜ
 
 //VBÀïÃæÓиöLinkLabel£¬VBÖеÄLabelÔÚVCÖÐʽCStatic£¬µ«ÊÇVCÖÐCStaticûÓÐÀàËÆLinkLabelµÄ¹¦ÄÜ¡£¿ÉÒÔ×Ô¼º
//Ìí¼ÓÒ»µã´úÂëÀ´ÊµÏÖ£º
//²»ÖªµÀΪʲôIDC_HANDDÒ»¶¨Òª×Ô¼º¶¨ÒåÒ»ÏÂ
#define IDC_HAND MAKEINTRESOURCE(32649)
//´¦ÀíÊó±êÒÆ¶¯
void CAppNonameDlg::OnMouseMov ......

ÈçºÎÀûÓÃVB±àдNT·þÎñ³ÌÐò

Ò»¡¢NT·þÎñ³ÌÐò
    ËùνNT·þÎñ£¬Êµ¼ÊÉϾÍÊÇÒ»¸ö¿ÉÒÔÔÚϵͳÆô¶¯Ê±×Ô¶¯ÔÚÒ»¶¨Éí·ÝÏÂÆô¶¯µÄ°éËæÏµÍ³³¤Ê±¼ä´æÔڵĽø³Ì¡£ÏóFTP server¡¢HTTP server¡¢ÍÑ»ú´òÓ¡µÈ¶¼ÊDzÉÓÃNT·þÎñµÄÐÎʽÌṩµÄ¡£Õâʵ¼ÊÉÏÀàËÆUnixµÄroot daemon½ø³Ì¡£NT·þÎñ¹éÄÉÆðÀ´£¬NT·þÎñÓÖÒÔϼ¸¸öÌØÕ÷£º
    1¡¢¿ÉÒ ......

vb¹ÜµÀÔËÓÃʵÀý

 Õª×ÔVB°É¸ßÊÖ¾¨ÎÞµÐÐÖµÄÒ»¶Î¹ÜÊ×ʾÀý´úÂ룺
'******* ¶ÁÈ¡DOS³ÌÐòipconfig.exeµÄ·µ»Ø½á¹û£º ********
'×÷Õߣº ¾¨Î޵Р2006-10-19 21:57
'**************************************************
'´°Ìå´úÂ룺Form1
'**************************************************
Option Explicit
Private Const NOR ......

ÖØÊ°VBÖ®ËÄ£¬ÈÕÖ¾¼Óǿƪ

ÖØÊ°VBÖ®ËÄ£¬ÈÕÖ¾¼Óǿƪ  
¹Ø¾¢ËÉ PMP
Ò»¡¢¹ØÓÚÈÕÖ¾¼Ç¼¹¦ÄÜ
Ö÷Òª¹¦ÄܵãÓÐ
1 ÔÚ³ÌÐòĿ¼ÏÂÉú³ÉlogĿ¼£¬ÓÃÓÚ±£´æÈÕÖ¾Îļþ¡£
2 ×Ô¶¯ÔÚlogĿ¼ÖУ¬Éú³ÉÈÕÖ¾Îļþ£¬ÎļþÃüÃûÓÃÄêÔÂÈÕ¶¨Ò壬Èç20100119_log.log¡£
3 ÔÚÈÕÖ¾ÎļþÖУ¬Ã¿ÐмǼһ¸öʱ¼äµãµÄÔËÐÐÄÚÈÝ¡£Ê±¼äµãµÄ¾«¶ÈÓ¦¸Ã´ïµ½ºÁÃë¡£
4 ÔÚÈÕÖ¾ÎļþÖУ¬Ã ......

ÕÐÆ¸VBÈí¼þ¹¤³Ìʦ

VBÈí¼þ¹¤³Ìʦ£º
ְλÃèÊö£º
1¡¢½øÐбàÂë¡¢²âÊÔ£»
2¡¢Ôڹ涨ʱ¼äÄÚÌá½»Ô´´úÂë¡£
¸ÚλҪÇó£º
1¡¢ÊìϤMS SQLÊý¾Ý¿â£»
2¡¢ÊìϤVB 6.0£»
3¡¢ÓÐÒµÎñϵͳ¿ª·¢¾­Ñ飻
4¡¢¾ß±¸Á¼ºÃµÄÍŶӺÏ×÷¾«Éñ£¬ÇÚ·Ü¡¢ÉϽø£»
5¡¢´óר»òÕßÒÔÉÏѧÀú£»
6¡¢¾ßÓÐ1Äê»òÕßÒÔÉÏÏà¹Ø¹¤×÷¾­Ñé £»
7¡¢ÊìϤC#ÓÅÏÈ¡£
VBÐÂÊÖ¡¢³õ¼¶³ÌÐòÔ±¹«Ë¾Ìṩרà ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ