Ibaraki Beta Weight

茨城（测试版）体重解决方案

帮助 Emar 集团西山团队更快地从 Bunka Shutter 合作伙伴传输 Ibaraki (Betta) 重量数据的解决方案。

面具

代码演示

 ''' <summary>
''' 運賃 (2トン車).
''' </summary>
''' <param name="xlApp">Excel Application.</param>
''' <param name="choosen">Selection.</param>
Friend Sub Fare(xlApp As Application, choosen As Double )
    If choosen = 1 Then
        DctVal(xlApp, "BA243" , choosen)
    End If
    DctVal(xlApp, "BA157" , 2 ) ' D16
    DctVal(xlApp, "BA158" , 3 ) ' D13
    DctVal(xlApp, "BA159" , 3 ) ' D10
End Sub

套餐

• Microsoft.Office.Interop.Excel » 15.0.4795.1001