質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.35%
DataGrid

GUIの一種であり、データを表の形式でみることが可能です。

VB.NET

Microsoft Visual Basic .NETのことで、Microsoft Visual Basic(VB6)の後継。 .NET環境向けのプログラムを開発することができます。 現在のVB.NETでは、.NET Frameworkを利用して開発を行うことが可能です。

Q&A

解決済

2回答

4466閲覧

DataGritView 行に値を入れた時に最後の行しか表示されない

TEC_S

総合スコア79

DataGrid

GUIの一種であり、データを表の形式でみることが可能です。

VB.NET

Microsoft Visual Basic .NETのことで、Microsoft Visual Basic(VB6)の後継。 .NET環境向けのプログラムを開発することができます。 現在のVB.NETでは、.NET Frameworkを利用して開発を行うことが可能です。

0グッド

0クリップ

投稿2020/02/10 23:11

前提・実現したいこと

ここに質問の内容を詳しく書いてください。
(例)PHP(CakePHP)で●●なシステムを作っています。
■■な機能を実装中に以下のエラーメッセージが発生しました。

WindowsFormアプリケーションを作成中。
DataGridViewを使って判定表を作っています。

エラーメッセージはありませんが、意図した通りに表示されません。
ループ分で行を1行追加後、判定の有無を確認するNoをそれぞれに追加したいです。

自分の使い方が間違っているのか、指定した場所へ文字を入れれません。
よろしくお願いいたします。

該当のソースコード

VBNET

1 2Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 3 4 Dim WORK As Short = 36 5 'Dim noWidth As Short 6 With DataGridView1 7 .Columns.Add(0, "No.") 8 .Columns.Add(1, " 判定") 9 .Columns.Add(2, "No.") 10 .Columns.Add(3, " 判定") 11 .Columns.Add(4, "No.") 12 .Columns.Add(5, " 判定") 13 14 For j = 1 To WORK 15 .Rows.Add() 16 .Rows(j).Cells(0).Value = j 17 .Rows(j).Cells(2).Value = (j + (1 * WORK)) 18 .Rows(j).Cells(4).Value = (j + (2 * WORK)) 19 Next 20 End With 21 End Sub

試したこと

参考URL:http://kchon.blog111.fc2.com/blog-entry-27.html

補足情報(FW/ツールのバージョンなど)

OS:Windows10
開発環境:Visual Studio2017

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

Zuishin

2020/02/10 23:56

エラーメッセージを読んでください。Rows は 0 ベースです。
TEC_S

2020/02/11 00:31

デバッカで確認していますが、エラーメッセージなどが出ていません。 自分の見方が悪いのでしょうか。。。詳細、ご教授頂けますと幸いです。
KoichiSugiyama

2020/02/11 01:21

「意図した通りに表示されません。」だけでは質問者さんの意図がわからないので、どう表示されてどう意図と違うのかも記載していただいた方が、より的確なアドバイスが集まりやすいと思います。
TEC_S

2020/02/11 08:54

KoichiSugiyama様 ご指摘、ありがとうございます。 以後、具体的に意図する内容を記載するようにします!
guest

回答2

0

ベストアンサー

DataGridViewはデフォルトで行の追加を行う為の入力行が表示されます。
この為に提示されたプログラムではエラーとなっていませんが、正常には動作しません。
1行目の添え字に何を指定すべきかというのは参考としてあげられたURLのプログラムを動作させれば分かるはずです。
ただコピペするのではなく意味を理解しましょう。

また、DataGridViewRowCollection.AddメソッドのAdd(Object[])を利用するのがいいのではないですか?

VBNET

1DataGridView1.Rows.Add("列1の値","列2の値",列3の値)

といった感じで、列の値を指定して行を追加できます。

投稿2020/02/11 00:55

YAmaGNZ

総合スコア10489

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

TEC_S

2020/02/11 08:51

使い方に困ったら、Microsoftの説明・・・ 自分で思い込みで進んでいるだけで、確認必要でした。ご指摘の通りです。 頂いた、Rows.Addの使い方にて改善しました。 ありがとうございました。
TEC_S

2020/02/11 08:56

解決コード .Rows.Add() .Rows(j).Cells(0).Value = j...部分   ↓ .Rows.Add(j, "", j + 1 * WORK, "", j + 2 * WORK)
guest

0

自分の使い方が間違っているのか、

間違っているとまでは言いませんが、構成を考え直した方がよさそうな気がします。

DataGridView を直接操作しないで、データソース ⇔ BindingSource ⇔ DataGridView という構成にして(データソースは DataTable とか List<T>)、行の追加はデータソースまたは BindingSource で行ってはいかがですか?

投稿2020/02/11 00:35

退会済みユーザー

退会済みユーザー

総合スコア0

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

TEC_S

2020/02/11 08:48

DataTableやListも使えるんですね。 ありがとうございます。
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.35%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問