在录入窗口中有两个TextBox控件,使用目录树输入时
代码如下:
Dim Tr As WinForm.TreeView = e.Form.Controls("Tvw1")
If e.Node.Level = 0 Or e.Node.Level =1 Or e.Node.Level =2 Then
Return
End If
Dim Val() As String = e.Node.FullPath.Split("\")
If Forms("发货编辑").Opened Then
Dim Txb1 As WinForm.TextBox = Forms("发货编辑").Controls("TxtbClient")
Txb1.Value = Val(3)
Txb1.WriteValue()
Dim Txb2 As WinForm.TextBox = Forms("发货编辑").Controls("TxtbSale")
Txb2.Value = Val(1)
Txb2.WriteValue()
Else
Return
End If
e.Form.Close()为什么在使用当中只有Txb2.Value赋值成功,而Txb1 赋值不成功,TextboxClient中是空白的,
使用其它的录入方法也是如此,对两个TextBox的Value属性赋值后,有一个会变成空白的!
[此贴子已经被作者于2009-6-26 23:29:16编辑过]