以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  无法将类型为“System.String”的对象强制转换为类型“Foxtable.WinForm.TextBox”。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=105105)

--  作者:huhu
--  发布时间:2017/8/11 14:27:00
--  无法将类型为“System.String”的对象强制转换为类型“Foxtable.WinForm.TextBox”。
错误所在事件:窗口,BUG录入系统,怀疑模块,SelectedIndexChanged
详细错误信息:
无法将类型为“System.String”的对象强制转换为类型“Foxtable.WinForm.TextBox”。


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

SelectedIndexChanged

Dim mkwhr As WinForm.TextBox = e.Form.Controls("TextBox3")
Dim hymk As WinForm.ComboBox = e.Form.Controls("怀疑模块")
Dim yffjh As WinForm.TextBox = e.Form.Controls("研发分机号")

Dim r As Row = Tables("BUG录入表").current
Dim dr As DataRow = DataTables("模块名称库").SQLFind("模块名称 = \'" & hymk.text & "\'")
If dr IsNot Nothing Then
    r("模块维护人") = dr("模块维护人")
    r("模块维护人邮箱") = dr("模块维护人邮箱")
    r.save
    Dim drr As DataRow = DataTables("技术支持信息表").SQLFind("name = \'" & r("模块维护人邮箱") & "\'")
    If drr IsNot Nothing Then
        yffjh = drr("手机号码")
    End If
End If

--  作者:baicaocao
--  发布时间:2017/8/11 14:31:00
--  
 yffjh.value = drr("手机号码")