十年網(wǎng)站開(kāi)發(fā)經(jīng)驗(yàn) + 多家企業(yè)客戶 + 靠譜的建站團(tuán)隊(duì)
量身定制 + 運(yùn)營(yíng)維護(hù)+專業(yè)推廣+無(wú)憂售后,網(wǎng)站問(wèn)題一站解決
繼承ICollection(Of T),或者是ILIst(Of T),IDIctionary(Of TKey, TValue)等這些接口(具體哪個(gè)取決于你的Collection的性質(zhì))

公司主營(yíng)業(yè)務(wù):網(wǎng)站設(shè)計(jì)制作、成都做網(wǎng)站、移動(dòng)網(wǎng)站開(kāi)發(fā)等業(yè)務(wù)。幫助企業(yè)客戶真正實(shí)現(xiàn)互聯(lián)網(wǎng)宣傳,提高企業(yè)的競(jìng)爭(zhēng)能力。創(chuàng)新互聯(lián)是一支青春激揚(yáng)、勤奮敬業(yè)、活力青春激揚(yáng)、勤奮敬業(yè)、活力澎湃、和諧高效的團(tuán)隊(duì)。公司秉承以“開(kāi)放、自由、嚴(yán)謹(jǐn)、自律”為核心的企業(yè)文化,感謝他們對(duì)我們的高要求,感謝他們從不同領(lǐng)域給我們帶來(lái)的挑戰(zhàn),讓我們激情的團(tuán)隊(duì)有機(jī)會(huì)用頭腦與智慧不斷的給客戶帶來(lái)驚喜。創(chuàng)新互聯(lián)推出芒市免費(fèi)做網(wǎng)站回饋大家。
具體語(yǔ)法的話……
Public Class MyCollection(Of T)
Implement ICollection(Of T)
………………
End Class
然后繼承出來(lái)的函數(shù)應(yīng)該怎么辦建議看MSDN,每個(gè)接口繼承出來(lái)的函數(shù)都不一樣
通用的是GetEnumerator()這個(gè),如果你用的一個(gè)集成了IEnumerable的字段那直接Return m_field.GetEnumerator()就可以
public function createstringarr() as string()
return new string(){"d1","d2","d3","d4"}
end function
常用不常用,要看每個(gè)人的編程方向和使用習(xí)慣的!一般字符串函數(shù)和類型轉(zhuǎn)換函數(shù)都是要用的
VB6的String()函數(shù),在VB.NET中,改用 StrDup()函數(shù),使用格式與VB6的String()函數(shù)類似:
例如:
VB6中,String(5,"*") ,是產(chǎn)生5個(gè)星號(hào)字符,"*****"
VB.Net中,改用 StrDup(5,"*") ,也是產(chǎn)生5個(gè)星號(hào)字符,"*****"
很簡(jiǎn)單,在end select前再多加一種情況case else return "XXXx",因?yàn)槟阒惶峁┝?-9這10種情況
Public Function Zuhe(ByVal qa As String) As String
Select Case qa
Case "0"
Return "1"
Case "1"
Return "3"
Case "2"
Return "4"
Case "3"
Return "6"
Case "4"
Return "2"
Case "5"
Return "8"
Case "6"
Return "9"
Case "7"
Return "7"
Case "8"
Return "5"
Case "9"
Return "0"
Case else
Return "XXXX"
End Select
End Function