VB记录窗体的大小和位置


在我们写程序的时候,有时需要记录当前窗体位置和大小,以便下次打开时恢复上次的大小跟位置,像一般的播放器 浏览器就有这个功能


通过注册表记录窗体的大小跟位置


 

复制代码
Private Sub Form_Load()
     Me.Width = GetSetting(App.Title, Me.Name, "Width", 7200)
     Me.Height = GetSetting(App.Title, Me.Name, "Height", 6300)
     Me.Top = GetSetting(App.Title, Me.Name, "Top", 100)
     Me.Left = GetSetting(App.Title, Me.Name, "Left", 100)
End Sub

Private Sub Form_Unload(Cancel As Integer)
     Call SaveSetting(App.Title, Me.Name, "Width", Me.Width)
     Call SaveSetting(App.Title, Me.Name, "Height", Me.Height)
     Call SaveSetting(App.Title, Me.Name, "Top", Me.Top)
     Call SaveSetting(App.Title, Me.Name, "Left", Me.Left)
End Sub
复制代码

 


 

posted @   刘水镜  阅读(420)  评论(0编辑  收藏  举报
编辑推荐:
· 如何编写易于单元测试的代码
· 10年+ .NET Coder 心语,封装的思维:从隐藏、稳定开始理解其本质意义
· .NET Core 中如何实现缓存的预热?
· 从 HTTP 原因短语缺失研究 HTTP/2 和 HTTP/3 的设计差异
· AI与.NET技术实操系列:向量存储与相似性搜索在 .NET 中的实现
阅读排行:
· 10年+ .NET Coder 心语 ── 封装的思维:从隐藏、稳定开始理解其本质意义
· 地球OL攻略 —— 某应届生求职总结
· 提示词工程——AI应用必不可少的技术
· Open-Sora 2.0 重磅开源!
· 周边上新:园子的第一款马克杯温暖上架
点击右上角即可分享
微信分享提示