VB.NET斑马线

Question

我想 “画” 斑马线线在我的形式

不是表，只是线
黑
白色
黑
白色

ican进口背景图片，但我更喜欢鳕鱼E :)

Answer 1

TextBox1.Text = 80 
     If IsNumeric(TextBox1.Text) Then 
      Dim color As Integer = 1 
      Dim top As Integer = 10 
      Dim LineNum As Integer = Integer.Parse(TextBox1.Text) 
      For i = 0 To LineNum 
       Dim line As New Panel 
       line.Width = 300 
       line.Height = 40 

       If color = 1 Then 
        color = 0 
        line.BackColor = Drawing.Color.Black 
       Else 
        color = 1 
        line.BackColor = Drawing.Color.White 
       End If 
       top = top + 40 
       line.Top = top 
       Me.Controls.Add(line) 

      Next 

     End If 

;）

Answer 2

斑马的datagridview的VB.NET

DataGridView1.GridColor = Color.Blue 
DataGridView1.DefaultCellStyle.ForeColor = Color.Black 
DataGridView1.RowsDefaultCellStyle.BackColor = Color.Red 
DataGridView1.AlternatingRowsDefaultCellStyle.BackColor = Color.Yellow 
DataGridView1.GridColor = Color.Silver