fixed VB WebService file template

data/templates/file/VBNet/VBNet.Web.WebService.xft

@@ -22,34 +22,26 @@
 	 -->
 	<Files>
 		<File name="${Path}/${FileNameWithoutExtension}.vb" DependentUpon="${FileName}" language="VBNET"><![CDATA[${StandardHeader.VBNET}
-using System;
+Imports System
-using System.Web.Services;
+Imports System.Web.Services
 
-namespace ${StandardNamespace}
+''' <summary>
-{
+''' Description of ${ClassName}
-	/// <summary>
+''' </summary>
-	/// Description of ${ClassName}
+<WebService(Name := "${ClassName}", Description := "${ClassName}", Namespace := "http://www.${ClassName}.example")>
-	/// </summary>
+Public Class ${ClassName}
-	[WebService
+	Inherits WebService
- 	 (	Name = "${ClassName}",
+	
-  		Description = "${ClassName}",
+	Public Sub New()
-  		Namespace = "http://www.${ClassName}.example"
- 	 )
-	]
-	public class ${ClassName} : WebService
-	{
-		public ${ClassName}()
-		{
-		}
 		
-		[WebMethod]
+	End Sub
-		public string Status()
+	
-		{
+	<WebMethod> _
-			string s = string.Format("Time: {0}", DateTime.Now);
+	Public Function Status() As String
-			return s;
+		Dim s As String = String.Format("Time: {0}", DateTime.Now)
-		}
+		Return s
-	}
+	End Function
-}
+End Class
 ]]></File>
 		<File name="${FullName}"><![CDATA[
 <%@ WebService  Class="${StandardNamespace}.${ClassName}" Language="VB" %>