test.vb

asp做的新闻系统

Public Class test Inherits System.Web.UI.Page

   '声明变量,并未变量赋值
    Dim strFirstName As String = "Li", strLastName = "Ming"

   Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
   '在页面上输出变量
        	Response.Write("欢迎您：" + strFirstName + " " + strLastName)
   End Sub
End Class