调用的写到你按钮里去
Dim jh As String = e.Form.Controls("TextBox1").Text
Dim sl As String = e.Form.Controls("TextBox2").Text