《Service1.asmx》

<%@ WebService Language="vb" Codebehind="Service1.asmx.vb" Class="yundan.Service1" %>

《Service1.asmx.vb》

Imports System.Web.Services

_

Public Class Service1

Inherits System.Web.Services.WebService

#Region " Web 服务设计器生成的代码 "

Public Sub New()

MyBase.New()

'该调用是 Web 服务设计器所必需的。

InitializeComponent()

'在 InitializeComponent() 调用之后添加您自己的初始化代码

End Sub

'Web 服务设计器所必需的

Private components As System.ComponentModel.IContainer

'注意：以下过程是 Web 服务设计器所必需的

'可以使用 Web 服务设计器修改此过程。

'不要使用代码编辑器修改它。

Private Sub InitializeComponent()

components = New System.ComponentModel.Container()

End Sub

Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)

'CODEGEN: 此过程是 Web 服务设计器所必需的

'不要使用代码编辑器修改它。

If disposing Then

If Not (components Is Nothing) Then

components.Dispose()

End If

End If

MyBase.Dispose(disposing)

End Sub

#End Region

Public Function test(ByVal a As Integer, ByVal b As Integer) As Integer

Return a + b

End Function

end class

《Service1.wsdl》