以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助有点甜老师这个运算怎么才能得到啊  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=130370)

--  作者:tygzjsl
--  发布时间:2019/1/20 12:04:00
--  [求助有点甜老师这个运算怎么才能得到啊

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20190120115430.jpg
图片点击可在新窗口打开查看


老师,我在第一个文本框输入的数值如果大于或等于第于450就用输入的数值减去450,显示在第二个textbox里,如果输入的数值小于450的话就减350,也显示在第 二 个textbox里,应该代码是怎么的
Dim v1 = e.form.controls("TextBox1").text
Dim fdr As DataRow = DataTables("表").find("分数 = \'" & v1 & "\'")
写不下去了,还是麻烦你谢谢!


--  作者:tygzjsl
--  发布时间:2019/1/20 12:17:00
--  
列名就是分数,分数不是在绑定表里,是另一个表中。谢谢
--  作者:有点甜
--  发布时间:2019/1/21 0:06:00
--  
 
Dim v1 = e.form.controls("TextBox1")
Dim fdr As DataRow = DataTables("表").find("分数 <= " & v1.text & "", "分数 desc")
If fdr IsNot Nothing Then
    v1.text = fdr("分数")
Else
    v1.text = "没找到"
End If
 

--  作者:tygzjsl
--  发布时间:2019/1/21 22:03:00
--  
非常感谢老师!
--  作者:tygzjsl
--  发布时间:2019/1/21 22:03:00
--  
非常感谢老师!