Foxtable(狐表)用户栏目专家坐堂 → 请教:全局变量在代码中的引用


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

主题:请教:全局变量在代码中的引用

美女呀,离线,留言给我吧!
yangming
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
请教:全局变量在代码中的引用  发帖心情 Post By:2009/4/18 16:33:00 [只看该作者]

我设了二个全局变量,在打印EXCEL的代码中是这样加入的:请看下面的代码:
Dim dt As Table = Tables(Vars("表名"))
Dim Book As New XLS.Book '定义一个Excel工作簿
Dim Sheet As XLS.Sheet = Book.Sheets(0) '引用工作簿的第一个工作表
Dim Style As Xls.Style = Book.NewStyle '新建一个样式
Style.BackColor = Color.Red '样式的背景颜色设为红色
For c As Integer = 0 To dt.Cols.Count -1 '添加列标题
    Sheet(0, c).Value = dt.Cols(c).Name
Next
For r As Integer = 0 To dt.Rows.Count - 1 '填入数据
    For c As Integer = 0 To dt.Cols.Count -1
        Sheet(r +1, c).Value = dt.rows(r)(c)
    Next
 Next
'打开工作簿
Book.Save(Vars("保存位置"))
Dim Proc As New Process
Proc.File = Vars("保存位置")
Proc.Start()

 第一行"表名"这个变量引用对了,但是倒数第四行和倒数第二行的"保存位置"确不对,不知如何才能正确引用?

[此贴子已经被作者于2009-4-18 16:34:25编辑过]

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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:858 积分:6071 威望:0 精华:19 注册:2008/9/1 9:13:00
  发帖心情 Post By:2009/4/18 16:59:00 [只看该作者]

没错啊。应该是这样引用。


 回到顶部
美女呀,离线,留言给我吧!
yangming
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/4/18 17:24:00 [只看该作者]

可是在点按钮后会报错啊
请看下图


图片点击可在新窗口打开查看此主题相关图片如下:未标题-1.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2009-4-18 17:30:04编辑过]

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


加好友 发短信 一级勋章
等级:六尾狐 帖子:1412 积分:8937 威望:0 精华:0 注册:2008/9/1 8:57:00
  发帖心情 Post By:2009/4/18 17:29:00 [只看该作者]

以下是引用yangming在2009-4-18 17:24:00的发言:

可是在点按钮后会报错啊

错误提示是什么?是否你的这两个全局变量有问题(不是合法的目录文件名)?
最好把你的这两个全局变量的值和错误提示贴出来,大家一块分析原因.

[此贴子已经被作者于2009-4-18 17:29:53编辑过]

 回到顶部
美女呀,离线,留言给我吧!
yangming
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/4/18 17:31:00 [只看该作者]

请看三楼

图片点击可在新窗口打开查看此主题相关图片如下:未标题-1.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:未标题-2.jpg
图片点击可在新窗口打开查看

上面二图是设置及输入的
[此贴子已经被作者于2009-4-18 17:33:07编辑过]

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


加好友 发短信 一级勋章
等级:六尾狐 帖子:1412 积分:8937 威望:0 精华:0 注册:2008/9/1 8:57:00
  发帖心情 Post By:2009/4/18 17:34:00 [只看该作者]

以下是引用yangming在2009-4-18 17:24:00的发言:

可是在点按钮后会报错啊
请看下图


图片点击可在新窗口打开查看此主题相关图片如下:未标题-1.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2009-4-18 17:30:04编辑过]

保存位置有问题.中间的点好像是全角. 不知对不对?


 回到顶部
美女呀,离线,留言给我吧!
yangming
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/4/18 17:59:00 [只看该作者]

确实是因为那个小点是全角的原因,谢谢各位,呵呵
[此贴子已经被作者于2009-4-18 18:00:22编辑过]

 回到顶部