怎么得到父窗体？

按钮打开下面这样:  
   
  Private   Sub   Botton_Click()  
  Dim   F   as   Form  
  Set   F=new   FrmNew   '用new出来的  
  f.Sql="Select   *   from   tb"  
  f.show  
  End   Sub  
   
   
  FrmNew中的代码如下：  
   
  Public   Sql   as   string'全局数据库操作字符串  
  Private   Sub   Form_Load()  
  Grid_Fresh'刷新Grid数据  
  End   Sub  
   
  Private   Sub   CmdEdit_Click()'打开数据编辑窗口  
  frmEdit.id=100  
  frmEdit.Show  
  End   Sub  
   
  Public   Sub   Grid_Fresh()  
  Dim   Rs   as   New   Adodb.recordset  
  rs.open   Sql,conn,1,1  
  if   not   rs.eof   then  
  ..........'显示数据  
  End   if  
  End   Sub  
   
   
  窗体FrmEdit的代码如下，问题也在下面出来  
   
  Private   Sub   CmdSave_Click()'保存编辑后数据  
  sql="update   tb   ..........."  
  conn.execute   sql  
  FrmNew.Sql="Select   *   from   tb   where   id=11111"'就是这条语句就一点问题了  
  FrmNew.Grid_Fresh()'  
  '就是这条语句也有一点问题了,我前面是set   f=new   FrmNew出来的，我如何刷新Grid????  
  unload   me  
  End   Sub  
  问题点数：30、回复次数：4Top

1 楼WizardBear（飞猫_重起机器）回复于 2005-05-18 15:27:17 得分 30

没看明白，  
   
  FrmNew   和   FrmEdit谁是主窗口？  
   
  如果FrmEdit是主窗口的话，为什么电击cmd_save后，把主窗口给关了？  
   
  如果FrmNew是主窗口的话，FrmEdit窗口什么时候出现的？Top

2 楼yhd0411（二分之一）回复于 2005-05-18 15:36:02 得分 0

FrmNew是主窗口  
   
  FrmEdit是编辑信息的窗口，编辑后关掉自己，然后刷新主窗口FrmNew中的GridTop

3 楼WizardBear（飞猫_重起机器）回复于 2005-05-18 15:56:50 得分 0

frmEdit里定义一个变量：  
   
  public   f   as   FrmNew  
   
  然后调用frmEdit的时候加上这句：  
   
  ...  
  set   frmEdit.f   =   Me  
  ...  
   
   
  然后在frmEdit里的f就是调用者frmNew了。  
   
  Top

4 楼yhd0411（二分之一）回复于 2005-05-18 16:06:20 得分 0

谢谢Top

相关问题

• grid
• 数据
• sql
• frmedit
• frmnew
• 刷新
• fresh
• sub
• tb
• 编辑

• 帖主：yhd0411
• WizardBear

• Visual Basic类图书
• Visual Basic类源码下载