- N +

vb字符串轉數組?vb截取字符串的當中一段

大家好,如果您還對vb字符串轉數組不太了解,沒有關系,今天就由本站為大家分享vb字符串轉數組的知識,包括vb截取字符串的當中一段的問題都會給大家分析到,還望可以解決大家的問題,下面我們就開始吧!

VB里面怎么給一個字符數組批量賦值,或者字節數組

1、必須滿足的條件:如果文本框是數組控件,聲明的數組必須和文本框對應;如果文本框不是數組控件,聲明的數組必須和文本框的個數相符;如果聲明的數組是動態的,必須聲明數組的下標。

2、數組的聲明(以20個文本框為例):靜態數組:DimAA(1To20)AsString;動態數組:DimAA()AsString;在后面定義數組下標,ReDimAA(1To20)

3、為數組賦值:文本框為20個數組控件:ForI=1To20AA(I)=Text1(I-1).Text'注意:I-1是文本框數組是從0開始的,20個文本框數組控件下標最小為0,最大為19。'在執行上面語句,文本框的內容賦值給數組了。NextI文本框不是數組控件,要逐一賦值,這個就不一一列舉了。

4、如果是將一個文本框的內容分別賦值給數組,又是另外的情況,需要根據你的要求才能決定,由于不知你是什么情況,所以不好回答。

vb中哪幾個語句聲明數組

Adima[3,4]asinteger中括號在VB里面不能用來聲明數組,在C語言中可以,如:inta[3,4]; bdima(3,4)asinteger正確的聲明 cdima(m,n)asinteger變量是不確定的值,不能用于數組的聲明 ddim(3,4)asinteger這根本就不是個數組在VB中聲明數組形式可以有:dima(3,4)asinteger定義一個整形的二維數組dima(3,4)沒有定義它的類型,默認為變體型dima()asinteger定義一個空的整形數組,稱為動態數組,在以后的代碼中你可以根據這個重新定義靜態數組,比如:redima(3,4)dima()定義一個空的數組,默認為變體型,方法跟上面差不多

vb怎么反轉一個一維數組

DimfileNameAsStringDimstartnumber%,endnumber%ConstMyFile=1Dimi%DimT()OpenfileNameForInputAs#MyFile'打開文件Input#MyFile,startnumber,endnumber'讀文件RedimT(endnumber-startnumber)Fori=startnumberToendnumberInput#MyFile,T(i)NextiClose#MyFile'關文件

VB怎么聲明數組

DimCounters(14)AsInteger'15個元素。

DimSums(20)AsDouble'21個元素。

為建立公用數組,直接用Public取代Dim。

PublicCounters(14)AsInteger

PublicSums(20)AsDouble

在過程之中同樣的聲明使用Dim:

DimCounters(14)AsInteger

DimSums(20)AsDouble

第一個聲明建立了一個有15個元素的數組,其索引號從0到14。第二個聲明建立了一個有21個元素的數組,其索引號從0到20。缺省的下界為0。

為了規定下界,用關鍵字To顯式提供下界(為Long數據類型):

DimCounters(1To15)AsInteger

DimSums(100To120)AsString

包含其它數組的數組

PrivateSubCommand1_Click()

DimintXAsInteger'聲明計數器變量。

'聲明并放置整數數組。

DimcountersA(5)AsInteger

ForintX=0To4

countersA(intX)=5

NextintX

'聲明并放置字符串數組。

DimcountersB(5)AsString

ForintX=0To4

countersB(intX)="hello"

NextintX

DimarrX(2)AsVariant'聲明擁有兩個成員的新數組。

arrX(1)=countersA()'將其它數組移居到數組。

arrX(2)=countersB()

MsgBoxarrX(1)(2)'顯示每一個數組的成員。

MsgBoxarrX(2)(3)

EndSub

多維數組

有時需要追蹤記錄數組中的相關信息。例如,為了追蹤記錄計算機屏幕上的每一個像素,需要引用它的X、Y坐標。這時應該用多維數組存儲值。

可用VisualBasic聲明多維數組。例如,下面的語句聲明了一個過程內的10×10的二維數組。

StaticMatrixA(9,9)AsDouble

StaticMatrixA(1To10,1To10)AsDouble

DimMultiD(3,1To10,1To15)

這個聲明建立了三維數組,大小為4×10×15。元素總數為三個維數的乘積,為600。

注意在增加數組的維數時,數組所占的存儲空間會大幅度增加,所以要慎用多維數組。使用Variant數組時更要格外小心,因為他們需要更大的存儲空間。

用循環操作數組

DimIAsInteger,JAsInteger

StaticMatrixA(1To10,1To10)AsDouble

ForI=1To10

ForJ=1To10

MatrixA(I,J)=I*10+J

NextJ

NextI

要創建動態數組,請按照以下步驟執行:

(如果希望數組為公用數組,則)用Public語句聲明數組,或者,(如果希望數組為模塊級,則)在模塊級用Dim語句聲明數組,或者(如果希望數組為局部數組,則)在過程中用Static或Dim語句聲明數組。給數組附以一個空維數表,這樣就將數組聲明為動態數組。

DimDynArray()

用ReDim語句分配實際的元素個數。ReDimDynArray(X+1)

ReDim語句只能出現在過程中。與Dim語句、Static語句不同,ReDim語句是一個可執行語句,由于這一語句,應用程序在運行時執行一個操作。

ReDim語句支持這樣的語法,它與固定數組中使用的語法相同。對于每一維數,每個ReDim語句都能改變元素數目以及上下界。但是,數組的維數不能改變。

ReDimDynArray(4to12)

例如,用第一次聲明在模塊級所建立的動態數組Matrix1:

DimMatrix1()AsInteger

SubCalcValuesNow()

ReDimMatrix1(19,29)

EndSub

ReDim語句給Matrix分配一個20×30的整數矩陣(元素總大小為600)。還有一個辦法,用變量設置動態數組的邊界:

ReDimMatrix1(X,Y)

注意您可以將字符串賦值給大小可變的字節數組。一個字節數組也可以被賦值給一個可變長的字符串。一定要注意字符串中的字節數會隨平臺而變化。同一個字符串在Unicode平臺上的字節數是它在非Unicode平臺上的兩倍。

保留動態數組的內容

每次執行ReDim語句時,當前存儲在數組中的值都會全部丟失。VisualBasi重新將數組元素的值置為Empty(對Variant數組)、置為0(對Numeric數組)、置為零長度字符串(對String數組)或者置為Nothing(對于對象的數組)。

,這樣做是非常有用的。有時希望改變數組大小又不丟失數組中的數據。使用具有Preserve關鍵字的ReDimPreserveDynArray(UBound(DynArray)+1)

ReDimPreserveMatrix(10,UBound(Matrix,2)+1)

而不可這樣編程:

ReDimPreserveMatrix(UBound(Matrix,1)+1,10)

vb判斷數組

一:利用錯誤捕獲功能判斷

DimArrayS()AsString

PrivateSubCommand1_Click()

OnErrorGoToz

IfUBound(ArrayS)>-1Then

MsgBox"數組不為空"

EndIf

z:

MsgBox"數組空"

EndSub

二、Join方法:

DimArrayS()AsString

PrivateSubCommand1_Click()

If(CStr(Join(ArrayS,"")))=""Then

MsgBox"為空"

Else

MsgBox"不為空"

EndIf

EndSub

好了,關于vb字符串轉數組和vb截取字符串的當中一段的問題到這里結束啦,希望可以解決您的問題哈!

返回列表
上一篇:
下一篇: