打开窗口，用代码批量更改了窗口按钮的名称。
执行后，在命令窗口的下部显示区域，已经看到了更改的结果。
然后关闭窗口，打开窗口设计，却发现这些按钮名称并没有改，还是和原来一样。
加上项目保存的系统命令，执行后效果一样。
怎么能保存批量更改了的窗口按钮名称呢？
代码：
Dim ctl As WinForm.Control
Dim btn As WinForm.Button
Dim str As String
Dim i, i2 As Integer
i = 1
i2 = 1
For Each ctl In Forms("窗口1").Controls
If Typeof ctl Is WinForm.Button Then
btn = ctl
If btn.Name.StartsWith("Button") Then
Else
str = btn.Name
str = "Button__" & str
btn.Name = str
output.show("i = " & i & " btn.Name = " & btn.Name)
i = i + 1
End If
End If
output.show("i2 = " & i2)
i2 = i2 + 1
Next
Syscmd.Project.Save()
加好友 
发短信
Post By：2020/8/26 15:00:00 [显示全部帖子]
