Back to Top

プログラムの覚書

Category: VB.NET

VB.NET

VB.NET 配列の初期化

配列の宣言と、配列の初期化する方法を記載します。

配列を格納する変数を宣言する

Dim arr1() As Integer   'Integer型の配列を格納する変数
'または
Dim arr2 As Integer()

上記の宣言は、配列を格納する変数を宣言しているだけなので、配列そのものではありません。 配列を以下のような方法で割り当てます。

arr1 = New Integer(9) {}

arr2 = {1, 2, 3, 4, 5}

 

配列宣言時に初期化する

'10個の要素を0で初期化
Dim table(9) As Integer

'5個の要素に順番に1~5を設定して初期化
Dim table() As Integer = {1, 2, 3, 4, 5}

・通常配列を宣言すると、整数型は0で初期化され、文字型では空文字列で初期化されます。

※通常Basicの配列要素は、0から数える

 

For Nextの構文で初期化

Dim table(9) As Integer

For i = 0 To table.Length - 1
    table(i) = 5
Next

 

Enumerable.Repeatを使用して初期化

Dim table() As Integer

table = Enumerable.Repeat(5, 10).ToArray()

 

 

 

VB.NET EPPlus名前付きセルの範囲を取得する

名前付きセルの範囲を取得する方法を記載します。

名前付きセルの範囲を取得することにより、セルの開始位置、行数、列数などが取得出来ます。

名前付きセルを設定する

Dim sheet As ExcelWorksheet = excel.Workbook.Worksheets("MySheet1")

Dim cell As ExcelRange = sheet.Cells("A1:D5")

sheet.Names.Add("List1", cell)

 

名前付きセルの範囲を取得する

Dim sheet As ExcelWorksheet = excel.Workbook.Worksheets("MySheet1")

Dim namedRange As ExcelNamedRange = sheet.Names("List1")

'行数
Dim row = namedRange.Rows

'列数
Dim col = namedRange.Columns

'セルの開始行位置
Dim frow = namedRange.Start.Row

'セルの開始列位置
Dim fcol = namedRange.Start.Column

'セルの終了列位置
Dim lrow = namedRange.End.Row

'セルの終了列位置
Dim lcol = namedRange.End.Column

 

Posted in EPPlus | Leave a reply