|
ｿｽｿｽVBｿｽｿｽｿｽSｿｽﾒ掲ｿｽｿｽｿｽｿｽ(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
|
ｿｽyDataGridViewｿｽzｿｽVｿｽKｿｽsｿｽﾅ編集ｿｽｿｽmｿｽ閧ｷｿｽｿｽﾉは？
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
Kenichi 2007/05/17(ｿｽｿｽ) 17:55:38
DataGridViewｿｽﾉてゑｿｽｿｽｿｽfｿｽ[ｿｽ^ｿｽﾌｿｽｿｽXｿｽgｿｽｿｽ
ｿｽ|ｿｽbｿｽvｿｽAｿｽbｿｽvｿｽｿｽﾊで表ｿｽｿｽｿｽｿｽｿｽｿｽ{ｿｽ^ｿｽｿｽｿｽｿｽ成ｿｽｿｽｿｽA
ｿｽｿｽｿｽﾌボｿｽ^ｿｽｿｽｿｽｿｽpｿｽｿｽｿｽﾄ隣のセｿｽｿｽｿｽiｿｽeｿｽLｿｽXｿｽgｿｽjｿｽﾉ選ｿｽｿｽｿｽｿｽｿｽｿｽlｿｽｿｽ
ｿｽ¥ｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽvｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽｿｽ成ｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽ
ｿｽｿｽｿｽLｿｽﾌようｿｽﾈ厄ｿｽ閧ｪｿｽNｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽVｿｽKｿｽsｿｽﾅボｿｽ^ｿｽｿｽｿｽｿｽNｿｽｿｽｿｽbｿｽNｿｽｿｽｿｽAｿｽｿｽｿｽﾌゑｿｽｿｽﾝ定さｿｽ黷ｽｿｽｿｽｿｽﾆゑｿｽmｿｽFｿｽｿｽｿｽﾄゑｿｽｿｽｿｽ
ｿｽ}ｿｽEｿｽXｿｽｿｽｿｽJｿｽ[ｿｽ¥ｿｽｿｽｿｽﾅグｿｽｿｽｿｽbｿｽhｿｽﾌ行ｿｽｿｽﾏ更ｿｽｿｽｿｽｿｽﾆ設定しｿｽｿｽｿｽlｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾜゑｿｽｿｽAｿｽVｿｽKｿｽsｿｽﾉ戻ゑｿｽﾆ設定しｿｽｿｽｿｽlｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽﾌ擾ｿｽﾔで、ｿｽｿｽｿｽいｿｽｿｽﾈ難ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽ
ｿｽuｿｽwｿｽ閧ｳｿｽ黷ｽｿｽｿｽｿｽｿｽｿｽﾍ、ｿｽLｿｽｿｽｿｽﾈ値ｿｽﾌ範囲難ｿｽﾉゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽBｿｽv
ｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽGｿｽｿｽｿｽ[ｿｽｿｽｿｽ¥ｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽLｿｽﾌ難ｿｽｿｽｿｽｿｽﾍ新ｿｽKｿｽsｿｽﾌみ起ｿｽｿｽｿｽ骭ｻｿｽﾛなので、
ｿｽ|ｿｽbｿｽvｿｽAｿｽbｿｽvｿｽﾅ選ｿｽｿｽｿｽｿｽ黷ｽｿｽ轤ｻｿｽﾌ行ｿｽｿｽ
ｿｽﾒ集ｿｽｿｽmｿｽ閧ｳｿｽｿｽｿｽｿｽｿｽｿｽﾇゑｿｽｿｽｿｽｿｽうｿｽﾆ思ｿｽｿｽｿｽAｿｽｿｽｿｽ竄ｳｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽ¥ｿｽｿｽｿｽあゑｿｽﾜゑｿｽｿｽが、
ｿｽVｿｽKｿｽsｿｽﾌ編集ｿｽｿｽmｿｽ閧ｷｿｽｿｽｿｽｿｽ@ｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌ包ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ痰｢ｿｽﾜゑｿｽｿｽｿｽｿｽ轤ｨｿｽｿｽｿｽｿｽｿｽ閧ｦｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽB
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2007/05/17(ｿｽｿｽ) 18:54:53
>ｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽvｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽｿｽ成ｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽ
ｿｽｿｽｿｽ轤ｭｿｽｿｽDataTableｿｽｿｽﾝ定しｿｽﾄのデｿｽ[ｿｽ^ｿｽoｿｽCｿｽｿｽｿｽhｿｽﾉゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽﾈゑｿｽｿｽﾄゑｿｽｿｽｿｽﾌゑｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽ_ｿｽﾉゑｿｽｿｽｿｽｿｽﾄは、
ｿｽｿｽｿｽpｿｽﾒの趣ｿｽｿｽ_ｿｽｿｽｿｽ迪ｩｿｽｿｽｿｽ況撰ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽAｿｽｿｽﾌ的ｿｽｿｽ
ｿｽJｿｽｿｽｿｽﾒの趣ｿｽｿｽ_ｿｽｿｽｿｽ迪ｩｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽｿｽﾄなゑｿｽｿｽﾌで、
ｿｽｿｽｿｽ黷ｾｿｽｿｽｿｽﾅは費ｿｽｿｽfｿｽｿｽｿｽ骼厄ｿｽｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽﾜゑｿｽｿｽﾍ、DataGridViewｿｽﾌどのイｿｽxｿｽｿｽｿｽgｿｽﾉ会ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾌゑｿｽｿｽｿｽ
ｿｽｿｽｿｽ轤ｩｿｽﾉゑｿｽｿｽﾄみてゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽBｿｽﾂ能ｿｽﾅゑｿｽｿｽｿｽﾎ、ｿｽｿｽｿｽﾛに鯉ｿｽｿｽﾛゑｿｽﾄ鯉ｿｽｿｽﾂ能ｿｽｿｽ
ｿｽﾅ抵ｿｽｿｽｿｽﾌコｿｽ[ｿｽhｿｽｿｽ供ゑｿｽｿｽﾄゑｿｽ轤ｦｿｽｿｽﾆ、ｿｽbｿｽｿｽｿｽiｿｽﾟやすｿｽｿｽｿｽﾅゑｿｽｿｽB
>ｿｽ}ｿｽEｿｽXｿｽｿｽｿｽJｿｽ[ｿｽ¥ｿｽｿｽｿｽﾅグｿｽｿｽｿｽbｿｽhｿｽﾌ行ｿｽｿｽﾏ更ｿｽｿｽｿｽｿｽﾆ設定しｿｽｿｽｿｽlｿｽｿｽ
>ｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾜゑｿｽｿｽAｿｽｿｽｿｽﾌ設定しｿｽｿｽｿｽfｿｽ[ｿｽ^ｿｽﾍ確ｿｽ閧ｳｿｽｿｽﾄゑｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽB
ｿｽｿｽｿｽ黷ｼｿｽｿｽﾌイｿｽxｿｽｿｽｿｽgｿｽﾉゑｿｽｿｽｿｽｿｽﾄ、
ｿｽ@DataGridViewRowｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽｿｽ謫ｾ
ｿｽ@ｿｽ@ｿｽｿｽ.DataBoundItemｿｽvｿｽｿｽｿｽpｿｽeｿｽBｿｽｿｽｿｽｿｽADataRowViewｿｽｿｽ謫ｾ
ｿｽ@ｿｽ@ｿｽｿｽ.RowｿｽvｿｽｿｽｿｽpｿｽeｿｽBｿｽｿｽｿｽｿｽADataRowｿｽｿｽ謫ｾ
ｿｽ@ｿｽ@ｿｽｿｽ.RowStateｿｽvｿｽｿｽｿｽpｿｽeｿｽBｿｽｿｽｿｽｿｽAｿｽsｿｽﾌ擾ｿｽｿｽ(RowState)ｿｽｿｽ謫ｾ
ｿｽﾆゑｿｽｿｽﾄ、RowStateｿｽｿｽDetachedｿｽﾈのゑｿｽAddedｿｽﾈのゑｿｽｿｽ調べてみまゑｿｽｿｽ蛯､ｿｽB
ｿｽﾜゑｿｽｿｽAｿｽｿｽｿｽﾍ値ｿｽﾉ厄ｿｽ閧ｪｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾘゑｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽﾆゑｿｽｿｽﾎ、DataTableｿｽｿｽNULLｿｽｿｽｿｽﾍ不ｿｽﾂな列がゑｿｽｿｽｿｽﾌに、
ｿｽVｿｽKｿｽﾇ会ｿｽｿｽｿｽｿｽﾉ、ｿｽｿｽｿｽﾌ暦ｿｽﾉ値ｿｽｿｽﾝ定しｿｽﾄゑｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈどゑｿｽ
ｿｽｿｽﾔにはなゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽ?
Kenichi 2007/05/17(ｿｽｿｽ) 20:49:38
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ閧ｸｿｽ¥ｿｽｿｽｿｽあゑｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽﾂゑｿｽｿｽﾄゑｿｽｿｽｿｽﾊゑｿｽDataGridViewｿｽｿｽDataTebleｿｽｿｽZｿｽbｿｽgｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽeｿｽXｿｽgｿｽIｿｽﾈコｿｽ[ｿｽhｿｽｿｽLｿｽqｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
Form1ｿｽﾉゑｿｽDataGridViewｿｽｿｽ¥ｿｽｿｽtｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ、
ｿｽｿｽｿｽ{ｿｽ^ｿｽｿｽｿｽﾆテｿｽLｿｽXｿｽgｿｽｿｽﾇ会ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
Form2ｿｽﾉはｿｽｿｽXｿｽgｿｽ{ｿｽbｿｽNｿｽXｿｽｿｽ¥ｿｽｿｽtｿｽｿｽｿｽﾄ、
Itemｿｽｿｽ2ｿｽﾂゑｿｽｿｽ轤｢ｿｽﾇ会ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽLｿｽRｿｽ[ｿｽhｿｽｿｽ¥ｿｽｿｽtｿｽｿｽｿｽｿｽﾆ趣ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽﾍゑｿｽｿｽﾅゑｿｽｿｽﾌで、
ｿｽOｿｽｿｽｿｽbｿｽhｿｽｿｽ1ｿｽｿｽﾚのボｿｽ^ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ2ｿｽｿｽﾚのテｿｽLｿｽXｿｽgｿｽｿｽ
ｿｽ|ｿｽbｿｽvｿｽAｿｽbｿｽvｿｽﾌデｿｽ[ｿｽ^ｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽVｿｽKｿｽsｿｽﾌ場合
ｿｽｿｽｿｽXｿｽgｿｽｿｽｿｽｿｽIｿｽｿｽﾅグｿｽｿｽｿｽbｿｽhｿｽﾉ戻ゑｿｽｿｽｿｽｿｽﾛゑｿｽ
ｿｽJｿｽ[ｿｽ¥ｿｽｿｽｿｽﾅ擾ｿｽﾌ行ｿｽﾉ行ｿｽｿｽｿｽﾆｿｽｿｽXｿｽgｿｽﾅ選ｿｽだ値ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽﾉゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽmｿｽｿｽﾜゑｿｽｿｽが、
ｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
Form1(ｿｽfｿｽ[ｿｽ^ｿｽOｿｽｿｽｿｽbｿｽhｿｽｿｽｿｽｿｽﾂフｿｽHｿｽ[ｿｽｿｽｿｽj
-----------------------------------
PublicClassForm1
PrivateSubDataGridView_CellContentClick(ByValsenderAsSystem.Object,ByValeAsSystem.Windows.Forms.DataGridViewCellEventArgs)HandlesDataGridView.CellContentClick
DimfrmAsNewForm2(DataGridView.Rows(e.RowIndex).Cells(1))
frm.Show(Me)
EndSub
PrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load
DimtableAsNewDataTable()
DimdataRowAsDataRow=Nothing
table.Columns.Add("Code")
table.NewRow()
dataRow=table.NewRow()
dataRow("Code")="01"
table.Rows.Add(dataRow)
Me.DataGridView.DataSource=table
EndSub
EndClass
From2(ｿｽ|ｿｽbｿｽvｿｽAｿｽbｿｽvｿｽｿｽﾊ）
-----------------------------------
PublicClassForm2
Privatem_nameAsDataGridViewCell
PublicSubNew(ByValargnameAsDataGridViewCell)
'ｿｽｿｽｿｽﾌ呼び出ｿｽｿｽｿｽﾍ、WindowsｿｽtｿｽHｿｽ[ｿｽｿｽｿｽfｿｽUｿｽCｿｽiｿｽﾅ必ｿｽvｿｽﾅゑｿｽｿｽB
InitializeComponent()
'InitializeComponent()ｿｽﾄび出ｿｽｿｽｿｽﾌ鯉ｿｽﾅ擾ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾇ会ｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
m_name=argname
EndSub
PrivateSubListBox1_MouseClick(ByValsenderAsObject,ByValeAsSystem.Windows.Forms.MouseEventArgs)HandlesListBox1.MouseClick
m_name.Value=Me.ListBox1.SelectedItem
Close()
EndSub
EndClass
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2007/05/21(ｿｽｿｽ) 02:40:47
ｿｽﾜとまゑｿｽｿｽｿｽｿｽｿｽｿｽﾔゑｿｽｿｽｿｽ黷ｽｿｽﾌでテｿｽXｿｽgｿｽｿｽｿｽﾄみまゑｿｽｿｽｿｽｿｽｿｽｿｽAｿｽﾈゑｿｽｿｽﾈゑｿｽｿｽしｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾋ。
>ｿｽJｿｽ[ｿｽ¥ｿｽｿｽｿｽﾅ擾ｿｽﾌ行ｿｽﾉ行ｿｽｿｽｿｽﾆｿｽｿｽXｿｽgｿｽﾅ選ｿｽだ値ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽsｿｽwｿｽbｿｽ_ｿｽﾌアｿｽCｿｽRｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾒ集ｿｽｿｽｿｽnｿｽﾜゑｿｽｿｽﾄゑｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾋ。
ｿｽﾜゑｿｽｿｽﾍ、ｿｽVｿｽKｿｽs(DetachedｿｽﾜゑｿｽｿｽｿｽAddedｿｽｿｽDataRow)ｿｽｿｽ成ｿｽｿｽｿｽｿｽKｿｽvｿｽｿｽｿｽｿｽｿｽ閧ｻｿｽｿｽｿｽﾅゑｿｽｿｽB
ｿｽﾅ、ｿｽwｿｽｿｽｿｽvｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾆ、ｿｽｿｽｿｽｿｽﾈ記ｿｽqｿｽ発鯉ｿｽｿｽB
[IBindingListｿｽCｿｽｿｽｿｽ^ｿｽ[ｿｽtｿｽFｿｽCｿｽX]
http://msdn2.microsoft.com/ja-jp/library/system.componentmodel.ibindinglist%28VS.80%29.aspx
>AddNewｿｽｿｽｿｽ¥ｿｽbｿｽhｿｽｿｽﾄび出ｿｽｿｽｿｽ鼾ｿｽﾍ、ｿｽKｿｽﾘなイｿｽｿｽｿｽfｿｽbｿｽNｿｽXｿｽﾌ付ｿｽｿｽｿｽｿｽ
>ItemAddedｿｽ挙体ゑｿｽgｿｽpｿｽｿｽｿｽｿｽListChangedｿｽCｿｽxｿｽｿｽｿｽgｿｽ発撰ｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
>ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽBｿｽﾇ会ｿｽｿｽｿｽｿｽｿｽｿｽVｿｽｿｽｿｽｿｽｿｽsｿｽﾍ、DataGridViewｿｽRｿｽｿｽｿｽgｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽ
>EscｿｽLｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽﾆ削除ｿｽﾅゑｿｽｿｽｿｽｿｽﾔにゑｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽVｿｽKｿｽsｿｽｿｽｿｽ成ｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽｿｽEscｿｽLｿｽ[ｿｽﾅキｿｽｿｽｿｽｿｽｿｽZｿｽｿｽｿｽﾅゑｿｽｿｽｿｽ況なゑｿｽﾎ、ｿｽﾜゑｿｽｿｽﾉ具ｿｽｿｽﾟてゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽvｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽcｿｽcｿｽOｿｽｿｽｿｽｿｽｿｽｿｽListChangedｿｽCｿｽxｿｽｿｽｿｽgｿｽ発撰ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ@ｿｽｿｽｿｽかｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽ皷橸ｿｽAｿｽｿｽｿｽｿｽｿｽ理ｿｽﾈ包ｿｽｿｽ@ｿｽﾆゑｿｽｿｽﾄ、ｿｽｿｽｿｽtｿｽｿｽｿｽNｿｽVｿｽｿｽｿｽｿｽｿｽｿｽgｿｽｿｽｿｽｿｽ
[BindingList.OnListChangedｿｽｿｽｿｽ¥ｿｽbｿｽh]
http://msdn2.microsoft.com/ja-jp/library/ms132698%28VS.80%29.aspx
ｿｽｿｽﾄび出ｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽ閧ｪｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽcｿｽcｿｽｿｽｿｽUｿｽ@ｿｽﾆは呼べなゑｿｽｿｽCｿｽｿｽｿｽｿｽﾜゑｿｽｿｽﾋ。
Ifm_name.OwningRow.IsNewRowThen
ｿｽ@DimdgvAsDataGridView=m_name.DataGridView
ｿｽ@DimmAsSystem.Reflection.MethodInfo=_
ｿｽ@ｿｽ@GetType(CurrencyManager).GetMethod("OnListChanged",_
ｿｽ@ｿｽ@System.Reflection.BindingFlags.InstanceOr_
ｿｽ@ｿｽ@System.Reflection.BindingFlags.NonPublic).Invoke(_
ｿｽ@ｿｽ@dgv.BindingContext()(dgv.DataSource),NewObject(){_
ｿｽ@ｿｽ@NewSystem.ComponentModel.ListChangedEventArgs(_
ｿｽ@ｿｽ@System.ComponentModel.ListChangedType.ItemAdded,_
ｿｽ@ｿｽ@dgv.NewRowIndex)})
EndIf
m_name.Value=ListBox1.SelectedItem
Close()
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2007/05/21(ｿｽｿｽ) 02:45:10
ｿｽｿｽｿｽｿｽｿｽBｿｽ]ｿｽvｿｽﾈ行ｿｽｿｽｿｽｿｽｿｽ鼾橸ｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽBm(__)m
Ifm_name.OwningRow.IsNewRowThen
ｿｽ@DimdgvAsDataGridView=m_name.DataGridView
ｿｽ@GetType(CurrencyManager).GetMethod("OnListChanged",_
ｿｽ@System.Reflection.BindingFlags.InstanceOr_
ｿｽ@System.Reflection.BindingFlags.NonPublic).Invoke(_
ｿｽ@gv.BindingContext()(dgv.DataSource),NewObject(){_
ｿｽ@NewSystem.ComponentModel.ListChangedEventArgs(_
ｿｽ@System.ComponentModel.ListChangedType.ItemAdded,_
ｿｽ@dgv.NewRowIndex)})
EndIf
m_name.Value=ListBox1.SelectedItem
Close()
Kenichi 2007/05/22(ｿｽｿｽ) 17:58:45
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士ｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽﾔ信ｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽﾗ抵ｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽﾒ集ｿｽｿｽｿｽnｿｽﾜゑｿｽｿｽﾄゑｿｽｿｽﾈゑｿｽｿｽﾌゑｿｽ
ｿｽﾒ集ｿｽｿｽｿｽIｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾈゑｿｽｿｽｿｽﾔなのゑｿｽｿｽかｿｽｿｽﾈゑｿｽｿｽｿｽﾔなのゑｿｽ
ｿｽｿｽｿｽｿｽｿｽﾅ「ｿｽVｿｽKｿｽsｿｽﾅ編集ｿｽｿｽmｿｽ閧ｷｿｽｿｽﾉは？ｿｽvｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ抵ｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽﾌほゑｿｽｿｽﾅゑｿｽｿｽｿｽﾗ托ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈ包ｿｽｿｽ@ｿｽﾅ会ｿｽｿｽｿｽﾅゑｿｽｿｽ骼厄ｿｽｿｽｿｽoｿｽｿｽｿｽｿｽｿｽが、
ｿｽﾚゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽﾌで、ｿｽﾆりあｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄみまゑｿｽｿｽｿｽｿｽB
ｿｽ皷橸ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽﾝゑｿｽｿｽｿｽｿｽﾈので、ｿｽｿｽｿｽmｿｽ轤ｹｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾚ搾ｿｽ
Form1ｿｽｿｽDataSetｿｽｿｽBindingSourceｿｽｿｽ¥ｿｽｿｽtｿｽｿｽｿｽﾄ、DataSetｿｽｿｽ
ｿｽRｿｽ[ｿｽhｿｽｿｽﾅ記ｿｽqｿｽｿｽｿｽｿｽDataTableｿｽｿｽ}ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽ¥ｿｽﾟグｿｽｿｽｿｽbｿｽhｿｽｿｽDataSetｿｽABindingSourceｿｽﾍ、ｿｽAｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽ黷ｩｿｽｿｽOｿｽｿｽｿｽbｿｽhｿｽｿｽCellValidatingｿｽCｿｽxｿｽｿｽｿｽgｿｽﾅ、
ｿｽVｿｽKｿｽsｿｽﾈゑｿｽBindingSource.Currentｿｽﾉ抵ｿｽｿｽﾚ擾ｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽ
ｿｽlｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾈゑｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽ¥ｿｽ[ｿｽXｿｽｿｽﾚゑｿｽｿｽｿｽｿｽﾙゑｿｽｿｽｿｽｿｽ謔ｩｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽｿｽLｿｽeｿｽXｿｽgｿｽRｿｽ[ｿｽhｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽﾌで、ｿｽｿｽｿｽﾍでゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士ｿｽｿｽｿｽｿｽAｿｽｿｽｿｽﾌ托ｿｽｿｽｿｽｿｽlｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽFｿｽｿｽｿｽｿｽ
ｿｽ{ｿｽｿｽｿｽﾉゑｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2007/05/22(ｿｽｿｽ) 19:10:11
>ｿｽVｿｽKｿｽsｿｽﾈゑｿｽBindingSource.Currentｿｽﾉ抵ｿｽｿｽﾚ擾ｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽ?ｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽﾆはゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ、ｿｽoｿｽCｿｽｿｽｿｽhｿｽｿｽﾉ対ゑｿｽｿｽ髀茨ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽB
ｿｽｿｽｿｽﾝまゑｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽeｿｽｿｽﾇみ違えｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽBm(__;)m
>>ｿｽｿｽｿｽ{ｿｽ^ｿｽｿｽｿｽﾆテｿｽLｿｽXｿｽgｿｽｿｽﾇ会ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽｿｽsｿｽｿｽｿｽｿｽｿｽｿｽAｿｽ示ゑｿｽｿｽ黷ｽｿｽRｿｽ[ｿｽhｿｽｿｽｿｽｿｽﾌまま趣ｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽ@ｿｽｿｽ0ｿｽc[Button]ｿｽｿｽAｿｽｿｽ
ｿｽ@ｿｽｿｽ1ｿｽc[TextBox]ｿｽｿｽAｿｽｿｽ
ｿｽ@ｿｽｿｽ2ｿｽc[TextBox]Codeｿｽｿｽﾉ連ｿｽｿｽ
ｿｽﾉなゑｿｽｿｽｿｽｿｽﾌで、
>>DimfrmAsNewForm2(DataGridView.Rows(e.RowIndex).Cells(1))
ｿｽﾍ、(Codeｿｽｿｽﾅはなゑｿｽ)ｿｽｿｽAｿｽｿｽｿｽｿｽﾉ対ゑｿｽｿｽ髀茨ｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽcｿｽB(^^;
Kenichi 2007/05/23(ｿｽｿｽ) 13:29:46
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士ｿｽｿｽｿｽｿｽ
ｿｽ¥ｿｽｿｽｿｽあゑｿｽﾜゑｿｽｿｽｿｽB
ｿｽ示ゑｿｽｿｽｿｽｿｽRｿｽ[ｿｽhｿｽｿｽｿｽｿｽﾅは、ｿｽｿｽAｿｽｿｽｿｽﾌ暦ｿｽﾉなゑｿｽﾜゑｿｽｿｽﾋ。
ｿｽ示ゑｿｽｿｽｿｽｿｽRｿｽ[ｿｽhｿｽﾍ、ｿｽ}ｿｽｿｽｿｽﾅ作成ｿｽｿｽｿｽｿｽｿｽｿｽﾌゑｿｽ
ｿｽｿｽｿｽﾛのプｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽﾍ、ｿｽ{ｿｽ^ｿｽｿｽｿｽﾈ外ｿｽﾍ連ｿｽｿｽｿｽｿｽｿｽ
ｿｽOｿｽｿｽｿｽbｿｽhｿｽｿｽgｿｽpｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽeｿｽｿｽｿｽsｿｽｿｽｿｽmｿｽｿｽ
ｿｽｿｽｿｽﾉ申ｿｽｿｽｿｽあゑｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽ黷ｩｿｽｿｽﾍ抵ｿｽｿｽﾓゑｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽﾌゑｿｽ
ｿｽｿｽｿｽｿｽAｿｽｿｽｿｽ竄ｳｿｽｿｽｿｽﾄ抵ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾍゑｿｽﾝゑｿｽｿｽﾄゑｿｽ轤ｦｿｽｿｽﾆ幸ｿｽｿｽｿｽﾅゑｿｽｿｽB
