共9 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：表格好难看呀，不知道怎么恢复原来的样子？
1楼
yacity 发表于：2011/10/18 9:31:00如图：双击 客户ID 列 会弹出 销售录入 窗口，
表格好难看呀，不知道我修改了哪里，现在不懂改回来了，怎么恢复原样呢？
此主题相关图片如下：173.jpg
还有 打开 销售录入 窗口的时候，默认新增一行，如果原来已经有数据，就不新增行 怎么设置呢？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:儋州琼富塑料管理系统1.0.table |
[此贴子已经被作者于2011-10-18 9:32:33编辑过]
2楼
狐狸爸爸 发表于：2011/10/18 10:00:00你在窗口设计器中，设置了这个table控件的网格线的颜色，而且设置成黑色了。
[此贴子已经被作者于2011-10-18 10:00:06编辑过]
3楼
yacity 发表于：2011/10/18 10:26:00颜色 好恢复。可是 边框很难看。不是原来全部包围起来的边框。
设置 网格线 为 both 如下
此主题相关图片如下：174.jpg
Horizontal 如下
此主题相关图片如下：175.jpg
Vertical 如下
此主题相关图片如下：176.jpg
4楼
yacity 发表于：2011/10/18 10:28:00怎么恢复 原来的形状？
比如像这样，有横线也有竖线
此主题相关图片如下：177.jpg
5楼
狐狸爸爸 发表于：2011/10/18 10:45:00除了Vertical 和Horizontal ，不还有Both吗？
6楼
yacity 发表于：2011/10/18 10:48:00both 也设置了
请看三楼效果
7楼
狐狸爸爸 发表于：2011/10/18 11:01:00| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:儋州琼富塑料管理系统1.0.rar |
8楼
yacity 发表于：2011/10/18 11:09:00谢谢 管理员
还有 打开 销售录入 窗口的时候，默认新增一行，如果原来已经有数据，就不新增行 怎么设置呢？
窗口的afterload有一段代码
Dim dt As DataTable = DataTables("chuhuo")
Dim flt As String
Tables("chuhuodan.chuhuo").AddNew(1)
9楼
狐狸爸爸 发表于：2011/10/18 11:13:00Dim dt As DataTable = DataTables("chuhuo")
Dim flt As String
With Tables("chuhuodan.chuhuo")
if .Rows.Count = 0 Then
.AddNew(1)
End if
End With
共9 条记录, 每页显示 10 条, 页签:
[1]