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

VB µ¥ÊµÀýÔËÐÐ

VB6
ÔÚ³ÌÐòÔËÐÐʱÓÃÈçÏÂÓï¾ä£º
if   app.PrevInstance=true   then  
            end    
end   if
VB 2005:
1. ÔÚVB2005ÖÐ,´ò¿ª"ÊôÐÔ"Ò³,ÆôÓÃ"Ó¦ÓóÌÐò“¿ò¼Ü, Ñ¡ÖÐ"
µ¥ÊµÀýÓ¦ÓóÌÐò"Ç°Ã渴ѡ¿ò,¾ÍÐÐÁË¡£
    (WinCEÖÐûÓиÃÊôÐÔÉèÖã¬Ö»ÄÜͨ¹ýFindwindowº¯Êý£¬²ì¿´ÊÇ·ñÒѾ­ÓгÌÐòµÄʵÀýÔÚÔËÐС£»òÕßÓÃÏÂÃæµÄMUTEX)
2. MUTEX. (һϴúÂëΪ2008)
'
ÒýÓÃMutexµÄÀà
¡¡¡¡
Imports
System.Threading
¡¡¡¡
Private

Sub
Form1_Load(
ByVal
sender
As
System.Object,
ByVal
e
As
System.EventArgs)
Handles

MyBase
.Load
¡¡¡¡
'
¶¨ÒåMutexµÄÀà
¡¡¡¡
Dim
objMutex
As
Mutex
¡¡¡¡
'
µÃµ½Ó¦ÓóÌÐòµÄÃû³Æ
¡¡¡¡
Dim
AppName
As

String

=

Assembly
.GetExecutingAssembly().GetName().Name
¡¡¡¡
'
ÓÃÕâ¸öÓ¦ÓóÌÐòµÄÃû×Ö,ȥʵÀý»¯Õâ¸öMutex
¡¡¡¡objMutex
=

New
Mutex(
False
, AppName)
¡¡¡¡
'
ÅжÏÊÇ·ñÓÐÏàͬµÄÓ¦ÓóÌÐòÔÚÔËÐÐ;
¡¡¡¡
If
objMutex.WaitOne(
0
,
False
)
=

False

Then
¡¡¡¡objMutex.Close()
¡¡¡¡objMutex
=

Nothing
¡¡¡¡MessageBox.Show(
"
Õâ¸ö³ÌÐòÕýÔÚÔËÐÐ!
"
)
¡¡¡¡Close()
'
¹Ø±ÕÕâ¸öÓ¦ÓóÌÐò
¡¡¡¡
Exit Sub
¡¡¡¡
End

If
¡¡¡¡
End Sub


Ïà¹ØÎĵµ£º

ΪʲôÎÒµÄVBÏÔʾÕÒ²»µ½¿É²åÈëµÄISAM£¿

VB6ÀïÃæµÄ°²×°ÄÚÈÝÖÐÓÐJET £¨IISAM£©²¿¼þ£¬°²×°Ê±¼ÓÒÔÑ¡Ôñ,Äã¿ÉÒÔÐÞ¸´°²×°ÄãµÄVB6¡£¾ßÌå×ö·¨ÈçÏ£º
1¡¢ÖØÐÂÆô¶¯VB°²×°³ÌÐò£¬Ñ¡È¡¹¤×÷Õ¾¹¤¾ßºÍ×é¼þ=¡·Ìí¼Ó¡¢É¾³ý³ÌÐò=¡·Êý¾Ý·ÃÎÊ=¡·¸ü¸ÄÑ¡Ïî=¡·Ñ¡ÖÐJet IIsam

2¡¢ÖØ×°VB£¬°²×°Ê±Ñ¡×Ô¶¨Ò壬ȫ²¿Ñ¡ÖС£ ......

ÖÆ×÷VB°²×°³ÌÐòÎÊ´ð(Package & Deployment)

À
±¾ÎÄ·¢±íÔÚ2000Äê4ÔÂ17ÈÕ ¡¶¼ÆËã»úÊÀ½ç¡·25ÆÚ

ÖÆ×÷°²×°³ÌÐòÍùÍùÊdzÌÐòÉè¼ÆµÄ×îºóÒ»²½£¬Í¬Ê±Ò²ÊÇÖØÒªµÄÒ»²½£¬ÒòΪÔËÐа²×°³ÌÐòÍùÍùÊÇÓû§µÄµÚÒ»¸ö²Ù×÷¡£ÏÂÃæ¾Í½éÉÜһЩÖÆ×÷
Visual Basic
°²×°³ÌÐòʱ³£Óöµ½ÎÊÌâµÄ½â¾ö·½·¨¡£
1
¡¢Ò»¸ö·Ç³£¼òµ¥µÄ
VB
³ÌÐòÊÇ·ñ¿ÉÒÔ²»ÖÆ×÷°²×°³ÌÐò
ÎÊ£º¼ÙÈçÎÒµÄ
VB5
¿ª·¢µÄ³ÌÐ ......

VB+SQL±àдÊý¾Ý¿â¹ÜÀíϵͳ

     ²ÎÕÕ°¸Àý½Ì³Ì½¨Á¢µÄÊý¾Ý¿â¹ÜÀíϵͳÔÚÉõ¶à·½Ã涼´æÔÚÎÊÌâ¡£¿ÉÄÜÊÇÐÂÊÖ£¬²»¹ÜÊǶÔÓÚ´óÒ»¾Íѧ¹ýµÄVB±à³Ì»¹ÊÇÕâ¸öѧÆÚ¸Õ½Ó´¥µÄSQL£¬ºÜ¶àСÎÊÌâ³£³£³öÏÖÔÚµ÷ÊÔ¹ý³ÌÖС£ÏëÇëÊìϤʹÓÃÕâÁ½¸öƽ̨µÄ¸ßÊÖ°ïæָµãһϡ£
     1.ÈçºÎ½â¾öDataGridÖжà¸öcolumnºÍSQLÖжà¸ö±íµÄ°ó¶¨£¿Ä¿µÄ ......

ÈçºÎʵÏÖVBÓëEXCELµÄÎÞ·ìÁ¬½Ó

 http://social.msdn.microsoft.com/Forums/zh-TW/232/thread/5b0e0eb7-9cd7-420a-9f56-e588154174ba
http://www.mndsoft.com/blog/article.asp?id=903
http://topic.csdn.net/t/20051015/14/4328396.html
¡¡¡¡VBÊdz£ÓõÄÓ¦ÓÃÈí¼þ¿ª·¢¹¤¾ßÖ®Ò»£¬ÓÉÓÚVBµÄ±¨±í¹¦ÄÜÓÐÏÞ£¬¶øÇÒÒ»µ«±¨±í¸ñʽ·¢Éú±ä»¯£¬¾ÍµÃÏàÓ¦Ð޸ijÌÐò£ ......

VBÁù¸öÊýÈ¡×î´óÖµºÍ×îСÊý

mxl=1                          && ×î´óµÄÎı¾¿ò±àºÅ
mnl=1                  &n ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ