人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

【満点差し上げます】[VB.NETで2次元配列の列1を、別の配列の列0に格納する方法]

VisualBaisc2008Expressでプログラムしています。

2次元配列strA()と、同じく2次元配列strB() があるとします。

strA()の「第1行」を、strBの「第0行」に格納するサブルーチンを書いていただけますか。

例:

strA = "
AAAA aaaa
BBBB bbbb
CCCC cccc"

strB = ""



strA = "
AAAA aaaa
BBBB bbbb
CCCC cccc"

strB = "
aaaa
bbbb
cccc"

●質問者: jjkkjpvb2008
●カテゴリ:コンピュータ
✍キーワード:2次元 VB.NET サブルーチン プログラム 差し
○ 状態 :終了
└ 回答数 : 2/2件

▽最新の回答へ

1 ● neuromancer_sho
●42ポイント

行番号をy(999まである)として、strA()の「第1列」を、strBの「第0列」に格納する場合

 For y = 0 To 999
 strB(0, y) = strA(1, y)
 Next

です。


2 ● kawasaki
●28ポイント

これではいかがでしょうか?

strAがStringなのかArrayなのか判断できませんでしたが、

String型であるとして実装してみました。

 Dim strA As String = "AAAAA aaaaa" + vbCrLf + "BBBBB bbbbb" + vbCrLf + "CCCCC ccccc"
 Dim strB As String

 Dim arrA As Array = strA.Split(vbCrLf)
 Dim nRow As Integer = strA.Length

 Dim i As Integer
 For i = 0 To arrA.Length - 1
 Dim strLine As String = arrA(i)
 Dim s As String = strLine.Split(" ")(1)

 strB += s + vbCrLf
 Next

 MsgBox(strB)
関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ