Opening new Form from a selected listview item (VB.NET)

[isnpms]

Hi, i used in MS ACCESS 2007/2010 this code to open a new form (with a new table) when hit double click over a listview valeu, fexp, i had a listview with names and when i double click a name a had a new form with this name data. I dpn't know how to re-write it for VB.NET and i need help from anu=yone. Thanks a lot. (Ivan, Brazil)

Option Compare Database

Private Sub Lista31_DblClick(Cancel As Integer)
 If Not IsNull(Lista31) Then
      AShowRecord_Click
 End If
End Sub

Private Sub AShowRecord_Click()
'Find a selected record, then close the search dialog box
    DoCmd.OpenForm "frm_DadosCadastrais_Iniciais", , , _
"tbl1_DadosCadastrais.Nome=" & "'" & Me.Lista31.Column(1) & "'"
Me.Requery
DoCmd.Close acForm, "frm_Exames_DopplrObst_7dias"
End Sub