主题：split用法

老师您好！

我有一个计算，表中字段名为”变压器型号”数据格式为：SZ11-63000-110，sz11为变压器类型，6300为变压器容量，110为变压器电压等级。

我想取用变压器型号：SZ11-63000-110中的“sz11”,做为变压器类型，分别计算其数据。我想用split函数，在字段中不会用，请指教！

我的计算代码：

For Each r As Row In Tables("按变压器类型利润计算表").rows
   
    Dim xm As String = r("项目名称")
   
    For Each nm As String In DataTables("ddpsb").GetValues("变压器类型")

 

 If xm="三.总原料重量"
            r("合计")=tylgh
           
            fylgh=DataTables("ylckb").Compute("Sum(出库_重量)", "[ckdate]>=#" & dt1 & "# and [ckdate]<= #" & dt2 & "#  and split([变压器型号])(0)='" & nm & "' And 变压器型号 Is not null")
            r(nm)=fylgh
        End If
next

next

split是代码语法，不能用到表达式里
fylgh=DataTables("ylckb").Compute("Sum(出库_重量)", "[ckdate]>=#" & dt1 & "# and [ckdate]<= #" & dt2 & "#  and [变压器型号] like '" & nm & "-%' And 变压器型号 Is not null")