weixin_33866037的博客

转载 一个很不错的清空页面所有文本框内容的函数（也可随意改成页面其他控件类型）...

Private Sub SetTextBoxValue()Sub SetTextBoxValue(ByVal Page As Control, ByVal TextBoxValue As String)    For Each ctl As Control In Page.Controls            If TypeOf ctl Is TextBox Then              ...