Foxtable(狐表) → 用户栏目 → 专家坐堂 → 定义全局代码问题,请教老师


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

主题：定义全局代码问题,请教老师
帅哥哟，离线，有人找我吗？
mamuaiqing
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：824 积分：6294 威望：0 精华：0 注册：2012/3/1 3:17:00 		定义全局代码问题,请教老师  发帖心情 Post By：2013/6/5 17:37:00 [只看该作者]

想在窗口中做个按钮,将文本控件的值加入到全局代码中,代码要怎么写?

 

比如全局代码中已经写入 Public wo As String

 

窗口文本控件中的值为"未知|已知" ,点下按纽后 全局代码中  Public wo As String = "未知|已知"  并永久保存在 全局代码中  

 

这个代码要怎么写
 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2013/6/5 17:39:00 [只看该作者]

wo = e.Form.Controls("TextBox1").Text

 回到顶部
帅哥哟，离线，有人找我吗？
mamuaiqing
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：824 积分：6294 威望：0 精华：0 注册：2012/3/1 3:17:00 		  发帖心情 Post By：2013/6/5 17:47:00 [只看该作者]

感谢Bin老师,这个的话在项目重新打开后就无效了,学生要的是在全局代码中"Public wo As String = "未知|已知" 这样的

 回到顶部
帅哥哟，离线，有人找我吗？
mamuaiqing
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：824 积分：6294 威望：0 精华：0 注册：2012/3/1 3:17:00 		  发帖心情 Post By：2013/6/5 17:47:00 [只看该作者]

就是直接在全局代码中写入这个值

 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2013/6/5 17:50:00 [只看该作者]

你希望重新打开项目还有效 那么存在全局代码就没用...

利用SaveConfigValue  和GEtConfigValue 做吧
 回到顶部
帅哥哟，离线，有人找我吗？
don
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1812 积分：12999 威望：0 精华：14 注册：2008/10/11 18:07:00 		  发帖心情 Post By：2013/6/5 17:54:00 [只看该作者]

保存设置信息

一个完整的系统，通常会提供一些自定义的设置给用户，以便满足不同的用户需要。
Foxtable提供了一些函数，分别用于保存、读取和维护设置信息。

SaveConfigValue

保存设置信息

语法：

SaveConfigValue(Name, Value)

Name： 设置名称
Value： 设置值

设置信息经过加密储存，安全性比一般的方式更有保证。



GetConfigValue

读取设置信息。

语法：

GetConfigValue(Name, DefaultValue)

Name： 设置名称
DefaultValue：默认设置值，如果指定名称的设置不存在，则返回此值。
 回到顶部
帅哥哟，离线，有人找我吗？
mamuaiqing
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：824 积分：6294 威望：0 精华：0 注册：2012/3/1 3:17:00 		  发帖心情 Post By：2013/6/5 18:01:00 [只看该作者]

感谢 Bin 老师,原来还有这个功能

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03516 秒, 4 次数据查询