以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]窗口中怎样获取文本框里的内容  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=67324)
--  作者：老奤
--  发布时间：2015/4/22 11:28:00
--  [求助]窗口中怎样获取文本框里的内容
With Tables("十二组")
    Dim c As Integer = .Cols("系统编号").Index
    .Select(0,c,.rows.count - 1,c)
End With
Dim Val As String = RibbonTabs("工作中心").Groups("办理手续专区").Items("查找").Items("输入").Text
Dim Index As Integer
With CurrentTable
    Index = .FindRow(.Cols(.ColSel).Name & " = \'" & Val & "\'", .Position + 1,True) 
    If Index >= 0 Then
       .Position = Index
Else
 messagebox.show("逗我呢?根本没有这户呀!请认真点好吗?")
     End If
End With

这段代码在窗口正常，获取的文本关键词是从菜单的文本框获取的，我现在想从窗口的文本框获取，就是粗体的那段文字应该怎么写？
--  作者：Bin
--  发布时间：2015/4/22 11:29:00
--  
当前窗口?

e.form.controls("Textbox1").text
--  作者：老奤
--  发布时间：2015/4/22 11:30:00
--  
谢谢，试试去楼
--  作者：老奤
--  发布时间：2015/4/22 12:13:00
--  
谢谢解决了