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

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

新規登録して質問してみよう
ただいま回答率
85.50%
コンボボックス

GUIの要素のひとつです。Listboxと同様にいくつかのうちひとつを選択する機能だが、Comboboxの場合は選択されたもののみがデフォルトとして表示される。

VB.NET

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

Q&A

2回答

3201閲覧

[VB.NET]DataGridViewのコンボボックスのリストにない値を表示したいです。。(どんな力技でも構いません)

退会済みユーザー

退会済みユーザー

総合スコア0

コンボボックス

GUIの要素のひとつです。Listboxと同様にいくつかのうちひとつを選択する機能だが、Comboboxの場合は選択されたもののみがデフォルトとして表示される。

VB.NET

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

0グッド

0クリップ

投稿2020/07/21 21:53

前回も同じ質問をしたのですが、もう一度投稿させて戴きます。
申し訳ございません!

前提・実現したいこと

VisualBasicのDataGridViewのコンボボックスのリストにない値を表示できるようにしたいです。

現在、コンボボックスにはDataSourceでデータを格納しており、手入力ができる状態です。
手入力した際、リストにある値なら表示することはできるのですが、リストにない値を表示できない状態であるため、この問題を解決したいです。

前回の質問の結果テキストボックスにしていたのですが、仕様上、コンボボックスで実現しないといけないため、投稿させて戴きました。
どんな力技でも構いません。

発生している問題・エラーメッセージ

コンボボックスに値が入らない。(エラーなどは出ておりません。)

該当のソースコード

VB

1

試したこと

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

Visual Studio2017,SQL Server

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

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

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

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

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

YAmaGNZ

2020/07/21 22:43

せめて以前にどのような回答を貰って、どこが分からず「テキストボックスにしていた」のか説明して頂けませんか?
退会済みユーザー

退会済みユーザー

2020/07/21 22:50

コメントありがとうございます! 以前の回答はコンボボックスは基本的に格納しているものを表示するためのものであるため、格納されていない値は一度リストに追加して表示する必要があるとの回答でしたので、表示のためだけにDBに保存することはしたくなかったのでコンボボックスは諦めてテキストボックスにしていました。。
YAmaGNZ

2020/07/21 23:04

その行データはデータベースに格納するのですよね? 入力された値をデータベースに登録しないでどうするのですか? もう一度表示するとき困りませんか?
YAmaGNZ

2020/07/22 00:29

コメントのようなデータのComboBoxですと、行のデータとして「ODNO」を持っている形になると思いますが、追加された場合はそのコードをどうするのですか? 前とかぶりますが、その追加されたデータが格納されている行を保存する時どのようにするのですか? またその行を再度表示する時どうするのですか?
YAmaGNZ

2020/07/22 01:49 編集

「どんな力技でも構いません」 ならデータベースに登録すればどうですか? 力技ってよりは正当な対応のような気もしますけどね。
guest

回答2

0

こちらのソース参考になりませんか。
空のDataGridView1を準備して動かしてみては如何でしょうか。

VB.NET

1'(Test_Sample_Miniature) 2Private Sub Button1_Click( ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 3 Try 4 ' 5 Dim chkCol As New DataGridViewCheckBoxColumn 6 DataGridView1.Columns.Add(chkCol) 7 8 Dim txtCol As New DataGridViewTextBoxColumn 9 DataGridView1.Columns.Add(txtCol) 10 11 Dim cmbCol As New DataGridViewComboBoxColumn 12 DataGridView1.Columns.Add(cmbCol) 13 cmbCol.Items.Add("日曜日") 14 cmbCol.Items.Add("月曜日") 15 cmbCol.Items.Add("火曜日") 16 cmbCol.Items.Add("水曜日") 17 cmbCol.Items.Add("木曜日") 18 cmbCol.Items.Add("金曜日") 19 cmbCol.Items.Add("土曜日") 20 21 Dim btnCol As New DataGridViewButtonColumn 22 DataGridView1.Columns.Add(btnCol) 23 btnCol.DefaultCellStyle.BackColor = Color.Gray 24 25 DataGridView1.Columns(0).Width = 100 26 DataGridView1.Columns(1).Width = 100 27 DataGridView1.Columns(2).Width = 100 28 DataGridView1.Columns(3).Width = 100 29 30 DataGridView1.Rows.Add(1, "abc", "月曜日", "Click111") 31 DataGridView1.Rows.Add(1, "efg", "火曜日", "Click222") 32 DataGridView1.Rows.Add(1, "hij", "水曜日", "Click333") 33 ' 34 Catch ex As Exception 35 Exit Sub 36 End Try 37End Sub

投稿2020/07/21 23:15

編集2020/07/27 23:38
tosi

総合スコア553

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

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

0

以前に提案されてたと思うんですが、入力値をリストに追加し、それを表示させるってのではどうなんでしょうか

投稿2020/07/21 23:01

y_waiwai

総合スコア87719

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

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

退会済みユーザー

退会済みユーザー

2020/07/21 23:03

回答ありがとうございます! 試してみたのですが、DataSourceをセットしていたため、リストに追加することが出来ませんでした。。
y_waiwai

2020/07/21 23:07

DataSourceをセットするんじゃなくて、フォーム表示時にリスト値を読み出し、そこにセットさせるってのではどうでしょう。 それなら追加も可能になります
退会済みユーザー

退会済みユーザー

2020/07/21 23:08

大変申し訳ございません。 どのようなソースになりますでしょうか?
y_waiwai

2020/07/21 23:11

たんにフォームの初期化のタイミングでそのリスト値を読み出しといて、当該ComboBoxにセットするだけです
退会済みユーザー

退会済みユーザー

2020/07/22 00:15

'//業務分類コンボボックスの値を取得 Dim comm As New SqlCommand("select ODNO,UserCD,GMB,GMN,ODNO+UserCD+GMB+GMN AS Display from Test2 where ODNOKBNN = '" & CM0000.login_Pass & "'", conn) Dim adrr As New SqlDataAdapter(comm) Dim tbll As New DataTable() '//一行目に空白を追加 Dim drr As DataRow = tbll.NewRow tbll.Rows.InsertAt(drr, 0) adrr.Fill(tbll) ODNO.DataSource = tbll ODNO.DisplayMember = "Display" ODNO.ValueMember = "ODNO" 現在がこのようなソースですがどこをなおせばよろしいでしょうか? 無知で申し訳ございません。
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

まだベストアンサーが選ばれていません

会員登録して回答してみよう

アカウントをお持ちの方は

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

ただいまの回答率
85.50%

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

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

質問する

関連した質問