参考:
http://www.foxtable.com/help/topics/0642.htm
Select Case e.Row("列名")
Case "值11"
Forms("窗口11").Open
Case "值22"
Forms("窗口22").Open
Case "值33"
Forms("窗口33").Open
End Select