以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  某个字符属于某个字符串数组 代码怎么写?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=161574)

--  作者:jswjyjf
--  发布时间:2021/3/23 8:20:00
--  某个字符属于某个字符串数组 代码怎么写?
某个字符属于某个字符串数组 代码怎么写?

For Each dr As DataRow In drs
    Dim gxmc() As String = dr("制程").Split(",")
    Dim jiage As Double=0
    For Each name As String In gxmc
      If name not In ("dip","SMT”,"手工")
      continue for
     End If
       Dim dr0 As DataRow=DataTables("成品料号").SQLFind("名称=\'" & dr("成品料号") & "\'")
        If dr0 IsNot Nothing Then \'如果找到的话
            jiage=dr0(name)+jiage
            dr("单价")=jiage
            dr("金额")=dr("单价")*dr("数量")
        End If
    Next
    \'
Next


--  作者:有点蓝
--  发布时间:2021/3/23 9:01:00
--  
参考:http://www.foxtable.com/webhelp/topics/0216.htm
--  作者:jswjyjf
--  发布时间:2021/3/23 10:05:00
--  
数组的长度是不是就是有几个数组
--  作者:有点蓝
--  发布时间:2021/3/23 10:09:00
--  
数组的长度表示数组里有几个项目