主题：代码在保存时提示表达式不是方法是什么原因？(已解决)

Dim txt As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim str As String = txt.text
Dim A As New SQLCommand 
Dim rundm As String
A.CommandText = "selec t runcode fro m sy_from where menuname ='" & str & "'"
rundm = A.ExecuteScalar()

'运行对应的代码内容
If rundm Is Nothing Then 
     Return
End If