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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
<?xml version="1.0"?>
<Template author="Siegfried Pammer" version="1.0.0">
<Config
name = "${res:Templates.File.Exception.Name}"
icon = "VBNet.File.NewClass"
category = "VB"
defaultname = "Exception.vb"
language = "VBNet"/>
<Description>${res:Templates.File.Exception.Description}</Description>
<!--
Special new file templates:
${StandardNamespace} -> Standardnamespace of the current project or FileNameWithoutExtension
${FullName} -> Full generated path name
${FileName} -> File name with extension
${FileNameWithoutExtension} -> File name without extension
${Extension} -> Extension in the form ".vb"
${Path} -> Full path of the file
-->
<!--<Properties>
<Property
name = "IsSealed"
localizedName = "${res:Templates.File.Properties.IsSealed}"
type = "System.Boolean"
defaultValue = "False"
category = "${res:Templates.File.Properties.ContextCategory}"
description = "${res:Templates.File.Properties.IsSealed.Description}"
/>
</Properties>-->
<Files>
<File name="${FullName}" language="VBNET"><![CDATA[${StandardHeader.VBNET}
Imports System
Imports System.Runtime.Serialization
Namespace ${StandardNamespace}
''' <summary>
''' Desctiption of ${ClassName}.
''' </summary>
Public Class ${ClassName}
Inherits Exception
Implements ISerializable
Public Sub New()
End Sub
Public Sub New(message As String)
MyBase.New(message)
End Sub
Public Sub New(message As String, innerException As Exception)
MyBase.New(message, innerException)
End Sub
' This constructor is needed for serialization.
Protected Sub New(info As SerializationInfo, context As StreamingContext)
MyBase.New(info, context)
End Sub
End Class
End Namespace]]></File>
</Files>
<AdditionalOptions/>
</Template>
|