VB.NET判斷數(shù)組維數(shù)具體實(shí)現(xiàn)方法探討
VB.NET編程人員在操作數(shù)組時(shí)，經(jīng)常會(huì)遇到需要對(duì)所操作數(shù)組進(jìn)行維數(shù)的判斷，那么應(yīng)該如何才能正確的實(shí)現(xiàn)這一功能呢？下面我們就一起來看看VB.NET判斷數(shù)組維數(shù)的相關(guān)操作技巧，以增加大家的編程經(jīng)驗(yàn)。
首先，大家應(yīng)該知道，VB.NET語言特點(diǎn)非常突出：
1.代碼托管。被托管的代碼享受.netframework提供的安全保障和垃圾回收機(jī)制，但是這也同時(shí)表明，你的程序被框在Framework里面了。API變得不太方便。
2.強(qiáng)大的面向?qū)ο筇匦浴，F(xiàn)在VB7已經(jīng)是一個(gè)完全的面向?qū)ο蟪绦颉，F(xiàn)在VB7已經(jīng)支持類的各種特性：繼承，函數(shù)的覆蓋，重載，虛擬，隱藏……
3.功能強(qiáng)大，程序界面更標(biāo)準(zhǔn)。
4.程序代碼結(jié)構(gòu)化更強(qiáng)，開發(fā)環(huán)境舒適體貼。
VB.net常常被人稱為VB7.0即對(duì)VB6的升級(jí)是不對(duì)的，幾乎在.net中的思想已經(jīng)完全改變了，VB6中是基于事件和對(duì)象的思想，而在.net中由于使用了.net框架，并且MS為了將新的編譯環(huán)境與潮流接軌，面對(duì)對(duì)象在.net中尤為突出，用過6的朋友們都很清楚，在6中過程的思想還能運(yùn)用，但是在.net中過程的思想已經(jīng)完全的被OOP的思想取代了。
也許這樣說你也不太明白，我用一句話來解釋，就是VB6及其以前的產(chǎn)品是DOS時(shí)代到Windows可視化時(shí)代的一個(gè)轉(zhuǎn)變，VB.Net是為建造基于因特網(wǎng)的分布式計(jì)算的新時(shí)代的解決方案提供基礎(chǔ)構(gòu)造的一個(gè)轉(zhuǎn)變。因此，對(duì)于目前的仍比較普遍的win32環(huán)境來講VB.net并沒有比VB6有什么進(jìn)步。
在VB.NET中數(shù)姐最大維數(shù)是60，所以我們通過錯(cuò)誤捕捉來處理這個(gè)問題，在這里我們用到UBound函數(shù)
- Public Function ArrayRange(mArray As Variant) As Integer
- Dim i As Integer
- Dim Ret As Integer
- Dim ErrF As Boolean
- ErrF = False
- On Error GoTo ErrHandle
- '判斷代入的參數(shù)是否為數(shù)組
- If Not IsArray(mArray) Then
- ArrayRange = -1
- Exit Function
- End If
- 'VB.NET中數(shù)組最大為60
- For i = 1 To 60
用UBound函數(shù)來實(shí)現(xiàn)VB.NET判斷數(shù)組維數(shù)，并判斷某一維的上界，如果大數(shù)組的實(shí)際維數(shù)時(shí)產(chǎn)生超出范圍錯(cuò)誤，此時(shí)我們通過Resume Next 來捕捉錯(cuò)這個(gè)錯(cuò)誤
- Ret = UBound(mArray, i)
- If ErrF Then Exit For
- Next i
最后返回
- ArrayRange = Ret
- Exit Function
- ErrHandle:
- Ret = i - 1
- ErrF = True
- Resume Next
- End Function
VB.NET判斷數(shù)組維數(shù)的相關(guān)方法就為大家介紹到這里。
【編輯推薦】
