调平层超欠挖的编程可以通过以下步骤进行：
输入实测点坐标和高程
首先，需要输入实测点的坐标（如X, Y）和高程（如Z）。
计算超欠挖情况
通过超欠挖主程序，输入实测点的坐标和高程，计算出此点的超欠挖情况。
坐标反算桩号
使用QH2-7程序的坐标反算桩号功能，竖曲线计算此桩号的设计高程。
计算超欠挖量
根据设计高程和实测高程的差值，计算出超欠挖量。
```vb
' 假设输入的实测点坐标和高程
Dim X As Double, Y As Double, Z As Double
' 输入实测点坐标和高程
X = 100.0 ' 示例X坐标
Y = 200.0 ' 示例Y坐标
Z = 10.0 ' 示例高程
' 计算超欠挖情况
' 这里需要调用QH2-7程序的坐标反算桩号功能，并计算设计高程
' 假设设计高程为H_design
Dim H_design As Double
H_design = CalculateDesignElevation(X, Y)
' 计算超欠挖量
Dim over_excavation As Double, under_excavation As Double
If Z > H_design Then
over_excavation = Z - H_design
Else
under_excavation = H_design - Z
End If
' 输出结果
Console.WriteLine("超欠挖量：")
Console.WriteLine("超欠挖: " & over_excavation)
Console.WriteLine("欠挖: " & under_excavation)
' 辅助函数：计算设计高程
Function CalculateDesignElevation(X As Double, Y As Double) As Double
' 这里需要调用QH2-7程序的坐标反算桩号功能
' 假设返回设计高程H_design
Dim H_design As Double = 12.0 ' 示例设计高程
Return H_design
End Function
```
请注意，这只是一个简化的示例代码，实际编程中需要根据具体的工程需求和测量数据进行调整。建议使用专业的测量和计算软件（如QH2-7）来进行精确的超欠挖计算，并将结果导入到编程环境中进行进一步处理和分析。