怎么搜索
这是界面和关系图[img=http://sz.photo.store.qq.com/http_imgload.cgi?/rurl2=bbad40e634950ca537d1ec0259488cfda81f50d8c35fd208c639279a59e6e6df4eb2ad63b81cca3af76ec40fc517235de6657f112d8fdd86ab09a8708b657dd1ee2756773c11c8e7aabe1168a836aa728d12f7a7][/img]
现在的话就是那个搜索还无法实现 不知道改怎么写
章节 调用章节表的章节名 ;题型调用题型表的题型名
然后把 一个或两个 ComboBox 的值 在试题表里的章节和题型 查询
有没有人会的啊 --------------------编程问答-------------------- 图看不到 --------------------编程问答-------------------- 把图放这吧
http://superweb.free.wwwx.net.cn/img/ --------------------编程问答-------------------- 图看的到的,
从图上可以看到,你是二个ComboBox 来确定查询关键字,点击搜索按钮来进行查询,结果到DataGridView或是一个什么别的显示对象,这个要有如下条件
1。有一个数据库,一个相关的表,这个表里有id,题号,题型,章节,难度,分值,
2。你要写一个SQL语句,
select * from db(这是你的表名) where 章节= ComboBox1.txt 题型=ComboBox2.txt
这样出来的记录集输出到这个控件对象上就行了 --------------------编程问答-------------------- 说明:图是看不到的,得用点技巧才能看到, --------------------编程问答-------------------- Dim wConStr As String = "User ID=sa;pwd=a;Initial Catalog=gglian2;Data Source=192.168.1.18" '定义一个变量,连接字符串
Dim wsqlstr As String = "" '定义一个变量,SQL语句
Dim wmycon As New SqlConnection(wConStr) '定义一个变量,为一个连接对象,并给定连接字符串。
Dim wmycom As New SqlCommand(wsqlstr, wmycon) '定义一个变量,为命令对象
dim sqlada as new sqladapter
dim dt as datatable
wmycon.ConnectionString = wConStr
wmycom.CommandText = "select * from TABLE where 条件
If wmycon.State = 1 Then wmycon.Close()
'mycom.Connection.ConnectionString = constr '为这个连接字符串重新赋值
wmycon.Open() '重新打开这个联接
wmycom.ExecuteNonQuery() '用不返回结果的查询语句来插入一条记录
sqlada.fill(dt)
GRIDVIEW.datasource =dt
wmycon.Close() --------------------编程问答--------------------
Dim wConStr As String = "User ID=sa;pwd=a;Initial Catalog=gglian2;Data Source=192.168.1.18" '定义一个变量,连接字符串
Dim wsqlstr As String = "" '定义一个变量,SQL语句
Dim wmycon As New SqlConnection(wConStr) '定义一个变量,为一个连接对象,并给定连接字符串。
Dim wmycom As New SqlCommand(wsqlstr, wmycon) '定义一个变量,为命令对象
dim sqlada as new sqladapter
dim dt as datatable
wmycon.ConnectionString = wConStr
wmycom.CommandText = "select * from TABLE where 条件
If wmycon.State = 1 Then wmycon.Close()
'mycom.Connection.ConnectionString = constr '为这个连接字符串重新赋值
wmycon.Open() '重新打开这个联接
wmycom.ExecuteNonQuery() '用不返回结果的查询语句来插入一条记录
sqlada.fill(dt)
GRIDVIEW.datasource =dt
wmycon.Close()
补充:.NET技术 , VB.NET