tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルMSFlexGridみたいにDataGridでも
記事No2870
投稿日: 2006/01/12(Thu) 15:28
投稿者グランドファザー
[OSのVer]:Windows    [VBのVer]:VB.NET 

お世話になっております。
MSFlexGridで行の中のスタッフNoをとってSQLを発行しているのですけど(下記のとおり)
strSql = "SELECT * FROM スタッフ管理
WHERE スタッフNo='" & flxStaff.get_TextMatrix(flxStaff.Row, 0) & "'"
 

DateGridでこのようなことはできないでしょうか?
行を選択すると同じくスタッフNoの値をとりSQLを発行したいのですけれども
よろしくお願いします

[ツリー表示へ]
タイトルRe: MSFlexGridみたいにDataGridでも
記事No2872
投稿日: 2006/01/12(Thu) 23:47
投稿者なおこ(・∀・)
お世話になります。

DataGrid で現在選択されている行で、1 列目の object をとる場合はこんな感じです。
Dim selectedObject As Object = Me.DataGrid1.Item(Me.DataGrid1.CurrentRowIndex, 0)

[ツリー表示へ]
タイトルRe^2: MSFlexGridみたいにDataGridでも
記事No2874
投稿日: 2006/01/13(Fri) 08:55
投稿者グランドファザー
[OSのVer]:Windows    [VBのVer]:VB.NET  
> お世話になります。
>
> DataGrid で現在選択されている行で、1 列目の object をとる場合はこんな感じです。
> Dim selectedObject As Object = Me.DataGrid1.Item(Me.DataGrid1.CurrentRowIndex, 0)

なおこ(・∀・)さん返信ありがとうございます。

どのようにしたらDataGridを選択したらtextboxに入ってもらえるでしょうか?
下記のようにしたら出来ませんでした。よろしくお願いします。
Private Sub DataGrid1_Navigate(ByVal sender As System.Object, ByVal ne As
System.Windows.Forms.NavigateEventArgs) Handles DataGrid1.Navigate
        Dim selectedObject As Object = Me.DataGrid1.Item(Me.DataGrid1.CurrentRowIndex, 0)
        txtStaffNo.Text = selectedObject
    End Sub

[ツリー表示へ]
タイトルRe^3: MSFlexGridみたいにDataGridでも
記事No2875
投稿日: 2006/01/13(Fri) 10:01
投稿者じゃんぬねっと
参照先http://jeanne.wankuma.com/
> どのようにしたらDataGridを選択したらtextboxに入ってもらえるでしょうか?

すいません、意味がわかりません。

> Dim selectedObject As Object = Me.DataGrid1.Item(Me.DataGrid1.CurrentRowIndex, 0)
> txtStaffNo.Text = selectedObject

この時、selectedObject は何を指し示しているのか、
式ウォッチで見るなり検証すると、たいてい自己解決できます。

[ツリー表示へ]
タイトルRe^4: MSFlexGridみたいにDataGridでも
記事No2878
投稿日: 2006/01/13(Fri) 10:50
投稿者グランドファザー
[OSのVer]:Windows    [VBのVer]:VB.NET  
> > どのようにしたらDataGridを選択したらtextboxに入ってもらえるでしょうか?
>
> すいません、意味がわかりません。
>
読みづらくすいません。
言いたかったのはMSFlexGridでいうEnterCellをDataGridでおこなうにはどうするのかということです。
お願いいたします。

[ツリー表示へ]
タイトルRe^5: MSFlexGridみたいにDataGridでも
記事No2880
投稿日: 2006/01/13(Fri) 16:03
投稿者グランドファザー
[OSのVer]:Windows    [VBのVer]:VB.NET  
> [OSのVer]:Windows    [VBのVer]:VB.NET  

ご迷惑をおかけしました。
下記でできるようになりました。
Private Sub myDataGrid_CurrentCellChanged(ByVal sender As Object, ByVal e As
System.EventArgs) Handles DataGrid1.CurrentCellChanged
        Dim selectedObject As Object = Me.DataGrid1.Item(Me.DataGrid1.CurrentRowIndex, 0)
        txtStaffNo.Text = selectedObject
    End Sub

[ツリー表示へ]