Abstract: To use VBA language for AutoCAD secondary development and function of expand data, the paper realized assignment and query of borehole attribute information such as initial gas flow quantity of borehole, gas flow attenuation coefficient of borehole and start and end dates of borehole drainage of gas drainage borehole in mine gas geological map, and respectively realized prediction of borehole gas drainage quantity in block according to the initial gas flow quantity of borehole and gas flow quantity of hundred meters borehole. It applied inverse distance weighted method and gas geological statistics method to realize automatic calculation of gas resource quantity in block and its surplus based on the mine gas geological map. The actual application result shows that prediction error of the gas resource quantity and borehole gas drainage quantity is 3.7%, and prediction result provides reference for evaluation of the gas resource quantity and gas drainage effect.