【问题标题】:How to check null value or row have all zero value or have multiple value如何检查空值或行具有全零值或具有多个值
【发布时间】:2021-09-11 06:01:48
【问题描述】:
Dim copiedContent As String = Request.Form(txtCopied.UniqueID)
            For Each row As String In copiedContent.Split(ControlChars.Lf)
                If Not String.IsNullOrEmpty(row) AndAlso String.IsNullOrEmpty(row) <> "0" Then
                    dtResult.Rows.Add()
                    Dim i As Integer = 0
                    For Each cell As String In row.Split(ControlChars.Tab)
                        dtResult.Rows(dtResult.Rows.Count - 1)(i) = cell
                        i += 1
                    Next
                End If
            Next

大家好,根据上面的代码,如果插入值全为零,我该如何拒绝? allzerovalue 以及如何允许插入零 anyvaluewithzero 的值。 请帮助...提前致谢!

【问题讨论】:

  • 您在此上下文中提到的“关键”是什么?你能扩展一下吗?当您使用调试器单步执行代码时,什么不符合预期?
  • 我提到的关键是在 textarea 中插入值..当我调试我的代码时,它将拒绝具有 0 的插入值..我计划拒绝具有 ALL 0 的插入值。 . 你可以看到我提供的图像..

标签: excel vb.net for-loop nested-loops


【解决方案1】:

我会这样写:

        Dim copiedContent As String = Request.Form(txtCopied.UniqueID)
        For Each row As String In copiedContent.Split(ControlChars.Lf)

            Dim bits = row.Split(ControlChars.Tab)

            If bits.All(Function(x) x = "0") Then Continue For

            dtResult.Rows.Add(bits)

        Next

【讨论】:

  • 谢谢 Jard,如果我只想添加检查所有数字怎么办?
  • 你的意思是只有在都是某种数字的情况下才添加?也许If bits.All(Function(x) Double.TryParse(x,0)) Then Continue For
  • 嗨,贾德,我使用了你的方法及其作品,谢谢!