|
分類:[VB.NET/VB2005 以降]
VB.NET(2010)で開発作業を行っています。
その中でコンボボックスを使用しています。
コンボボックス内に『コード』、『名称』をプルダウンした際に表示します。
表示結果ですが、標準の文字の大きさでは正常に表示するのですが、
文字を太字にすると、下図のように『名称』の表示がずれてしまいます。
例
12555 テスト
15555 テスト1
16000 テスト2
文字のMSゴシックです。
以下のようなソースです。
Do Until ra1.EOF
Dim row As DataRow = fruiteTable.NewRow()
'各列に値をセット
row("ID") = ra1.Fields("コード").value
row("NAME") = ra1.Fields("名称").value
fruiteTable.Rows.Add(row)
ra1.MOVENEXT()
Loop
fruiteTable.AcceptChanges()
'対応する値はDataTableのID列
CType(Me.Controls("CMB_CD" & gyo.ToString), ComboBox).ValueMember = "ID"
'表示される値はDataTableのNAME列
CType(Me.Controls("CMB_CD" & gyo.ToString), ComboBox).DisplayMember = "NAME"
'コンボボックスのDataSourceにDataTableを割り当てる
CType(Me.Controls("CMB_CD" & gyo.ToString), ComboBox).DataSource = fruiteTable
CType(Me.Controls("CMB_CD" & gyo.ToString), ComboBox).SelectedIndex = 0
CType(Me.Controls("CMB_CD" & gyo.ToString), ComboBox).Text = ""
※gyoは変数
VBの仕様なのか、バグなのか判断がついていない状況です。
太字でもずれないようにすることは可能ですか？
よろしくお願いします。
|