Foxtable(狐表)用户栏目专家坐堂 → 窗体计算结果向表单元格填充问题


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

主题:窗体计算结果向表单元格填充问题

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


加好友 发短信
等级:三尾狐 帖子:787 积分:6175 威望:0 精华:0 注册:2015/7/25 19:14:00
窗体计算结果向表单元格填充问题  发帖心情 Post By:2018/11/20 12:27:00 [显示全部帖子]

Dim t As WinForm.TextBox = e.Form.Controls("TextBox2")
 Tables("教学设计评价量表").Current("综合加权得分") =e.Sender.WriteValue("t")

结果是
对类型“Button”的调用“Public Sub WriteValue()”返回 Nothing。

老师帮我


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


加好友 发短信
等级:三尾狐 帖子:787 积分:6175 威望:0 精华:0 注册:2015/7/25 19:14:00
  发帖心情 Post By:2018/11/20 23:53:00 [显示全部帖子]

老师,求解这个问题

 

Dim bl As WinForm.Label = e.Form.Controls("Label32")
Dim n1 As WinForm.TextBox = e.Form.Controls("TextBox2")
Dim n2 As WinForm.TextBox = e.Form.Controls("TextBox3")
Dim n3 As WinForm.TextBox = e.Form.Controls("TextBox4")
bl.text = "您给" & forms("教学设计评价").Controls("ComboBox6").value  & "老师评议得分为" & vbcrlf  & (n1 + n2 + n3) & "分"


 回到顶部