- ベストアンサー
配列に関してです。
Dim a(,) As Integer a= New Integer(,) {0,300,400,400,500,600,700,800} {400,500,700,800,1000,1200,1300,1500} {700,1000,1300,1600,2000,2000,2000,2000} {1300,2000,2000,2000,2000,2000,2000,2000} ローカルレベルでこのように配列を宣言したのですが ・配列初期化子の次元が少なすぎます。 ・構文エラーです。 とエラーが出てしまいます。 この宣言、初期化の仕方のどこがおかしいのでしょうか？
- noman777
- お礼率11% (11/99)
- Visual Basic
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
a = New Integer(,) {{0, 300, 400, 400, 500, 600, 700, 800} _ , {400, 500, 700, 800, 1000, 1200, 1300, 1500} _ , {700, 1000, 1300, 1600, 2000, 2000, 2000, 2000} _ , {1300, 2000, 2000, 2000, 2000, 2000, 2000, 2000}} '別に一行で書いてもいいけど見にくいので _で次の行に送る。 '二次元配列ってつまり配列がネストしている状態なので 'それを踏まえて「カンマと外側の括弧を書くと
関連するQ&A
- VB.NET 2次元配列
二次元配列に関して質問があります。 二次元配列を定義します。 Dim a(,) As Integer = _ {{0, 0, 0, 0, 0, 0, 1, 1, 1}, _ {0, 0, 0, 0, 0, 1, 0, 0, 1}, _ {0, 0, 0, 0, 0, 0, 1, 1, 1}} 一次元配列を定義します。 Dim b() As Integer 一次元配列のb()に二次元配列a(,)の {0, 0, 0, 0, 0, 0, 1, 1, 1}の部分を 入れようとした場合、 どのように記載すればよろしいでしょうか？ イメージ的には b = a(0) で出きると思ったのですが、 構文エラーとなってしまいます。 よろしくお願いします。
- ベストアンサー
- Visual Basic
- Excel VBA での動的配列の宣言の仕方
Excel VBA で動的配列を宣言したところ，上手く行きません。何が悪いのでしょうか？ Dim A() As Integer MsgBox LBound(A()) として実行すると，LBound(A())のインデックスが有効範囲にありませんというエラーが出ます いったい何が悪いのでしょうか？動的配列の定義に失敗しているものと思いますが，動的配列の宣言の仕方をお教えください。よろしくお願いします。
- ベストアンサー
- その他（プログラミング・開発）
- 2次元配列の配列
VisualBasic.NETでプログラムを作っているのですが、2次元配列の配列で行き詰って困っています。 配列1～3を別に定義して、その2次元配列を配列Xという配列にひとまとめにしたいのですが、エラーが出てしまいます。 エラー内容は「配列初期化子の次元が少なすぎます」で、場所は配列Xの第1要素です。 配列1～3以降もどんどん配列を追加していく予定なので、なるべく以下の方法で書いていきたいのですが、解決法はないでしょうか？ また、他にいい方法があればご教授ください。 ソースです。 ---------------------------------------- Public 配列1(,) As Integer = _ { _ {1, 1, 1}, _ {1, 1, 1}, _ {1, 1, 1}, _ {1, 1, 1} _ } Public 配列2(,) As Integer = _ { _ {2, 2, 2}, _ {2, 2, 2}, _ {2, 2, 2}, _ {2, 2, 2} _ } Public 配列3(,) As Integer = _ { _ {3, 3, 3}, _ {3, 3, 3}, _ {3, 3, 3}, _ {3, 3, 3} _ } Public 配列X(,)() As Integer = { _ 配列1, _ ←ここにエラーが出る 配列2, _ 配列3 _ } ---------------------------------------- 回答よろしくお願いします。
- ベストアンサー
- Visual Basic
- 配列の宣言の仕方
vs2005を使用しています。 配列の宣言の方法はいくつかあるようですが 違いが分かりません。 Dim strDate() As String = New String(1) {} Dim strDate() As String = New String(1) {"",""} Dim strDate As String() = {"", ""} Dim strDate (1) As String Dim strDate As New ArrayList も候補のひとつですが、この違いは分かります。 やりたいことは、要素数２の配列を""で初期化したいというものです。 そしてその配列を返す関数を作成しています。 どれも同じように思うのですが、違いがあれば教えていただきたいと思います。 よろしくお願いします。 でもかまわないのですが、
- ベストアンサー
- Visual Basic
- 配列について
配列の要素数をinteger型にいれたいのですがどうしたらいいですか？ 例 Dim A() As String Dim B AS Integer A = "あ","い","う" Aの要素数３をBに入れたいのです。 この配列の作りかたもあっているか分かりませんがよろしくお願いします。
- 締切済み
- Visual Basic
- VBA 乱数と配列
VBA 乱数と配列 配列(0)～配列(5)の一次元配列の中に、１から6までの数字を重複しないように入れたいのですが、 上手くいきません。 ご指導の程、お願いします。 Sub rndsys() Dim 配列(5) As Integer Dim サイコロ As Integer Dim カウントA As Integer Dim カウントB As Integer Dim フラグ As Integer For カウントA = 0 To 5 Do サイコロ = Int(Rnd(1) * 6) + 1 For カウントB = 0 To 5 If 配列(カウントB) = サイコロ Then フラグ = フラグ + 1 End If Next カウントB Loop Until フラグ > 0 配列(カウントA) = サイコロ Next カウントA MsgBox 配列(0) & vbCrLf & 配列(1) & vbCrLf & 配列(2) & vbCrLf & 配列(3) & vbCrLf & 配列(4) & vbCrLf & 配列(5) End Sub
- ベストアンサー
- オフィス系ソフト
- Generic.Listに１次元配列の配列を格納したい(VB2005)
VB2005の質問です。 変数ghogeにString型の1次元配列の配列を格納したいと考えています。 ----------------------------------------------- 'a) Dim hoge()() As string = _ {New string() {"a1", "b1", "c1"}, _ New string() {"a2", "b2", "c2"}, _ New string() {"a3", "b3", "c3"}} Dim ghoge As New Generic.List(of ) 'b) MessageBox.Show(ghoge(1)(1)) ' "b2"と表示したい ----------------------------------------------- 質問内容は、(a)を(b)の初期値として設定するにはどのようにすればよいか、ということです。 (b)がGeneric.ListでなくArrayListの場合だと、 Dim ghoge As New ArrayList(hoge) でhoge配列を格納できますが、Generic.Listの場合はどのような構文にすればよいでしょうか。 現在は、下記のような処理でghogeに値を格納しています。 ------------------------------------------------------------ Dim ghoge As New Generic.List(Of Generic.List(Of String)) Dim aryhoge1 As New Generic.List(Of String)(New String() {"a1", "b1", "c1"}) Dim aryhoge2 As New Generic.List(Of String)(New String() {"a2", "b2", "c2"}) gary_hoge.Add(ary_hoge1) gary_hoge.Add(ary_hoge2) MessageBox.Show(gary_hoge(1)(1)) ' "b2"と表示される ------------------------------------------------------------ どうぞよろしくお願い致します。
- ベストアンサー
- Visual Basic
- 構造体 多段階配列について
Private Structure test Dim a As Integer Dim b As String Dim c as String End Structure Dim a() As test = New test(2) {} Dim b() As test = New test(2) {} Dim c()() As test c = New test()() {a, b} Dim temp() as integer cは多段階配列で、 例えば、c(0)のメンバaのデータをすべて取り出したい 時はどうすればよろしいのでしょうか？ //気持ち的にはこのようにしたいのですが、 できません。 temp = c(0).a どなたか、わかるかた、教えてください。 よろしくお願いします。
- ベストアンサー
- Visual Basic
- VB.NETで、配列をテーブルに変換する。
VB.NETで、一次元配列string()にあるデータを、DataTableに変換 したいのですが、「型'String'の値を'System,Data,DataTable'に変換できません。」 と、エラーが発生してしまいます。 s1に、配列データが入っています。 Dim dt As DataTable Dim cnt As Integer Dim i As Integer dt = New DataTable count = s1.Length For i = 0 To cnt - 1 dt = CType(s1(i), DataTable) Next 解決方法が見つからず、行き詰っております。 宜しくお願い致します。
- ベストアンサー
- Visual Basic
- 配列
エクセルｖｂａなのですが Sub test() ' 配列 Dim arr() As Integer= {0, 1, 2, 3, 4, 5} ' 抜き出した要素を格納するための変数 Dim i As Integer ' すべての要素について繰り返す For Each i In arr Console.WriteLine (i) Next End Sub これって何でエラーになるのでしょう？ Dim arr() As Integer= {0, 1, 2, 3, 4, 5} でエラーになりますが、なぜだかわかりません。
- ベストアンサー
- Visual Basic
お礼
なるほど。 _ がいるのですね。 納得しました有難うございます。