Visual Basic程序設計在計算煤巖層產狀中的應用

在煤礦生產中, 煤巖層的產狀要素是巷道布置和選擇采煤方法的主要依據。

目前, 煤礦地質人員測定煤巖層產狀要素的方法主要有:直接測定法(層面測量、巷道接線測量)、間接測定法和礦圖求解法。這幾種方法在現場測定需多人合作才能完成,局限性強,測量數據誤差較大。

傳統煤巖層產狀測量方法是先找到層面，在層面上測量多組視傾角，然后取其最大值作為真傾角，其所對應的傾向為真傾向。而在井下由于受條件限制，很難找到煤巖層產狀的層面，故用傳統方法測量其產狀比較困難，但井下沿掘進方向和迎頭斷面煤巖層視傾角較容易測量，在原直接測定法、間接測定法和礦圖求解法的基礎上,結合利用數學知識,推導了利用公式計算測定煤巖層產狀要素, 通過推導相關公式，得出煤礦井下由巷道掘進方向視傾角和迎頭斷面視傾角計算煤巖層真傾向與真傾角的方法，并通過Visual Basic編程實現由兩向視傾角計算真傾角與傾向的應用程序，為煤礦地質人員測量與計算井下煤巖層產狀提供方便。

推廣應用情況：

通過該程序的編制，有效地克服了現場測定需多人合作才能完成的局限性,簡化了現場的操作程序,有效地減少了現場的測定誤差,并實現計算界面可視化且操作方便，計算準確快捷，為采掘設計提供準確的基礎資料，節省人力、物力，具有廣泛推廣應用價值。礦井地質工作中，準確及時地測定、掌握工作面煤巖層產狀，對地質資料的搜集、分析、運用，指導礦井設計、安全生產意義重大。

完成單位：新橋煤礦 成果類別：小革新 獲獎等級：二等獎