Databases
StackOverflow2013
Postsdbo
PO
Body
 

Note that there are some explanatory texts on larger screens.

plurals
  1. PO
    text
    copied!<pre><code> ' 'begin sample data Dim dt As New DataTable dt.Columns.Add("Last") dt.Columns.Add("First") dt.Columns.Add("Middle") dt.Columns.Add("Gender") dt.Columns.Add("Birth Date") ' Dim dr1 As DataRow = dt.NewRow dr1("Last") = "apple" dr1("First") = "is" dr1("Middle") = "red" dr1("Gender") = "male" dr1("Birth Date") = "2009" ' Dim dr2 As DataRow = dt.NewRow dr2("Last") = "banana" dr2("First") = "is" dr2("Middle") = "yellow" dr2("Gender") = "female" dr2("Birth Date") = "2010" ' Dim dr3 As DataRow = dt.NewRow dr3("Last") = "cherry" dr3("First") = "is" dr3("Middle") = "pink" dr3("Gender") = "both" dr3("Birth Date") = "2011" 'end sample data ' ' Dim sb As New StringBuilder sb.Append("&lt;table border='1'&gt;") sb.Append("&lt;tr&gt;") sb.Append(String.Format("&lt;td&gt;&lt;b&gt;Last&lt;/b&gt;&lt;/td&gt;&lt;td&gt;{0}&lt;/td&gt;&lt;td&gt;{1}&lt;/td&gt;&lt;td&gt;{2}&lt;/td&gt;", dr1("Last"), dr2("Last"), dr3("Last"))) sb.Append("&lt;/tr&gt;") sb.Append("&lt;tr&gt;") sb.Append(String.Format("&lt;td&gt;&lt;b&gt;First&lt;/b&gt;&lt;/td&gt;&lt;td&gt;{0}&lt;/td&gt;&lt;td&gt;{1}&lt;/td&gt;&lt;td&gt;{2}&lt;/td&gt;", dr1("First"), dr2("First"), dr3("First"))) sb.Append("&lt;/tr&gt;") sb.Append("&lt;tr&gt;") sb.Append(String.Format("&lt;td&gt;&lt;b&gt;Middle&lt;/b&gt;&lt;/td&gt;&lt;td&gt;{0}&lt;/td&gt;&lt;td&gt;{1}&lt;/td&gt;&lt;td&gt;{2}&lt;/td&gt;", dr1("Middle"), dr2("Middle"), dr3("Middle"))) sb.Append("&lt;/tr&gt;") sb.Append("&lt;tr&gt;") sb.Append(String.Format("&lt;td&gt;&lt;b&gt;Gender&lt;/b&gt;&lt;/td&gt;&lt;td&gt;{0}&lt;/td&gt;&lt;td&gt;{1}&lt;/td&gt;&lt;td&gt;{2}&lt;/td&gt;", dr1("Gender"), dr2("Gender"), dr3("Gender"))) sb.Append("&lt;/tr&gt;") sb.Append("&lt;tr&gt;") sb.Append(String.Format("&lt;td&gt;&lt;b&gt;Birth Date&lt;/b&gt;&lt;/td&gt;&lt;td&gt;{0}&lt;/td&gt;&lt;td&gt;{1}&lt;/td&gt;&lt;td&gt;{2}&lt;/td&gt;", dr1("Birth Date"), dr2("Birth Date"), dr3("Birth Date"))) sb.Append("&lt;/tr&gt;") sb.Append("&lt;table&gt;") ' Response.Write(sb.ToString) </code></pre>
 

Querying!

 
Guidance
An individual column

Larger individual text columns get their own page to allow for proper reading.

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload