在VB中判断当前获得焦点的控件是否是想要的那一个

  1.     '把sng传给子窗体
  2.     Set frmX = Forms.Item("FrmWeekFood").Form
  3.     Set frmChild = frmX.chdFrmRecipeFood.Form
  4.     If frmChild.ActiveControl Is frmChild.数量 Then frmChild.数量 = sngQuant
  5.     If frmChild.ActiveControl Is frmChild.单位营养量 Then frmChild.单位营养量 = sngQuant
  6.     
  7.     Set frmX = Nothing
  8.     Set frmChild = Nothing

你可能感兴趣的:(vb)