做一个计划,写如下代码
Dim frm = Windows.Forms.Form.ActiveFormIf frm IsNot Nothing Then If frm.Name = "hb" Then frm.Controls("TextBox1").Font = new Font("宋体", 15) frm.controls("Button1").Text = "OK" frm.controls("Button2").Text = "Cancel" End IfEnd If