Trucos de ASP.NET Función para cargar los H1

Normalmente en programación Web solemos tener los titulares en H1. Podemos realizar una función generica que se encargue de cargar el texto deseado en el titular:

#Region "CargarH1"
Public Sub CargarH1(ByVal textoH1 As String)
Dim H1 As HtmlGenericControl

H1 = CType(FindControl("h1"), HtmlGenericControl)

If Not IsNothing(H1) Then
H1.InnerHtml = textoH1
End If
End Sub
#End Region

Ya tenemos una función que carga el texto en los H1. Igualmente podriamos hacerlo para los H2, H3...