DataGrid Trouble / Help

[Miro]

VB 2005 express...

I created a database "Staff" and it has 1 table in it.
There are 3 columns in it so far.
"StaffID" -INT - Primary Key auto incremented by 1
"FirstName" - Varchar
"LastName" - varchar
( there will be more later - but baby steps )

Then I created 2 forms.
Form1 is the main form where I dragged the datagrid to the form.

Now I made the Datagrid.Select ionMode = FullRowSelect
and the datagrid is not editable.

Now On Form2 I created a property that is going to store the "StaffID"
This form I am going to try to code all "without a wizard".

====
Dim iStaffMember As Integer = ""

Public Property StaffMember() As Integer
Get
Return iStaffMember
End Get
Set(ByVal Value As Integer)
iStaffMember = Value
End Set
End Property
===

So now back on Form1 right before I try to "Form2.SHOW ()" I try to set
that property from the datagrid so i can do my "own select" statement in
form 2 to show the detail's of the data.
( Example like: Select * from Staff where StaffID = StaffMemberProp erty )

But I just cant seem to get the property set correctly

Dim fStaffMember as New Form2
fStaffMember.St affMember =
Me.StaffDataSet .Staff.Rows(Me. StaffDataGridVi ew.CurrentCell. RowIndex)("Staf fID")

first off, the CurrentCell.Row Index is incorrect - since I allow
resorting by column, its actually not the correct index from the dataset.

2nd, I get a convert error.

What is the parameter I should be using to get the "row#" from the bound
dataset?
And what Datatype should by Property be dim'd as?

Thanks

Miro

[yuichiro ochifuji]

Hi,Miro

"Miro" wrote in message
news:uM******** *****@TK2MSFTNG P06.phx.gbl

Dim iStaffMember As Integer = ""

You can't set String to Integer,so
Dim iStaffMembeer as Integer=-1

Dim fStaffMember as New Form2
fStaffMember.St affMember =
Me.StaffDataSet .Staff.Rows(Me. StaffDataGridVi ew.CurrentCell. RowIndex)("Staf fID")

directcast(Me.S taffDataGridVie w.CurrentRow.Da taBoundItem,
DataRowView).Ro w.Item("StaffID ")

[Miro]

yuichiro ochifuji wrote:

Hi,Miro

"Miro" wrote in message
news:uM******** *****@TK2MSFTNG P06.phx.gbl

>Dim iStaffMember As Integer = ""

You can't set String to Integer,so
Dim iStaffMembeer as Integer=-1

>Dim fStaffMember as New Form2
fStaffMember.S taffMember =
Me.StaffDataSe t.Staff.Rows(Me .StaffDataGridV iew.CurrentCell .RowIndex)("Sta ffID")

directcast(Me.S taffDataGridVie w.CurrentRow.Da taBoundItem,
DataRowView).Ro w.Item("StaffID ")

I have just figured this out, just as you posted your post for me,

Dim bmStaff As BindingManagerB ase =
Me.StaffDataGri dView.BindingCo ntext(Me.StaffD ataGridView.Dat aSource,
Me.StaffDataGri dView.DataMembe r)
Dim dr As DataRow = CType(bmStaff.C urrent, DataRowView).Ro w

frmMain.fStaffM ember.StaffMemb er = CInt(dr("StaffI D"))

I tried yours and had to put a CInt( around your directcast.

Im assuming both our codes are doing the same thing?

Thanks,

Miro