ファイル名：Class1.vb Imports Microsoft.VisualBasic Public Class Class1 Public Function func() As String Return "テスト" End Function End Class
ファイル名：default.aspx Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Dim s As String s = "テスト" Diagnostics.Debug.WriteLine(s) Dim cls As Class1 = New Class1 Diagnostics.Debug.WriteLine(cls.func()) End Sub
