Foxtable(狐表)用户栏目专家坐堂 → [求助]我什么时候使用了DropDOW?


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

主题:[求助]我什么时候使用了DropDOW?

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


加好友 发短信
等级:六尾狐 帖子:1476 积分:10491 威望:0 精华:0 注册:2018/10/16 11:42:00
[求助]我什么时候使用了DropDOW?  发帖心情 Post By:2019/12/19 21:22:00 [只看该作者]

[求助]我什么时候使用了DropDOW? 错误出现在代码    类型1.value=da("账户类型")  上面
无法将类型为“Foxtable.WinForm.ComboBox”的对象强制转换为类型“Foxtable.WinForm.DropDownBox”。


Dim 充值店铺 As WinForm.ComboBox = e.Form.Controls("充值店铺")
Dim 充值类型 As WinForm.ComboBox = e.Form.Controls("充值类型")
Dim 充值余额 As WinForm.Label = e.Form.Controls("充值余额")
Dim 冻结1 As WinForm.NumericComboBox = e.Form.Controls("冻结1")
Dim 可用1 As WinForm.NumericComboBox = e.Form.Controls("可用1")
Dim 类型1 As WinForm.ComboBox = e.Form.Controls("类型1")
Dim 扣除店铺 As WinForm.ComboBox = e.Form.Controls("扣除店铺")
Dim 扣除余额 As WinForm.Label = e.Form.Controls("扣除余额")
Dim 类型2 As WinForm.ComboBox = e.Form.Controls("类型2")
Dim 可用2 As WinForm.NumericComboBox = e.Form.Controls("可用2")
Dim 冻结2 As WinForm.NumericComboBox = e.Form.Controls("冻结2")
Dim da As DataRow = DataTables("快递公司").Find("店铺名称 = '"& 充值店铺.value &"'")
If da IsNot Nothing Then
    类型1.value=da("账户类型")
    可用1.value=da("当前余额")
    冻结1.value=da("冻结额")
    充值余额.text=da("冻结额")+da("当前余额")

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


加好友 发短信
等级:六尾狐 帖子:1476 积分:10491 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/12/19 21:23:00 [只看该作者]

说明下,组件都是ComboBox 没错。

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


加好友 发短信
等级:六尾狐 帖子:1476 积分:10491 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/12/19 21:29:00 [只看该作者]

解决了,删掉重建一个。

 回到顶部