主题：AddInput批量禁止编辑

 With  wb.AddInputGroup("form1","ipg1","客户【基本资料】")
                .AddInput("客户编码","客户编码","text").Value = dr("客户编码")
                .AddInput("客户名称","客户名称","text").Value = dr("客户名称")
                .AddInput("营业执照号","营业执照号","text").Value = dr("营业执照号")
                .AddInput("税务登记号","税务登记号","text").Value = dr("国税登记号")
                .AddInput("登记类型","登记类型","text").Value = dr("注册登记类型")
                .AddInput("纳税人资格","纳税人资格","text").Value = dr("纳税人资格")
                .AddInput("所得税类型","所得税类型","text").Value = dr("所得税")
                Dim jydz As String = dr("住所_县") & dr("住所_镇以下")
                .AddInput("经营地址","经营地址","text").Value = ""& jydz &""
End With

老师，通过以上代码增加的输入框，如何批量禁止编辑？或者有替代控件吗？要求赋值显示，不可修改。谢谢！

知道了，我简单的一个页面就是按照此方法做的。谢谢！