主题：自定义样式问题

我在全局表DrawCell中代码为：

For Each dt As DataTable In DataTables

    For Each dc As In dt.DataCols

        Select Case dc.Name

            Case "中华","金白沙","黄鹤楼"

                e.Style = DataTables("香烟品牌").Styles("名称样式")

        End Select

    Next

Next

请问什么地方出现了错误啊？怎么改呢？