代码好象不对。在表单B的init中执行do **.mpr with this,.t.
然后你把表单B的showwindow设为在顶层表单中试试。我怀疑在子表单中做菜单是不行的。可能这样。设表单A为MDI表单,顶层。再试试