If you are working with a constant string value you can do something like
Code:
Option Explicit
Public Const strText as String = "Student Name"
Sub ShowMe()
MsgBox "The value is: " & strText
End Sub
Sub ShowMeToo()
MsgBox "The value is still: " & strText
End Sub