CSSとその他のプロパティを設定するpublic関数/ subを作成します。

Question

私は特定の変数を渡すことができるPublic Sub/Functionを作成しようとしており、これが出力に影響します。例えば

DIV ID = InfoDiv
CSSクラス= "警告"
TrueまたはFalse "エラーが発生しました"
DIV可視性= LBInfoMsg.Text =

私はコード内の似た何かを入力したいですページの後ろに：

InfoMsg(InfoDiv, "warning", "An Error has Occured", True) 

私は...これは間違っているが、ここで私がこれまで試したし、失敗しているものを知っている

あまりにもラムダへの先進的な取得せず

Public Sub InfMsg(ByRef MyDIV As System.Web.UI.HtmlControls.HtmlGenericControl, ByRef CSS As System.Web.UI.WebControls.Style, ByVal strMessage As String) 
     strMessage = strMessage.Replace("'", "''") 
     MyDIV.Attributes.Add("Style", "warning") 
     MyDIV.Visible = "True" 

    End Sub 

Answer 1

、ここで私はあなたが与えた詳細に基づいて思い付いたものです：

Public Sub InfMsg(ByRef MyDIV As System.Web.UI.HtmlControls.HtmlGenericControl, ByRef CssClass As String, ByVal strMessage As String, ByVal visible As Boolean) 

    MyDIV.Attributes("style") = "visibility:" & If(visible, "visible", "hidden") & ";" 
    Dim lbl As New Label 
    lbl.CssClass = CssClass 
    lbl.Text = System.Web.HttpUtility.HtmlEncode(strMessage) 
    MyDIV.Controls.Add(lbl) 

End Sub