VB.NET编程中有一种叫做Singleton的模式，它的影音方法简单灵活，可以帮助开发人员轻松的解决相关问题。那么如何才能正确的实现应用VB.NET Singleton这一模式呢？在这里就为大家详细介绍一下。

在网上搜索了下，VB.NET Singleton实现的例子还真不多,代码以Java和C#的居多，C++次之，vb最少，偶尔翻到一篇,代码资源耗用可能高了点，Singleton的代码实例都很简单，结合Double-checked locking,在公共代码的基础上修改个lazy initializtion的代码，关于singleton就不多说了，一个类一个实例，更详细的解释参考GOF 的设计模式一书吧~lazy initializtion实现了用时初始化，也是很有意义的。都说Singleton是概念最简单，最没用，但又最难实现的。呵呵~我也不清楚，没有实践没有发言权。了解下VB.NET Singleton，为日后学习设计模式打下基础也是很有必要的。

public Class Singleton   
private shared _Singleton as singleton = nothing   
private shared _Mutex as new system.threading.Mutex '进程同步   
private sub new ()  
'类构造  
end sub  
public shared function Instance () as singleton  
if _singleton is nothing then 'double-checked locking  
_mutex.waitone()   
try   
if _singleton is nothing then   
_singleton = new singleton   
end if   
finally   
_mutex.releaseMutex()  
end try   
end if   
return _singleton  
end function  
end class 

代码中mutex被声明成Shared，如果是非shared,需要通过获取实例的方法调用mutex的方法，SIngleton.instance._mutex.waitone(), .net Framework和Jvm在底层上的实现细节差异撒卡还弄不清除，不过查到一篇文章说Double checked locking也是线程不安全，更好的方法有待去探索，包括轻量级的VB.NET Singleton. ：）

【编辑推荐】

1. VB.NET运算符过程应在何时定义
2. VB.NET Boolean作用详解
3. VB.NET递归过程使用注意事项
4. VB.NET Radiobutton控件使用方法浅谈
5. VB.NET继承规则详细介绍