1.     MaxMyHPPot=cint(Right(nw,Len(nw)-InStr(nw,"=")))
  2.     循环 2 遍
  3.         nw=myfile.readline
  4.     循环结束
  5.     MyMPPot=cint(Right(nw,Len(nw)-InStr(nw,"=")))
  6.     循环 2 遍
  7.         nw=myfile.readline
  8.     循环结束
  9.     TimeDuiWu=cint(Right(nw,Len(nw)-InStr(nw,"=")))
  10.     循环 2 遍
  11.         nw=myfile.readline
  12.     循环结束
  13.     DuiWuHPPot=cint(Right(nw,Len(nw)-InStr(nw,"=")))
  14.     循环 2 遍
  15.         nw=myfile.readline
  16.     循环结束
  17.     FLHDPot=cint(Right(nw,Len(nw)-InStr(nw,"=")))
  18.     循环 2 遍
  19.         nw=myfile.readline
  20.     循环结束
  21.     FBFlage=cint(Right(nw,Len(nw)-InStr(nw,"=")))
  22.     循环 2 遍
  23.         nw=myfile.readline
  24.     循环结束
  25.     SiWang=cint(Right(nw,Len(nw)-InStr(nw,"=")))
  26.     循环 2 遍
  27.         nw=myfile.readline
  28.     循环结束
  29.     GenSuiTimePot=cint(Right(nw,Len(nw)-InStr(nw,"=")))
  30.     myfile.close
  31. 子程序结束,回到调用处