在编辑记录时，怎样另外开个窗口对当前记录编辑？怎样传递参数？

Question

传递一个ID号就可以了
在另外的窗体中用这个ID号在数据库中检索数据来编辑在窗体中
public DataID as long 
编辑的时候
frmEdit.DataID=ID1

Answer 1

好一点的参数传递还请用
Property Let
与
Property GetExample:in Form:dim mDataID as long 
Property Let DataID(newValue as long)
  mDataID=NewValue
End PropertyfrmEdit.DataID=ID1

Answer 2

也可用一个公共的变量来存当前记录的数据。例 
public StrRecord as string
窗体一显示记录，窗体二显示选中的记录。
Private Sub Grid1_DblClick()
  strrecord=...'选中行的标志
  FrmGY2.Show
End Sub
Private Sub Form_Load()
 Dim Strsql As String
 Strsql = "Select * From 信息表 Where ID='" & strrecord & "'"
 rs.open strsql
End Sub

Answer 3

在输入窗体里定义一个公共变量
例：public myrecord as record