Vb.net Excel宏输出

以下代码在Excel宏输出中生成从零开始的数字序列列表。我的问题是：如何告诉代码不显示任何低于零的项

SolidRight (PageSheet.Cells(3, 1))
For t = 1 To Columns_per_page
    PageSheet.Cells(3, (t * 2)).Value = ((NewPageNum - 1) * Columns_per_page) + t - 9
    If t Mod 2 = 0 Then
        SolidRight (PageSheet.Cells(3, (t * 2) + 4)) ' 1)) DM
    Else
        DotRight (PageSheet.Cells(3, (t * 2) + 4))  '  1)) DM
    End If
Next t

---

你也必须展示你的功能。