Foxtable(狐表)用户栏目专家坐堂 → [求助]初始值如何让字符串合并


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

主题:[求助]初始值如何让字符串合并

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


加好友 发短信
等级:童狐 帖子:238 积分:1838 威望:0 精华:0 注册:2014/7/1 8:56:00
[求助]初始值如何让字符串合并  发帖心情 Post By:2016/2/15 15:43:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20160215151536.png
图片点击可在新窗口打开查看

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.table



窗口1中的控件
要求:1、TextBox1文本框的初始值为"DateTimePicker1"(注:XXXX年XX月XX日XX点XX分)左右,当事人“单位”的驾驶员“驾驶员姓名”驾驶“车牌号码”(“车牌颜色”)“车辆类型”运送乘客,途径“ComboBox”时,因“ComboBox2”、班次行驶的被我运政执法人员查获。
2、当ComboBox2中的内容发生变化时TextBox1也随之发生改变。

请大侠帮忙,这个代码如何写,写在哪里?
谢谢

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


加好友 发短信
等级:童狐 帖子:238 积分:1838 威望:0 精华:0 注册:2014/7/1 8:56:00
  发帖心情 Post By:2016/2/15 15:59:00 [只看该作者]

没人解决我只能自己顶起来

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/15 16:01:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.table


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


加好友 发短信
等级:童狐 帖子:238 积分:1838 威望:0 精华:0 注册:2014/7/1 8:56:00
  发帖心情 Post By:2016/2/15 16:28:00 [只看该作者]

(注:XXXX年XX月XX日XX点XX分)这个我只不过说明了一下,意思是要把DateTimePicker1里的时间格式改成这样的格式
而且并控件并不要做绑定
[此贴子已经被作者于2016/2/15 16:34:00编辑过]

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/15 16:32:00 [只看该作者]


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


加好友 发短信
等级:童狐 帖子:238 积分:1838 威望:0 精华:0 注册:2014/7/1 8:56:00
  发帖心情 Post By:2016/2/15 16:42:00 [只看该作者]

Dim cr As Row = Tables("表A").current
cr("TextBox1") = format(e.Form.controls("DateTimePicker1").text,"yyyy年MM月dd日HH时mm分") & "左右,当事人" & cr("单位") & "的驾驶员......" & cr("车辆类型") & e.Form.controls("ComboBox1").text & e.Form.controls("ComboBox2").text

每个控件不做绑定
这个错在哪里了
[此贴子已经被作者于2016/2/15 16:43:31编辑过]

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/15 16:45:00 [只看该作者]

试试

 

format(e.Form.controls("DateTimePicker1").value,"yyyy年MM月dd日HH时mm分")


 回到顶部
帅哥哟,离线,有人找我吗?
荟美绘姿
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:238 积分:1838 威望:0 精华:0 注册:2014/7/1 8:56:00
  发帖心情 Post By:2016/2/15 16:56:00 [只看该作者]

出现运行错误
未找到类型“ComboBox”的公共成员“tex”

我弄错了,不好意思
[此贴子已经被作者于2016/2/15 16:59:57编辑过]

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/15 16:57:00 [只看该作者]

text没有写完整吧?贴出完整代码。

 回到顶部
帅哥哟,离线,有人找我吗?
荟美绘姿
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:238 积分:1838 威望:0 精华:0 注册:2014/7/1 8:56:00
  发帖心情 Post By:2016/2/15 17:04:00 [只看该作者]

Dim cr As Row = Tables("表A").current
cr("违法内容")


如何将这段代码改成窗口控件TextBox1

 回到顶部
总数 17 1 2 下一页