Public Overridable Property Theme As String

Dim instance As Page
Dim value As String

value = instance.Theme

instance.Theme = value

public virtual string Theme { get; set; }

public:
virtual property String^ Theme {
    String^ get ();
    void set (String^ value);
}

/** @property */
public String get_Theme ()

/** @property */
public void set_Theme (String value)

public function get Theme () : String

public function set Theme (value : String)

Public Sub Page_PreInit(ByVal Sender As Object, ByVal e As EventArgs)
      
  ' Get the theme name from a QueryString variable
  Dim ThemeName As String
  ThemeName = Request.QueryString("thename")
  If ThemeName <> Nothing Then
    Page.Theme = ThemeName
  End If
End Sub

void Page_PreInit(object sender, EventArgs e)
{
  // Get the theme name from a QueryString variable
  string ThemeName;
  ThemeName = Request.QueryString["thename"];
  if (ThemeName != null)
  {
    Page.Theme = ThemeName;
  }
}