VBNET使用表单输入显示特定查询

时间:2014-05-01 09:30:06

标签: vb.net

基本上我要做的是有一个表格,我需要用特定的数字填写它。 发生这种情况时,我想将该输入注入我的查询命令。

然后它将显示查询结果(可能在表格中)。

我对vbnet(和一般编码)相当新。 我能够让我的代码与经典ASP一起工作,但我不知道vbnet的正确术语。

基于我之前发现的其中一个搜索,这是我到目前为止所做的。可能没有意义,但我正尽力做到最好。

Dim myConn As New SqlConnection(serverinfo)
Dim myTable As New DataTable()
Dim myCmd As New SqlCommand()
myCmd.Connection = myConn
myCmd.CommandText = "SELECT * FROM table WHERE x="+ x.Text+ " AND y="+ y.Text+ " AND z="+ z.Text+ " AND w="+ w.Text

Dim myAdapater As New SqlDataAdapter(myCmd)
myAdapter.Fill(myTable)

DataGridView2.DataSource = myTable
results.InnerHTML=displayoutput

-all变量应该是As整数。 -displayoutput应该是列标题部分。 我是否正确使用id属性从表单中抓取它们?

1 个答案:

答案 0 :(得分:0)

此代码将访问数据库并为您填充GridView

using conn as new sqlconnection("connstring"), comm as new sqlcommand("",conn)
    conn.open
    comm.commandtype = commandtype.text
    comm.commandtext = "SELECT * FROM table WHERE x=@x AND y=@y AND z=@x AND w=@w"

    comm.parameters.addwithvalue("@w",w.text)
    comm.parameters.addwithvalue("@x",x.text)
    comm.parameters.addwithvalue("@y",y.text)
    comm.parameters.addwithvalue("@z",z.text)

    Dim dt as new datatable
    dim sa as new sqldataadapter()
    sa.selectcommand = comm
    sa.fill(ds)

    DataGridView2.DataSource = ds
    DataGridView2.databind
end using

GridView上将AutoGenerateColumns媒体资源设为true,系统会显示您选择的列。

如果你正在使用Winforms,你可能不需要数据绑定位,我不记得了。