Foxtable(狐表)用户栏目专家坐堂 → [求助] 提示框读取数据表中的值


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

主题:[求助] 提示框读取数据表中的值

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


加好友 发短信
等级:幼狐 帖子:183 积分:1602 威望:0 精华:0 注册:2013/11/14 10:30:00
[求助] 提示框读取数据表中的值  发帖心情 Post By:2014/1/2 16:31:00 [只看该作者]

想实现如: "某单位"退回"某制品名称""多少""单位". 
其中,"单位"读取数据表中的值,请问前面的 定义 和 表达式 如何写?
Select Case e.sender.name
        Case "确认"
        Dim lqdw As WinForm.ComboBox = e.Form.controls("领取单位")
        Dim zpmc As winform.combobox = e.Form.controls("制品名称")
        Dim thxl As WinForm.NumericComboBox = e.Form.controls("退回数量")
        Dim dw As String  = CurrentTable.Current("单位")
        Dim result As dialogresult
        result = messagebox.show(" " & lqdw.text & " 退回 " & zpmc.text & " " & thxl.Value & ""dw",请确认","提示",messageboxbuttons.OKcancel,MessageBoxIcon.Question)
        If result = DialogResult.OK Then
            CurrentTable.Current.save()
        Else If result = DialogResult.Cancel
            Return
        End If


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


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

result = messagebox.show(" " & lqdw.text & " 退回 " & zpmc.text & " " & thxl.Value & dw,请确认","提示",messageboxbuttons.OKcancel,MessageBoxIcon.Question)

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


加好友 发短信
等级:幼狐 帖子:183 积分:1602 威望:0 精华:0 注册:2013/11/14 10:30:00
  发帖心情 Post By:2014/1/2 16:40:00 [只看该作者]

编译错误:未声明名称 "请确认"

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


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

result = messagebox.show(" " & lqdw.text & " 退回 " & zpmc.text & " " & thxl.Value & dw,"请确认","提示",messageboxbuttons.OKcancel,MessageBoxIcon.Question)

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


加好友 发短信
等级:幼狐 帖子:183 积分:1602 威望:0 精华:0 注册:2013/11/14 10:30:00
  发帖心情 Post By:2014/1/2 17:31:00 [只看该作者]

运行出错: 

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


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


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

上例子

 回到顶部