分類(lèi): 電腦/網(wǎng)絡(luò) 程序設(shè)計(jì) 其他編程語(yǔ)言
成都創(chuàng)新互聯(lián)公司服務(wù)項(xiàng)目包括衡東網(wǎng)站建設(shè)、衡東網(wǎng)站制作、衡東網(wǎng)頁(yè)制作以及衡東網(wǎng)絡(luò)營(yíng)銷(xiāo)策劃等。多年來(lái),我們專(zhuān)注于互聯(lián)網(wǎng)行業(yè),利用自身積累的技術(shù)優(yōu)勢(shì)、行業(yè)經(jīng)驗(yàn)、深度合作伙伴關(guān)系等,向廣大中小型企業(yè)、政府機(jī)構(gòu)等提供互聯(lián)網(wǎng)行業(yè)的解決方案,衡東網(wǎng)站推廣取得了明顯的社會(huì)效益與經(jīng)濟(jì)效益。目前,我們服務(wù)的客戶以成都為中心已經(jīng)輻射到衡東省份的部分城市,未來(lái)相信會(huì)繼續(xù)擴(kuò)大服務(wù)區(qū)域并繼續(xù)獲得客戶的支持與信任!
問(wèn)題描述:
一個(gè) vb 程序中,想在程序關(guān)閉的時(shí)候保存一些變量,在下次打開(kāi)的時(shí)候可以繼續(xù)使用,請(qǐng)問(wèn)應(yīng)該怎么做?vb 中是否有現(xiàn)成的和函數(shù)可用?
解析:
有,使用app.config或自定義xml文件或讀寫(xiě)注冊(cè)表或用數(shù)據(jù)庫(kù),看MSDN
DLL(動(dòng)態(tài)鏈接庫(kù))是一個(gè)很有用的東西,在開(kāi)發(fā)大項(xiàng)目的時(shí)候顯得非常重要,因?yàn)槎嗳撕献鏖_(kāi)發(fā)時(shí),可以給每個(gè)人分配一個(gè)任務(wù),用DLL完成,最后組合起來(lái),就不會(huì)出現(xiàn)互相沖突的問(wèn)題。這里給出最簡(jiǎn)單的DLL編寫(xiě)與調(diào)用的示例
首先,我們打開(kāi)VB.NET,選擇類(lèi)庫(kù),名稱(chēng)改為test
然后輸入以下代碼
Public?Class?test
Public?Function?test(ByVal?a?As?Long,?ByVal?b?As?Long)?As?Long
Return?a?+?b
End?Function
End?Class
保存后,生成DLL文件。
這就是最簡(jiǎn)單的一個(gè)DLL,下面是調(diào)用該DLL的示例
新建一個(gè)工程,單擊“項(xiàng)目” -- 添加引用
找到剛才生成的DLL,雙擊它
添加引用以后,似乎什么也沒(méi)發(fā)生,這時(shí)我們輸入以下代碼:
Imports test.test
這樣,就包含了該DLL的類(lèi)。
然后我們定義一個(gè)類(lèi)
Dim test As New test.test
這樣,就可以使用里面的函數(shù)了,下面是程序示例
Imports?test.test
Public?Class?Form1
Private?Sub?Form1_Load(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?MyBase.Load
Dim?test?As?New?test.test
MsgBox(test.test(1,?2))
End?Sub
End?Class
運(yùn)行該程序,可以看到,調(diào)用了DLL內(nèi)的函數(shù)。
這就是最簡(jiǎn)單的DLL示例,可以將一些復(fù)雜的代碼集成到DLL里,以后升級(jí)或重用都比較方便。
設(shè)計(jì)功能
說(shuō)明:第一個(gè)參考頁(yè)導(dǎo)入了System.IO
功能sdGetIniInfo(字符串的BYVAL iniSection的字符串,BYVAL INIFILE),如果該字符串/ File.Exists (INIFILE返回的“文件”INIFILE的的)
,而“未找到,以確保路徑和文件名是否正確!”如果
黑暗iniRead
昏暗的iniStr新的StreamReader(INIFILE),的字符串iniRead.ReadToEnd
朦朧朦朧的整數(shù)
最后的出口,克萊因整數(shù)
昏暗的NOSEC布爾=假
作為一個(gè)字符的字符串昏暗的getValue“
黑暗的壁櫥
衣柜iniStr.Split(CHR(13 ))CLINE = UBOUND功能的(CLST)
= 0 CLINE
衣柜(I)的indexOf(“=”) 0,
衣柜(I)分裂(“=”) (0)TRIM()= iniSection
NOSEC =
的getValue = CLST(I)分裂(“=”;)(1)修剪()
BR /退出
最后,如果
如果NOSEC = TRUE
返回的getValue BR /
的安裝信息沒(méi)有找到“iniSection!”
功能
====如果=================== ===================
TEXT1 = sdGetIniInfo(路徑,“名稱(chēng)”)
事實(shí)上,無(wú)論是ini文本文件XML只使用一定的格式,或所謂的數(shù)據(jù)結(jié)構(gòu),在最后的分析中,實(shí)現(xiàn)的文件操作的功能只是一個(gè)包文件的讀取和寫(xiě)入操作。
是不是寫(xiě)一個(gè)函數(shù)的API!
分享名稱(chēng):vb點(diǎn)虐
程序配置文件 vbnet byval
本文地址:http://www.rwnh.cn/article10/ddcppgo.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站制作、品牌網(wǎng)站制作、移動(dòng)網(wǎng)站建設(shè)、軟件開(kāi)發(fā)、面包屑導(dǎo)航、網(wǎng)站策劃
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)
猜你還喜歡下面的內(nèi)容