欢迎您:游客!请先
登录
或
注册
风格
恢复默认设置
|
展区
文件集浏览
图片集浏览
Flash浏览
音乐集浏览
电影集浏览
|
搜索
Foxtable(狐表)
→
用户栏目
→
专家坐堂
→ [求助]增加临时列ABCDE甚至到AA及ZZ
新的主题
投票帖
小字报
下一主题 >>
<< 上一主题
共有
5790
人关注过本帖
平板
打印
复制链接
主题:[求助]增加临时列ABCDE甚至到AA及ZZ
chnfo
小
大
1楼
|
信息
|
搜索
|
邮箱
|
主页
|
UC
加好友
发短信
等级:九尾狐
帖子:
2216
积分:18225
威望:0
精华:0
注册:
2011/11/26 20:21:00
Post By:2022/6/16 10:23:00 [
只看该作者
]
Dim dtb As New DataTableBuilder("CS")
For i As Integer = 1 To 100
Dim x As String = ""
Select i
Case 1
x = "A"
Case 2
x = "B"
Case 3
x = "C"
Case 4
‘如果要增加100列,不可能这么来啊’
End Select
dtb.AddDef(x, GetType(String), 64)
Next
dtb.Build()
MainTable = Tables("CS")
也就是10进制转26进制,把123456转为ABCDEF
下一主题 >>
<< 上一主题
总数 17
1
2
下一页
RSS2.0
|
Xhtml无图版
|
Xslt无图版
Copyright © 2000 - 2018
foxtable
.com
Tel: 4000-810-820 粤ICP备11091905号
Powered By
Dvbbs
Version 8.3.0
页面执行时间 0.02344 秒, 5 次数据查询