全部削除してやった、無駄なコードは嫌い、、

〜
    'Public Function beanToString() As String

    '    beanToString = " 在庫数 : [" & 在庫数 & "]," & Environment.NewLine
    '    beanToString &= " 単位ID : [" & 単位ID & "]," & Environment.NewLine
    '    beanToString &= " 単位コード : [" & 単位コード & "]," & Environment.NewLine
    '    beanToString &= " 賞味期限 : [" & 賞味期限 & "]," & Environment.NewLine
    '    beanToString &= " 棚番 : [" & 棚番 & "]," & Environment.NewLine
    '    beanToString &= " 商品ID : [" & 商品ID & "]," & Environment.NewLine
    '    beanToString &= " 商品コード : [" & 商品コード & "]," & Environment.NewLine
    '    beanToString &= " 商品名 : [" & 商品名 & "]," & Environment.NewLine
    '    beanToString &= " 商品区分ID : [" & 商品区分ID & "]," & Environment.NewLine
    '    beanToString &= " 規格名 : [" & 規格名 & "]," & Environment.NewLine
    '    beanToString &= " 入荷日 : [" & 入荷日 & "]," & Environment.NewLine
    '    beanToString &= " 条件_商品かな : [" & 条件_商品かな & "]" & Environment.NewLine

    'End Function
〜