當前位置:首頁 » 文件傳輸 » vb數組元素通過下標訪問
擴展閱讀
webinf下怎麼引入js 2023-08-31 21:54:13
堡壘機怎麼打開web 2023-08-31 21:54:11

vb數組元素通過下標訪問

發布時間: 2022-09-21 10:48:02

A. 如何訪問數組中的元素

具體步驟如下:

1、用list來演示,安裝好python與pycharm之後,打開pycharm,新建Test_List.py。

B. 數組元素可以通過下標訪問,下標從什麼開始

一般從0開始
也可以從1開始
如:
VB
dim a(1 to 10)
數組a的下標就從1開始到10

dim a(10)
數組a的下標就從0開始到10

C. VB:如何返回vb一維數組某個元素所對應的下標的值

Array(arglist)

所需的 arglist 參數是一個用逗號隔開的值表,這些值用於給 Variant 所包含的數組的各元素賦值。如果不提供參數,則創建一個長度為 0 的數組。

說明

用來表示數組元素的符號由變數名、圓括弧以及括弧中的所需元素的索引號組成。在下面的示例中,第一條語句創建一個 Variant 的變數 A。第二條語句將一個數組賦給變數 A。最後一條語句將該數組的第二個元素的值賦給另一個變數。

Dim A As Variant
A = Array(10,20,30)
B = A(2)

使用 Array 函數創建的數組的下界受 Option Base 語句指定的下界的決定, 除非 Array 是由類型庫(例如 VBA.Array )名稱限定。如果是由類型庫名稱限定,則 Array 不受 Option Base 的影響。

注意 沒有作為數組聲明的 Variant 也可以表示數組。除了長度固定的字元串以及用戶定義類型之外,Variant 變數可以表示任何類型的數組。盡管一個包含數組的 Variant 和一個元素為 Variant 類型的數組在概念上有所不同,但對數組元素的訪問方式是相同的。

D. VB數組下標問題

vb數組的下標只能是整數,不管你寫什麼vb都會嘗試把他自動轉換為整數,原則是:四捨六入五取整。
所以第二個是a(2);所以a(1.6)=a(2),而a(2)在循環中多次被賦值,它保留了最後一次的值:a(2.5)=2.5^2=6.25

不管誰寫的這段程序,我都必須承認他很有幽默感

E. 用VB語言,遍歷多維數組時,如何獲取當前元素的下標值

這個只能通過一個變數累加,然後從中分解出下標值:

k=0
ForEachmydIntdata
i=k(UBound(tdata,1)-LBound(tdata,1)+1)'第一維下標值
j=kMod(UBound(tdata,2)-LBound(tdata,2)+1)'第二維下標值
Print"tdata("&i&","&j&")="&myd
k=k+1
Next

或者不用遍歷,直接順序讀取即可(在數組大小已知的情況下,遍歷其實沒啥意義了):

Forj=LBound(tdata,1)ToUBound(tdata,1)
Fori=LBound(tdata,2)ToUBound(tdata,2)
Print"tdata("&i&","&j&")="&tdata(i,j)
Next
Next

F. VB中數組下標的問題

不可以的。可用動態數組。
首先:
Dim bigid_fireopening() As Double
然後使用ReDim語句
ReDim bigid_fireopening(qishi To zhong)
就可以了。
其他的使用方法可以去查查MSDN。

G. vb數組下標

Option Base 語句 在模塊級別中使用,用來聲明數組下標的預設下界。語法Option Base {0 | 1}說明由於下界的預設設置是 0,因此無需使用 Option Base 語句。如果使用該語句,則必須寫在模塊的所有過程之前。一個模塊中只能出現一次 Option Base,且必須位於帶維數的數組聲明之前。注意 Dim、Private、Public、ReDim 以及 Static 語句中的 To 子句提供了一種更靈活的方式來控制數組的下標。不過,如果沒有使用 To 子句顯式地指定下界,則可以使用 Option Base 將預設下界設為 1。使用 Array 函數或 ParamArray 關鍵字創建的數組的下界為 0;Option Base 對 Array 或 ParamArray 不起作用。Option Base 語句隻影響位於包含該語句的模塊中的數組下界。

H. VB中數組的下標的作用是什麼 能舉個例子嗎

數組的上標和下標用來說明數組的范圍的,例如dim a(1 to 10),那麼1就是這個數組的上標,10是這個數的的下標,表明數組a共有10個元素,也可是叫做上界和下界。

I. VB 如何取得數組當前值下標值

'arrPtr:數組指針,dims:數組維數,pData:元素指針
Dim arrPtr As Long, dims As Long, pData As Long
'i:循環變數,carry:進位標記
Dim i As Long, carry As Integer

'取得數組維數
CopyMemoryArr arrPtr, Arr, 4
dims = SafeArrayGetDim(arrPtr)
ReDim Index(dims - 1) As Long

Do
'取得某個下標處元素的指針
SafeArrayPtrOfIndex arrPtr, Index(0), pData
'與傳入的元素的指針比較
If pData = VarPtr(Element) Then
GetIndex = True
Exit Function
End If

'數組下標加1
Index(dims - 1) = Index(dims - 1) + 1
'檢查下標是否溢出
carry = 0
For i = dims - 1 To 1
Index(i) = Index(i) + carry
If Index(i) > UBound(Arr, i + 1) Then
Index(i) = 0
carry = 1
End If
Next i
'最高位單獨處理,防止被清0
Index(0) = Index(0) + carry
'檢查是否搜索完畢,退出循環
If Index(0) > UBound(Arr, 1) Then Exit Do
Loop

GetIndex = False
End Function

J. VB中怎樣輸出數組中某個數的下標

LBound(f)'上標
UBound(f)'下標