配列は、new　(vbではNew)でオブジェクトを作ります。

C#

// 配列の定義
int[] array1d = new int[100];       // 要素100個 1次元配列
int[,] array2d = new int[100, 100]; // 要素100x100個 2次元配列

// 配列の使用
int a = array1d[3];
int b = array2d[3, 4];

VisualBasic

' 配列の定義
Dim array1d As Integer() = New Integer(100) {} ' 要素100個 1次元配列
Dim array2d As Integer(,) = New Integer(100, 100) {} ' 要素100x100個 2次元配列

' 配列の使用
Dim a As Integer = array1d(3)
Dim b As Integer = array2d(3, 4)

使用例

XAMLコード

<UserControl x:Class="ArrayCS.Page"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" 
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" 
    Width="400" Height="300">
    <Grid x:Name="LayoutRoot" Background="White">
        <TextBlock Margin="27,21,275,222" Text="配列の要素数"
                   TextWrapping="Wrap"/>
        <TextBlock Margin="8,66,323,178" Text="要素番号" TextWrapping="Wrap"/>
        <TextBlock TextWrapping="Wrap" Margin="100,66,0,0" Text="格納する数値"/>
        <TextBlock  Text="結果" TextWrapping="Wrap" Margin="27,122,320,123"/>
        <Button Name="buttonCreate" Margin="180,20,121,249"
                Content="配列作成" Click="buttonCreate_Click" />
        <Button Name="buttonAdd" Margin="233,59.5,86,207"
                Content="数値格納" Click="buttonAdd_Click"/>
        <TextBox Name="tbMaxIndex" Margin="115,20,226,251" 
                  TextWrapping="Wrap"/>
        <TextBox Name="tbIndexNumer"
                 Margin="55,63,311,206"
                  TextWrapping="Wrap"/>
        <TextBox Name="tbAddNumber" Margin="180,63,180,203"
                 TextWrapping="Wrap"/>
        <ListBox Name="listBoxResult" Margin="93,122,107,31" />
    </Grid>
</UserControl>

C#コード

int[] array;    // 配列定義
private void buttonCreate_Click(object sender, RoutedEventArgs e)
{
    try
    {
        int maxindex = Convert.ToInt32(tbMaxIndex.Text);
        array = new int[maxindex];  // newで配列作成

        // リストボックス更新
        listBoxResult.Items.Clear();
        for (int i = 0; i < array.Length; i++)
        {
            listBoxResult.Items.Add("array[" + i + "]: " + array[i]);
        }
    }
    catch
    {
        listBoxResult.Items.Clear();
        listBoxResult.Items.Add("エラー");
    }
}

private void buttonAdd_Click(object sender, RoutedEventArgs e)
{
    try
    {
        int index = Convert.ToInt32(tbIndexNumer.Text);
        int number = Convert.ToInt32(tbAddNumber.Text);

        // リストボックス更新
        array[index] = number;
        listBoxResult.Items[index] = "array[" + index + "]: " + array[index];
    }
    catch
    {
        listBoxResult.Items.Clear();
        listBoxResult.Items.Add("エラー");
    }
}

VisualBasicコード

Dim array As Integer()
Private Sub buttonCreate_Click(ByVal sender As System.Object, _
                               ByVal e As System.Windows.RoutedEventArgs)
    Try
        Dim maxindex As Integer = Convert.ToInt32(tbMaxIndex.Text)
        array = New Integer(maxindex) {}    'Newで配列作成

        'リストボックス更新()
        listBoxResult.Items.Clear()
        For i As Integer = 1 To array.Length - 1
            listBoxResult.Items.Add("array[" & i & "]: " & array(i))
        Next
    Catch ex As Exception
        listBoxResult.Items.Clear()
        listBoxResult.Items.Add("エラー")
    End Try
End Sub

Private Sub buttonAdd_Click(ByVal sender As System.Object, _
                            ByVal e As System.Windows.RoutedEventArgs)
    Try
        Dim index As Integer = Convert.ToInt32(tbIndexNumer.Text)
        Dim number As Integer = Convert.ToInt32(tbAddNumber.Text)

        'リストボックス更新
        array(index) = number
        listBoxResult.Items(index - 1) = "array[" & index & "]: " & array(index)
    Catch ex As Exception
        listBoxResult.Items.Clear()
        listBoxResult.Items.Add("エラー")
    End Try
End Sub

ここからこのソースコードのダウンロードをすることができます。

C#版：　http://birthmarch.web.fc2.com/program/csharp/ArrayCS.zip

VB版：　http://birthmarch.web.fc2.com/program/vb/ArrayVB.zip

write:2008/10/31

トップページへ