以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教控件textbox的value属性的值是什么类型的？字符型？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=105228)
--  作者：bysy
--  发布时间：2017/8/14 21:21:00
--  请教控件textbox的value属性的值是什么类型的？字符型？
请教 控件textbox的value属性的值是什么类型的？字符型？还是可以任意指定，如定义为整型
Dim xh As Integer = forms("主界面").Controls("序号").value
然后，想问下，find中的表达式中，可以有变量吗？
Dim dr As DataRow
dr = DataTables("维修登记").Find("[序号] = xh")



全部代码如下： 
Dim xh As Integer = forms("主界面").Controls("序号").value
Dim dr As DataRow
dr = DataTables("维修登记").Find("[序号] = xh")
If dr IsNot Nothing Then
    Dim wz As Integer = Tables("维修登记").FindRow(dr)
    If wz >= 0 Then
        Tables("维修登记").Position = wz
    End If
End If
【序号】列定义为整型，想通过在textbox控件内输入数值，找到相应序号的行。现在输入数值后，总是报找不到xh列。
--  作者：有点蓝
--  发布时间：2017/8/14 21:39:00
--  
如果没有绑定，textbox的value就是字符类型的，如果绑定了就是绑定的列的类型。

dr = DataTables("维修登记").Find("[序号] = " & xh)


其实FindRow本身就可以使用表达式，没有必要查找2次：
Dim xh As string = forms("主界面").Controls("序号").value
Dim wz As Integer = Tables("维修登记").FindRow("[序号] = " & xh)
If wz >= 0 Then
    Tables("维修登记").Position = wz
End If

初学者建议多看看帮助
[此贴子已经被作者于2017/8/14 21:39:01编辑过]
--  作者：bysy
--  发布时间：2017/8/14 21:40:00
--  
好的，多谢