Foxtable(狐表) → 用户栏目 → 专家坐堂 → CheckedListBox1取值问题


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

主题：CheckedListBox1取值问题
帅哥哟，离线，有人找我吗？
zhoushijun
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：146 积分：1259 威望：0 精华：0 注册：2013/1/24 16:21:00 		CheckedListBox1取值问题  发帖心情 Post By：2013/4/7 14:46:00 [只看该作者]

我在table控件的事件里 按照文档上的取值方法 取CheckedListBox1的
图片点击可在新窗口打开查看此主题相关图片如下：未命名.jpg
图片点击可在新窗口打开查看
值，报错
 回到顶部
帅哥哟，离线，有人找我吗？
狐狸爸爸
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：47497 积分：251397 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2013/4/7 14:47:00 [只看该作者]

Table的事件，没有e.form，只能： Forms("窗口名").Controls("控件名")

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


加好友 发短信
等级：幼狐 帖子：146 积分：1259 威望：0 精华：0 注册：2013/1/24 16:21:00 		  发帖心情 Post By：2013/4/7 15:32:00 [只看该作者]

Tables("buyerdz").Rows(Tables("buyerdz").Rowsel)(2)
我取table控件的某行某列的值 取出来的值不是我选中的某行某列的，你看下哪儿写错了
 回到顶部
帅哥哟，离线，有人找我吗？
zhoushijun
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：146 积分：1259 威望：0 精华：0 注册：2013/1/24 16:21:00 		  发帖心情 Post By：2013/4/7 16:00:00 [只看该作者]

我取选中复选框行的第二列的值，取出来也是对不上
下面我写的代码，你看下
Dim temp As String =""

For Each r As Row In Tables("买家结算对账_table2").GetCheckedRows

            If temp="" Then 
                temp="'" & Tables("买家结算对账_table2").Rows(Tables("买家结算对账_table2").RowSel)(1) & "'"
             Else
                temp=temp & ",'" & Tables("买家结算对账_table2").Rows(Tables("买家结算对账_table2").RowSel)(1) & "'"
             End If
 
Next
有个截图 你看下
图片点击可在新窗口打开查看此主题相关图片如下：12.jpg
图片点击可在新窗口打开查看

弹出窗口的值我 temp 变量的
[此贴子已经被作者于2013-4-7 16:00:32编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

很正确啊.你这个不就是第二列的值么.  第一列为"图录号"  第二列为"成交价"  30000没错啊.

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


加好友 发短信
等级：幼狐 帖子：146 积分：1259 威望：0 精华：0 注册：2013/1/24 16:21:00 		  发帖心情 Post By：2013/4/7 16:12:00 [只看该作者]

我把变量值用msgbox 弹出来，发现不对图片点击可在新窗口打开查看啊！你看这两个都是3000  。你看下表属性！肯
图片点击可在新窗口打开查看此主题相关图片如下：123.jpg
图片点击可在新窗口打开查看
定是哪儿设置有问题


哦 ，对了 。我是想把选中行的第二列取出来，这两个值应该是 90000和30000
[此贴子已经被作者于2013-4-7 16:14:41编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

Tables("买家结算对账_table2").Rows(Tables("买家结算对账_table2").RowSel)(1) 你这段代码都已经写死成指定单元格了.怎么会90000和30000呢.
如果想获得90000和30000应该是
Dim temp As String =""

For Each r As Row In Tables("买家结算对账_table2").GetCheckedRows

            If temp="" Then 
                temp="'" & r(成交价) & "'"
             Else
                temp=temp & ",'" & r(成交价) & "'"
             End If
 
Next
 回到顶部
帅哥哟，离线，有人找我吗？
zhoushijun
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：146 积分：1259 威望：0 精华：0 注册：2013/1/24 16:21:00 		  发帖心情 Post By：2013/4/7 16:36:00 [只看该作者]

ok，谢了

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


加好友 发短信
等级：幼狐 帖子：146 积分：1259 威望：0 精华：0 注册：2013/1/24 16:21:00 		  发帖心情 Post By：2013/4/8 17:29:00 [只看该作者]

我把表绑定到table控件，同事也绑定到了textbox控件.我在table控件的currentchanged事件写代码了。然后就是选中table行后 textbox控件就没有变化了。求助

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


加好友 发短信
等级：幼狐 帖子：146 积分：1259 威望：0 精华：0 注册：2013/1/24 16:21:00 		  发帖心情 Post By：2013/4/9 11:27:00 [只看该作者]

我用一个表绑定到了table控件，同时也绑定到了textbox控件。我现在在table的currentchanged事件里写代码了！现在的问题是我选中表的行，数据没有同步到textbox控件里显示。求助

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