以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  批量改键名  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=187456)

--  作者：瑞峰 --  发布时间：2023/7/19 16:58:00 --  批量改键名 以下代码 没有实现效果。 可以打开设计模式？ Dim s As String For Each frm As WinForm.Form In Forms         If frm.name <> "到货计划"  Then Continue For          If frm.Opened = False Then frm.Open     For Each c As Winform.Control In frm.Controls         If c.Visible = False Then Continue For         If Typeof c Is WinForm.Button Then             Dim btn As WinForm.Button = c             s = btn.text             If s.Contains("新建") Then  btn.Name ="New"             If s.Contains("保存") Then  btn.Name ="Save"             If s.Contains("删除") Then  btn.Name ="Del"             If s.Contains("撤销") Then  btn.Name ="Reject"             If s.Contains("关闭") Then  btn.Name ="Close"             If s.Contains("导入") Then  btn.Name ="Import"             If s.Contains("导出") Then  btn.Name ="Export"         End If     Next     Syscmd.Project.Save()     frm.Close Next

--  作者：有点蓝 --  发布时间：2023/7/19 17:24:00 --   使用代码更改控件名称标题都是临时性的，仅在窗口打开的时候有效。控件名称是没有办法使用代码永久更改的