Foxtable(狐表)用户栏目专家坐堂 → 这样的定义 方式也行


  共有11955人关注过本帖树形打印复制链接

主题:这样的定义 方式也行

帅哥哟,离线,有人找我吗?
cxabc123
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
这样的定义 方式也行  发帖心情 Post By:2010/8/19 17:05:00 [显示全部帖子]

dim s =string

这种格式也可以


 回到顶部
帅哥哟,离线,有人找我吗?
cxabc123
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
  发帖心情 Post By:2010/8/19 17:15:00 [显示全部帖子]

Dim Builder As New ADOXBuilder
Builder.Open()
'打开ADOXBuilder

dim s =ADOXType.DateTime
With
Builder.Tables("表A")
    .AddColumn(
"日期" ,s) '增加日期型列
    .AddColumn(
"产品" ,ADOXType.String, 12) '增加字符型列,长度指定为12
    .AddColumn(
"客户" ,ADOXType.String, 20) '增加字符列,长度为20
    .AddColumn(
"数量" ,ADOXType.Integer) '增加整数型列
    .AddColumn(
"备注" ,ADOXType.Text) '增加备注列
End
With
Builder.Close()
'关

这段代码也可以执行


 回到顶部
帅哥哟,离线,有人找我吗?
cxabc123
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
  发帖心情 Post By:2010/8/19 17:25:00 [显示全部帖子]

这种格式看来不规范,但是只要能够自行,那么他的作用不可小看
[此贴子已经被作者于2010-8-19 17:25:07编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
cxabc123
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
  发帖心情 Post By:2010/8/19 22:17:00 [显示全部帖子]

其实要的就是这种效果,老大如果早告诉,有些代码就简单多了
[此贴子已经被作者于2010-8-19 22:18:29编辑过]

 回到顶部