关键词搜索

源码搜索 ×
×

VB.NET中的单例模式

发布2022-06-04浏览629次

详情内容

vb.net教程icon-default.png?t=M4ADhttps://www.xin3721.com/eschool/vbnetxin3721/

Visual Basic .NET 和 Visual C# .NET都属于.NET平台下的语言，它们之间的本质区别较小，区别基本都是语法结构上的，网上提供了很多关于Visual C# .NET的设计模式的例子，唯独Visual Basic .NET基本没有。既然两种语言都属于.NET平台，并且最终都是通过MSIL和CLR机制来运行，要实现它们之间的转换并不难。

在参照了Terry Lee的设计模式系列之单例模式之后，我把它们改造为Visual Basic代码。

单例模式的五种写法。

引用：.NET设计模式（2）：单件模式（Singleton Pattern） - TerryLee - 博客园

1.简单实现

注意：这种方式创建是线程不安全的

C# Code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
public sealed class Singleton
{
    static Singleton instance=null;
 
    Singleton()
    {
    }
 
    public static Singleton Instance
    {
        get
        {
            if (instance==null)
            {
                instance = new Singleton();
            }
            return instance;
        }
    }
}

 

VB Code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Public NotInheritable Class Singleton
    Shared m_instance As Singleton = Nothing
 
    Private Sub New()
    End Sub
 
    Public Shared ReadOnly Property Instance() As Singleton
        Get
            If m_instance Is Nothing Then
                m_instance = New Singleton()
            End If
            Return m_instance
        End Get
    End Property
End Class

2.安全的线程

C# Code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
public sealed class Singleton
{
     static Singleton instance=null;
     static readonly object padlock = new object();
  
     Singleton()
     {
     }
  
    public static Singleton Instance
    {
        get
        {
            lock (padlock)
            {
                if (instance==null)
                {
                    instance = new Singleton();
                }
                return instance;
            }
        }
    }
}

VB Code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Public NotInheritable Class Singleton
    Shared m_instance As Singleton = Nothing
    Shared ReadOnly padlock As New Object()
 
    Private Sub New()
    End Sub
 
    Public Shared ReadOnly Property Instance() As Singleton
        Get
            SyncLock padlock
                If m_instance Is Nothing Then
                    m_instance = New Singleton()
                End If
                Return m_instance
            End SyncLock
        End Get
    End Property
End Class

3.双重锁定

C# Code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
public sealed class Singleton
{
     static Singleton instance=null;
     static readonly object padlock = new object();
  
     Singleton()
     {
     }
  
    public static Singleton Instance
    {
        get
        {
            if (instance==null)
            {
                lock (padlock)
                {
                    if (instance==null)
                    {
                        instance = new Singleton();
                    }
                }
            }
            return instance;
        }
    }
}

VB Code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Public NotInheritable Class Singleton
    Shared m_instance As Singleton = Nothing
    Shared ReadOnly padlock As New Object()
 
    Private Sub New()
    End Sub
 
    Public Shared ReadOnly Property Instance() As Singleton
        Get
            If m_instance Is Nothing Then
                SyncLock padlock
                    If m_instance Is Nothing Then
                        m_instance = New Singleton()
                    End If
                End SyncLock
            End If
            Return m_instance
        End Get
    End Property
End Class

4.静态初始化（首选方式）

C# Code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
public sealed class Singleton
{
     static readonly Singleton instance=new Singleton();
  
     static Singleton()
     {
     }
  
     Singleton()
    {
    }
 
    public static Singleton Instance
    {
        get
        {
            return instance;
        }
    }
}

VB Code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Public NotInheritable Class Singleton
    Shared ReadOnly m_instance As New Singleton()
 
    Shared Sub New()
    End Sub
 
    Private Sub New()
    End Sub
 
    Public Shared ReadOnly Property Instance() As Singleton
        Get
            Return m_instance
        End Get
    End Property
End Class

5.延迟初始化（比较常用）

C# Code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
public sealed class Singleton
 {
     Singleton()
     {
     }
  
     public static Singleton Instance
     {
         get
        {
            return Nested.instance;
        }
    }
     
    class Nested
    {
        static Nested()
        {
        }
 
        internal static readonly Singleton instance = new Singleton();
    }
}

VB Code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Public NotInheritable Class Singleton
    Private Sub New()
    End Sub
 
    Public Shared ReadOnly Property Instance() As Singleton
        Get
            Return Nested.instance
        End Get
    End Property
 
    Private Class Nested
        Shared Sub New()
        End Sub
 
        Friend Shared ReadOnly instance As New Singleton()
    End Class
End Class

 

 

实现要点
        Singleton模式是限制而不是改进类的创建。
         Singleton类中的实例构造器可以设置为Protected以允许子类派生。
         Singleton模式一般不要支持Icloneable接口，因为这可能导致多个对象实例，与Singleton模式的初衷违背。
         Singleton模式一般不要支持序列化，这也有可能导致多个对象实例，这也与Singleton模式的初衷违背。
         Singleton只考虑了对象创建的管理，没有考虑到销毁的管理，就支持垃圾回收的平台和对象的开销来讲，我们一般没必要对其销毁进行特殊的管理。
         理解和扩展Singleton模式的核心是“如何控制用户使用new对一个类的构造器的任意调用”。
 
 
         可以很简单的修改一个Singleton，使它有少数几个实例，这样做是允许的而且是有意义的。
优点
         实例控制：Singleton 会阻止其他对象实例化其自己的 Singleton 对象的副本，从而确保所有对象都访问唯一实例
         灵活性：因为类控制了实例化过程，所以类可以更加灵活修改实例化过程
缺点
         开销：虽然数量很少，但如果每次对象请求引用时都要检查是否存在类的实例，将仍然需要一些开销。可以通过使用静态初始化解决此问题，上面的五种实现方式中已经说过了。
          可能的开发混淆：使用 singleton 对象（尤其在类库中定义的对象）时，开发人员必须记住自己不能使用 new 关键字实例化对象。因为可能无法访问库源代码，因此应用程序开发人员可能会意外发现自己无法直接实例化此类。
         对象的生存期：Singleton 不能解决删除单个对象的问题。在提供内存管理的语言中（例如基于 .NET Framework 的语言），只有 Singleton 类能够导致实例被取消分配，因为它包含对该实例的私有引用。在某些语言中（如 C++），其他类可以删除 
对象实例，但这样会导致 Singleton 类中出现悬浮引用。
适用性
         当类只能有一个实例而且客户可以从一个众所周知的访问点访问它时。
         当这个唯一实例应该是通过子类化可扩展的，并且客户应该无需更改代码就能使用一个扩展

实现要点

l        Singleton模式是限制而不是改进类的创建。

l         Singleton类中的实例构造器可以设置为Protected以允许子类派生。

l         Singleton模式一般不要支持Icloneable接口，因为这可能导致多个对象实例，与Singleton模式的初衷违背。

l         Singleton模式一般不要支持序列化，这也有可能导致多个对象实例，这也与Singleton模式的初衷违背。

l         Singleton只考虑了对象创建的管理，没有考虑到销毁的管理，就支持垃圾回收的平台和对象的开销来讲，我们一般没必要对其销毁进行特殊的管理。

l         理解和扩展Singleton模式的核心是“如何控制用户使用new对一个类的构造器的任意调用”。

 

 

l         可以很简单的修改一个Singleton，使它有少数几个实例，这样做是允许的而且是有意义的。

优点

l         实例控制：Singleton 会阻止其他对象实例化其自己的 Singleton 对象的副本，从而确保所有对象都访问唯一实例

l         灵活性：因为类控制了实例化过程，所以类可以更加灵活修改实例化过程

缺点

l         开销：虽然数量很少，但如果每次对象请求引用时都要检查是否存在类的实例，将仍然需要一些开销。可以通过使用静态初始化解决此问题，上面的五种实现方式中已经说过了。

l          可能的开发混淆：使用 singleton 对象（尤其在类库中定义的对象）时，开发人员必须记住自己不能使用 new 关键字实例化对象。因为可能无法访问库源代码，因此应用程序开发人员可能会意外发现自己无法直接实例化此类。

l         对象的生存期：Singleton 不能解决删除单个对象的问题。在提供内存管理的语言中（例如基于 .NET Framework 的语言），只有 Singleton 类能够导致实例被取消分配，因为它包含对该实例的私有引用。在某些语言中（如 C++），其他类可以删除 
对象实例，但这样会导致 Singleton 类中出现悬浮引用。

适用性

l         当类只能有一个实例而且客户可以从一个众所周知的访问点访问它时。

l         当这个唯一实例应该是通过子类化可扩展的，并且客户应该无需更改代码就能使用一个扩展的实例时。

 

相关技术文章

最新源码

下载排行榜
点击QQ咨询
开通会员
返回顶部
×
微信扫码支付 元
微信扫码支付
确定支付下载
请使用微信描二维码支付
×

提示信息

×

选择支付方式

  • 微信支付
  • 支付宝付款
确定支付下载