问题描述
这是asp.net下数据库填充列表的例子for(inti=0;i<Ds.Tables["adminlist"].Rows.Count;i++){TableRowtr=newTableRow();TableCelltd1=newTableCell();TableCelltd2=newTableCell();TableCelltd3=newTableCell();TableCelltd4=newTableCell();TableCelltd5=newTableCell();td1.Controls.Add(newLiteralControl(Convert.ToString(i+1)));td2.Controls.Add(newLiteralControl("<inputID='chuser'type='checkbox'/>"));td3.Controls.Add(newLiteralControl(Ds.Tables["adminlist"].Rows[i]["adminname"].ToString()));td4.Controls.Add(newLiteralControl(Ds.Tables["adminlist"].Rows[i]["adminpassword"].ToString()));td5.Controls.Add(newLiteralControl("<ahref='modifyadmin.aspx?ID="+Ds.Tables["adminlist"].Rows[i]["adminid"].ToString()+"'>修改</a>"));tr.Controls.Add(td1);tr.Controls.Add(td2);tr.Controls.Add(td3);tr.Controls.Add(td4);tr.Controls.Add(td5);adminlist1.Controls.Add(tr);}那么在VB.NET应用窗体开发时，要怎么才可以向上面一样让数据库填充类表？不用datagridview直接连接数据源，而是自己用代码添加？求高人指导
解决方案
解决方案二：
dimstrSql1asstring="select*from表a"DimMyCommAsSqlDataAdapter=NewSqlDataAdapter(strSql1,MyCon)DimMyDatasetAsDataSet=NewDataSetMyComm.Fill(MyDataset)Me.GridView1.DataSource=MyDataset.Tables(0).DefaultViewMe.GridView1.DataBind()
不知道你说的是不是这个
解决方案三：
那么如何用代码编辑datagridview的标头呢？
解决方案四：
DataGridView1表头设置：'设置列格式PrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.LoadDataGridView1.ColumnCount=16DataGridView1.TopLeftHeaderCell.Value="回弹值"DataGridView1.TopLeftHeaderCell.Style.Alignment=DataGridViewContentAlignment.MiddleRight'右侧对齐'设置列标题DimiAsIntegerFori=0To15DataGridView1.Columns(i).Width=48DataGridView1.Columns(i).Name="测点"&(i+1).ToStringDataGridView1.Columns(i).SortMode=DataGridViewColumnSortMode.NotSortable'列排序方式（不排序）DataGridView1.Columns(i).DefaultCellStyle.Format="D"'单元格式“整型数字”IfiMod2=0ThenDataGridView1.Columns(i).DefaultCellStyle.BackColor=Color.BisqueDataGridView1.Columns(i).DefaultCellStyle.SelectionBackColor=Color.SeaGreen'ThistleEndIfNextEndSub'设置行标题PrivateSubDataGridView1_RowPostPaint(ByValsenderAsObject,ByValeAsDataGridViewRowPostPaintEventArgs)_HandlesDataGridView1.RowPostPaintUsingbAsSolidBrush=NewSolidBrush(DataGridView1.RowHeadersDefaultCellStyle.ForeColor)e.Graphics.DrawString("测区"&(e.RowIndex+1).ToString(System.Globalization.CultureInfo.CurrentUICulture),_DataGridView1.DefaultCellStyle.Font,b,_e.RowBounds.Location.X+20,e.RowBounds.Location.Y+4)EndUsingEndSub
解决方案五：
引用2楼yyk1989的回复:
那么如何用代码编辑datagridview的标头呢？
表头名称可以在select语句中指定，比如：select字段1as显示名1,字段2as显示名2……