此代码段从 C＃中的“将数据表转换为JSON字符串”中，VB.NET可能会为您提供帮助。它使用System.Web.script.Serialization.JavascriptSerializer将内容序列化为JSON格式：
public string ConvertDataTabletoString(){ DataTable dt = new DataTable(); using (SqlConnection con = new SqlConnection("Data Source=SureshDasari;Initial Catalog=master;Integrated Security=true")) { using (SqlCommand cmd = new SqlCommand("select title=City,lat=latitude,lng=longitude,description from LocationDetails", con)) { con.Open(); SqlDataAdapter da = new SqlDataAdapter(cmd); da.Fill(dt); System.Web.script.Serialization.JavascriptSerializer serializer = new System.Web.script.Serialization.JavascriptSerializer(); List<Dictionary<string, object>> rows = new List<Dictionary<string, object>>(); Dictionary<string, object> row; foreach (DataRow dr in dt.Rows) { row = new Dictionary<string, object>(); foreach (DataColumn col in dt.Columns) { row.Add(col.ColumnName, dr[col]); } rows.Add(row); } return serializer.Serialize(rows); } }}
