有关FOXPRO FOR WINDOWDS 中的问题之二,希望各位大虾多多提供信息,在线等候
我用FOXPRO编了以下这个菜单,程序如下:
set talk off
clear
DIMENSION mainmenu(7,2)
mainmenu (1,1)='数据输入'
mainmenu (2,1)='数据查询'
mainmenu (3,1)='系统维护'
mainmenu (4,1)='统计'
mainmenu (5,1)='打印'
mainmenu (6,1)='帮助'
mainmenu (7,1)='退出'
mainmenu (1,2)='该模块主要完成教职工基本情况输入'
mainmenu (2,2)='该模块能够按照各种条件进行人事查询'
mainmenu (3,2)='该模块主要完成人事库数据的修改,增加和删除'
mainmenu (4,2)='该模块能够统计四种人事报表'
mainmenu (5,2)='该模块能够打印四种人事报表'
mainmenu (6,2)='帮助系统'
mainmenu (7,2)='退出人事管理信息系统'
DIMENSION submenu1(1)
submenu1 (1)='\<1.输入'
DIMENSION submenu2(4)
submenu2 (1)='\<1.按编号查询'
submenu2 (2)='\<2.按姓名查询'
submenu2 (3)='\<3.按单位查询'
submenu2 (4)='\<4.按任意条件查询'
DIMENSION submenu3(3)
submenu3(1)='\<1.数据修改'
submenu3(2)='\<2.数据增加'
submenu3 (3)='\<3.数据删除'
DIMENSION submenu4(4)
submenu4(1)='\<1.按年龄来统计'
submenu4(2)='\<2.按各单位各系列来统计'
submenu4(3)='\<3.按各单位各职称来统计'
submenu4(4)='\<4.按各系列各职称来统计'
DIMENSION submenu5(4)
submenu5(1)='\<1.打印年龄统计报表'
submenu5(2)='\<2.打印各单位各系列'
submenu5(3)='\<3.打印各单位各职称'
submenu5(4)='\<4.打印各系列各职称'
DIMENSION submenu6(1)
submenu6(1)='\<1.帮助'
DIMENSION submenu7(1)
submenu7(1)='\<1.退出'
MENU BAR mainmenu,7
menu 1, submenu1,1
menu 2, submenu2,4
menu 3, submenu3,3
menu 4, submenu4,4
menu 5, submenu5,4
menu 6, submenu6,1
menu 7, submenu7,1
STORE 1 TO row,col
read menu bar to row,col
do case
case row=1 and col=1
do a:\sjsr
case row=2 and col=1
do a:\sjcx
case row=2 and col=2
do a:\xm12
case row=2 and col=3
do a:\dw12
case row=3 and col=1
do a:\xtwh
case row=3 and col=2
do a:\tj
case row=3 and col=3
do a:\sc
case row=4 and col=1
do a:\tg
case row=4 and col=2
do a:\gdw
case row=4 and col=3
do a:\gxl
case row=5 and col=1
do a:\de
case row=5 and col=2
do a:\gtw2
case row=5 and col=3
do a:\zc2
case row=5 and col=4
do a:\xl2
case row=6 and col=1
do a:\help11
case row=7 and col=1
do a:\xttt
endcase
return
问题是,当我运行他的时候,运行结果总是在一边,我想让它在FOXPRO上显示中间位置,请问应该如何编程?
急急急,十万火急。