Public Class Search Inherits System.Web.UI.Page Dim strTitle As String = Me.TB_Title.Text Dim strAuthor As String = Me.TB_Author.Text Dim strSubject As String = Me.TB_Subject.Text Dim strKeywords As String = Me.TB_Keyword.Text Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load End Sub Protected Sub BTN_Submit_Click(ByVal sender As Object, ByVal e As EventArgs) Handles BTN_Submit.Click If TB_Title.Text = "" And TB_Author.Text = "" And TB_Subject.Text = "" And TB_Keyword.Text = "" Then CV_BlankField.Visible = True Else CV_BlankField.Visible = False End If End Sub Protected Sub BTN_Clear_Click(ByVal sender As Object, ByVal e As EventArgs) Handles BTN_Clear.Click strTitle = "" strAuthor = "" strSubject = "" strKeywords = "" End Sub End Class
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)