Dim dsData As New DataSet()
If AccessXML(Application.StartupPath & "\xmluser.xml", dsData) Then
Dim ts1 As New DataGridTableStyle() ts1.MappingName = dsData.Tables(0).TableName '表名 Dim Col1 As New DataGridTextBoxColumn()
Dim Col2 As New DataGridTextBoxColumn() With Col1
.MappingName = "字段"
.HeaderText = "字段"
.ReadOnly = True
End With With Col2
.MappingName = "数据"
.HeaderText = "数据"
.Width = 500 End With
ts1.GridColumnStyles.Add(Col1)
ts1.GridColumnStyles.Add(Col2) ts1.AllowSorting = False
dgEdit.TableStyles.Add(ts1) '加入表格样式 dgEdit.DataSource() = dsData
dgEdit.DataMember() = dsData.Tables(0).TableName
If AccessXML(Application.StartupPath & "\xmluser.xml", dsData) Then
Dim ts1 As New DataGridTableStyle() ts1.MappingName = dsData.Tables(0).TableName '表名 Dim Col1 As New DataGridTextBoxColumn()
Dim Col2 As New DataGridTextBoxColumn() With Col1
.MappingName = "字段"
.HeaderText = "字段"
.ReadOnly = True
End With With Col2
.MappingName = "数据"
.HeaderText = "数据"
.Width = 500 End With
ts1.GridColumnStyles.Add(Col1)
ts1.GridColumnStyles.Add(Col2) ts1.AllowSorting = False
dgEdit.TableStyles.Add(ts1) '加入表格样式 dgEdit.DataSource() = dsData
dgEdit.DataMember() = dsData.Tables(0).TableName
解决方案 »
- 新手求指点
- 小小小菜鸟: Listbox多行取值分享. 新问题为: Listbox自动获得默认选中状态
- 求一个报表分页存储过程
- 很棘手的问题!!!高手帮忙啊
- 谁用过SolpartMenu控件啊!!!!!
- 有谁知道动网论坛的风格是怎么做的??
- 请问能否在datagrid控件中使用使用右键菜单,并能实现类似access表里选中要筛选的字然后右键使用按选定内容筛选!麻烦举例子,或有类似的文章推荐一下。谢谢!!!!
- 各位大虾救命,为何我做的.net系统在实施过程中出现不稳定现象,用户很有意见,我却找不出原因?
- 请问高手csdn论坛的这个实时短信是如何实现的?
- 请问我的计算机每次启动都会出现错误,什么什么服务没有启动?怎么回事?
- !!!请问高手.NET下分帧的问题!!!
- 请教一个在ASP。NET页面调用插入记录存储过程的语句。。。
2、Response.Rediect("Url?param1="+value1+"¶m2="+value2+"&...")