进出库管理系统源码

.版本2.子程序_删除_被选择.局部变量当前选中,整数型.局部变量文本数组,文本型,,"0".局部变量文本数组2,文本型,,"0".局部变量删除容器,字节集.局部变量x,整数型.如果真(列表框1.现行选中项＝-1)信息框(“请在列表中选中需要删除的会员！”,0,)返回().如果真结束当前选中＝列表框1.现行选中项移到文件首(文件号)删除容器＝读入字节集(文件号,取文件长度(文件号))文本数组＝分割文本(到文本(删除容器),#换行符,).计次循环首(取数组成员数(文本数组),x).如果