在做學生管理系統中,由于并不太理解函數的意思,前幾天就在程序的后面多寫了兩個0 <span style="font-family:KaiTi_GB2312;font-size:18px;">Private Sub MDIForm_Load() '從注冊表中取得上次關閉MDIForm時的大小
Me.Left = GetSetting(App.Title, "Settings", "MainLeft", 30000)
Me.Top = GetSetting(App.Title, "Settings", "MainTop", 30000)
Me.Width = GetSetting(App.Title, "Settings", "MainWidth", 80000)
Me.Height = GetSetting(App.Title, "Settings", "MainHeight", 80000)
End Sub
</span>
當時并沒有做任何記錄,異地訪問的過程當中,數據庫能連上是沒有任何問題,但是就是加載的登錄界面就消失了,沒有任何反應、提示錯誤之類的,后來在師傅的指導下,才發現這個問題,是由于多了兩個0,是窗體的大小不能顯示出來了,超出了屏幕的顯示范圍。我還以為真的消失了呢?
發現自己的問題:第一:沒有及時的記錄
第二:沒有遵循嚴格的編程標準
第三:沒有及時的學習相關的知識
第四:思考的還是太少,考慮不全,“為人民服務的宗旨”落實的不好
隨后進行了相關知識的學習
VB之savesetting|GetSetting用法(保存與索取數據)
VB 中提供了用于訪問注冊表的方法
GetSetting 函數, 從 Windows 注冊表中的應用程序項目返回注冊表項設置值。SaveSetting 語句, 在 Windows 注冊表中保存或建立應用程序項目。
DeleteSetting 語句, 在 Windows 注冊表中,從應用程序項目里刪除區域或注冊表項設置。
GetAllSettings 函數, 從 Windows 注冊表中返回應用程序項目的所有注冊表項設置及其相應值(開始是由 SaveSetting 產生)。
諸如窗口位置、使用的文件以及其它項目等程序設置值是存儲在各種 .ini 文件中。在 Windows NT、Windows 95 以及 Windows 的較新版本中,這些程序設置值則是存儲在系統注冊位置中。
Visual Basic 提供了一個標準的注冊位置以存儲創建于 Visual Basic 的應用程序的程序信息:
HKEY_CURRENT_USER\Software\VB and VBA Program Settings\appname\section\key
GetSetting 函數 從 Windows 注冊表中的應用程序項目返回注冊表項設置值。語法GetSetting(appname, section, key[, default])GetSetting 函數的語法具有下列命名參數:部分描述appname必要。字符串表達式,包含應用程序或工程的名稱,要求這些應用程序或工程有注冊表項設置。section必要。字符串表達式,包含區域名稱,要求該區域有注冊表項設置。key必要。字符串表達式,返回注冊表項設置的名稱。default可選。表達式,如果注冊表項設置中沒有設置值,則返回缺省值。如果省略,則 default 取值為長度為零的字符串 ("")。說明如果 GetSetting 的參數中的任何一項都不存在,則 GetSetting 返回 default 的值。 該方法其實讀取,注冊表中HKEY_CURRENT_USER\Software\VB and VBA Program Settings下相應的值。 ?。? 語法 GetSetting(appname, section, key[, default]) GetSetting 函數的語法具有下列命名參數: 部分 描述 appname 必要。字符串表達式,包含應用程序或工程的名稱,要求這些應用程序或工程有注冊表項設置。 section 必要。字符串表達式,包含區域名稱,要求該區域有注冊表項設置。 key 必要。字符串表達式,返回注冊表項設置的名稱。 default 可選。表達式,如果注冊表項設置中沒有設置值,則返回缺省值。如果省略,則 default 取值為長度為零的字符串 ("")。 說明 如果 GetSetting 的參數中的任何一項都不存在,則 GetSetting 返回 default 的值。