1�������ṹ
���������ṹ��ͼ1��
����Fortran���Լ��㹦��ǿ�ʱ��������㲿(wang)����Fortran���ɣ�������Fortran��������DOS���������У�����Ϊ�ַ������������û���Ϊ���㣻��VB������Windows���������У���Ϊ�û��ṩͼ�IJ�ï��ͼ�β������������⣬Fortran��Ϊһ�ֽṹ�����ԣ���������˳����������˳��Ӱ�죬��VB�������ɸ����û���Ҫ��������������˳�����У����Ա�������VB���ƽ��棬ʹ�û���ͨ��������ʾ�������ݣ�ѡ���ṹ������������
����������ˮ��ˮ�����������Բ����ļ��㺯���ڼ���������Ҫ���α�ʹ�ã��ʽ����ֳ��γɹ���ģ���Ա㱻����ģ�����á����ӳ���������Notepad������Access���ݿ⣬��ͨ����Դ�������������ʹ�¯�������ʹ�¯��Ҫȼ�տ�������ľм������ѹ�Ƶ������ʿ���ȼ�ϡ�
2��������������
��������������������ʱ���Ȱ����������齫���ֳ�ȼ�ϼ��㡢(man)����ʧ���㡢(man)�ṹ������������������4���֣����������������ṹ���㰴(pou)ʵ���������IJ��������ɷֳɺ�������������ʽ��������ˮ���������ܡ�ĩ����������ĩ�����������������Źܡ���ʽ���¹�������ת���ҡ�ˮƽʽ���¹�������ʡú���Ϳ���Ԥ������11�����֣���ͼ2��
3�������������ĸĽ�������
3.1¯�ų������¼��㹫(yi)ʽ�IJ���
�ҹ���¯����ҵһֱ����ԭ����1973����������������¯�ڴ��ȼ��㷽������Щ���㷽������200��300 t/h�������µĹ�¯¯�ڴ������������ܽ������ģ��������������������к�����¯����״��ú�ķ�Ӧ���ԡ�һ���������η��������������ص�Ӱ�죬���⣬��ú��մ�����Լ�ȼ�ղ����ķ������ԵĿ���Ҳ���ڴ��ԣ��������ֳ��������������������ڴ���¯�������»�Ƿ�£���ԭ�������������õ�ǰ����¯��������������ȷ�������ĵ����������ҹ����۵�300 MW��600 MW�������Ĺ�¯����¯�ų��������ձ��ڲ�ͬ�̶���ƫ������ֵ�����ĵ�һ�����������������ۼ��㷽������֪ʵ���������ԶŲ���˹�������Ĺ�ʽ�������ش��������ó����µĸ�Ϊ������¯�Ż��ȼ��㹫(yi)ʽ��
����������ʽ���ϴ�������¯��ʵ�����������˱��������øû��ȹ�ʽ��
Ϊ����֤��һ��ʽ����ȷ�ԣ��������������Ƶij����������õ���Ҫ���������볧�����ṩ�ļ������������˱Ƚϣ��ɼ���������Сf��������ú�֣������1��
���������Ƶ������������������ǶԹ�¯�����˱乤���µ������������㣬�����ֳ��������ݽ����˱Ƚϣ�������������С���������Դ���¯�乤(xia)��������������������Ҫ�����������������ġ�
3.2���¼���
Ŀǰ���ܱڳ����ǵ�վ��¯����ʱ��������⣬����������������ֻ�ܵõ�����������������ƽ���¶ȣ����ܷ�ӳ�����¶ȣ����ˣ��������ֶ��׳��ֳ���������3����λ��������������ĩ���������ֱ������˼�����Ԥ֪�����ڲ�ͬ�����µ����߱��¡����⣬�������˱����źţ����������в�����Ա��
3.3������
��¯��Ч����һ�ӳ��¯����״������Ҫ����ָ�꣬����ʵ���������糧(liang)ʵ��������������Ҫ�����塣(zheng)Ϊ�ˣ��������ڴ����������Ļ������������˶Թ�¯Ч�ʵ�ʵʱ��������ʾ���Ա����в�����Ա����ʱ�˽���¯����״����
3.4�����������ݿ��Ľ���
�����Ĺ�¯�����������������������������ı��ļ�����ʽ���棬��Ϊ�����ɷ����û��鿴�������ļ����������ı����������������Ĺ����������⣬���ӵ���Ϣϵͳʹ����Ӧ�ó����ڶ��������������ӹ�ʱ�ܵ��ܴ������ơ��������������ݿ���ʽ�Լ����������д洢(yi)��һ��ʹ�����ļ�����������С������ʹ����������ԭ�����Ķ����Խϴ������ɷ����û��ÿ������ˣ��������н������������������ݿ���ʽ��ʾ��
VB�������ݿ��Ĺ�����Ҫ����Microsoft Jet���ݿ����楨(zhen)Data�ؼ������ݷ��ʶ���(DAO)�����ӿڡ�DAO�����ƹ�ϵ���ݿ�ϵͳ�ṹ�Ķ������ļ��ϣ�������������Ա�ɱ�д���������ʸ������ݿ⣬��Microsoft Access.dBASE��Foxpro���ⲿ���ݿ�����Microsoft Access��ʽ���Ƶı������ݿ⡣Data�ؼ�ʹ�û��ɲ���д�κδ������ܶ����ݿ����дֲ�����������ͨ��DAO������Access��ʽ��ͬ�ı������ݿ�����������Data�ؼ��������а�ʹ�û���ͨ�����������е����ݽ������ӡ�ɾ���Ͳ�ѯ�Ȳ�����
4 �� ��
(1)���ڱ������ǻ���Windows��������������������VB�������˻��������̣������������н������ú�ʹ�����������ص㡣
(2)���ڱ�����ר�����Է��ǵ糧(liang)4̨��300 MW�����Ĺ�¯�����������ѵõ�ʵ�����������ļ��飬(juan)���˾��н�ǿ��ʵ���Ժ�ȷ�ԡ�
(3)�뵥���������������ȣ������������˱��¼��㡢(man)����Ч�ʵļ��㣬(qi)���ұ��������������������ݿ���ʽ�洢���������������û����������ڵ�վ��¯��������ʵ�ʹ������塣



