你別侮辱了程式員。
創(chuàng)新互聯(lián)是一家專注于成都網(wǎng)站制作、成都做網(wǎng)站和成都二樞機(jī)房的網(wǎng)絡(luò)公司,有著豐富的建站經(jīng)驗(yàn)和案例。
如果你是想學(xué)習(xí),我很愿意教你,如果你是所謂的興趣而已,那么就更應(yīng)該靠自己。
以上你所說的東西,很容易寫,但是從我開始學(xué)的時候,你知道我花了多少時間才完成嗎?
你不把問題發(fā)出來,一個語句一個小問題,那需要多少的實(shí)踐?
鄙視你。
你可以定義一個數(shù)組,其中每一個元素都是一個結(jié)構(gòu),在每一個結(jié)構(gòu)中存放每一個人的姓名、年齡等信息。這需要用到類。
創(chuàng)建類,然后定義結(jié)構(gòu)中包含的所有數(shù)據(jù),然后在程序中創(chuàng)建數(shù)組,定義每一個數(shù)組的元素都是一個這樣的類,并且在定義后使用New子句將其實(shí)力化.關(guān)于類,你可以參考你的學(xué)習(xí)用書,定義應(yīng)該不成問題,關(guān)鍵看這種思路吧.
例如定義類,內(nèi)容:
Public Class VarClass
Public Class Student
Public Name As String
Public NamePass As String
Public Number As UInt16
Public Dis, Stu As New Collection
Public ToDis, ToStu As Decimal
End Class
End Class
然后在程序代碼中:Public People(10) As Object
注意一定要先定義Object,因?yàn)閿?shù)組無法使用New子句
然后實(shí)例化:
For a = 0 To (My.Forms.Form1.StuNum - 1)
People(a) = New VarClass.Student
Next
定義完成!
For a=0 to 10 do
If People(a).Name=Name(選中的名字) then
textbox1.text=People(a).Age
exit for
End if
然后根據(jù)ListBox中選中項(xiàng)的Text,使用For.Each(在數(shù)量無法確定的情況下)或者For.do語句,遍歷數(shù)組中每個元素,即結(jié)構(gòu)中的姓名域,如果找到,就把該結(jié)構(gòu)中的其它幾項(xiàng)內(nèi)容分別賦給TextBox的Text,并且用Exit For跳出For語句.
成功!
在工程里面建立一個VS自帶的本地?cái)?shù)據(jù)庫,用數(shù)據(jù)庫來操作要方便得多,追求性能的話,圖片單獨(dú)創(chuàng)建一個圖片目錄來存放,數(shù)據(jù)庫里面存入圖片鏈接,如果圖片需要保密,那就直接放到數(shù)據(jù)庫。
用Excel操作也是可以的,引用Microsoft.Office.Tools.Excel,然后在VB.NET里面對Exce進(jìn)行修改,圖片的話,創(chuàng)建一個圖片目錄,Excel存入圖片名稱,在代碼里面對目錄下的名稱進(jìn)行匹配,讀取到ListView,我電腦上沒裝Excel沒法給你寫相關(guān)Excel的代碼示例!
先構(gòu)造一個類,屬性有姓名性別之類。還是要用數(shù)據(jù)庫,不是要存在文本文件里吧。VB 有類的模板,但是內(nèi)容還是你自己做吧……才 10 分啊
本文標(biāo)題:vb.net個人通訊錄 vb個人通訊錄管理系統(tǒng)
轉(zhuǎn)載源于:http://www.yijiale78.com/article10/dooicgo.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站導(dǎo)航、網(wǎng)頁設(shè)計(jì)公司、小程序開發(fā)、自適應(yīng)網(wǎng)站、App設(shè)計(jì)、網(wǎng)站營銷
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)