您的位置：程序门 -> vb -> 控件

求有关学生和老师的控件和源代码

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

求有关学生和老师的控件和源代码[无满意答案结贴,结贴人:kevin_tan]

发表于：2007-09-12 21:02:12 楼主

在窗体上有一个文本框text1,一个cmdsearch命令按钮,当文本框内容等于某个老师或学生的值时,在控件中显示该字段的学生和老师;同时当点击控件中的某位学生或老师的值时,将该值传给text1,

表table
老师（teacher) 学生（student)

张三周文
张三龙汉
张三吴九
李四王力
李四张三
王五张三
赵六李四
钱七李四
周文孙八
周文陈明
刘圭郑三
吴朋周文
李再薰洪七
檀作文孙八

比如,张三的学生有周文,龙汉,吴九...周文的学生是孙八,陈明,老师是吴朋,张三....
张三的老师是李四,王五,
李四的老师是赵六,钱七...
希望能用结构图的形式显示出来

发表于：2007-09-12 21:53:161楼得分:0

哪里不会？

发表于：2007-09-13 07:33:102楼得分:0

不知道用什么控件,不知道用sql语句如何取值...总之不知道怎么做,请各位兄长帮帮忙,谢谢了!

发表于：2007-09-13 09:47:283楼得分:0

在工程中引用 microsoft activex data objects 2.5 library，使用其 connection 和 recordset，看 msdn。
如果基本的 sql 都不会，那就没法了。

发表于：2007-09-14 21:13:144楼得分:0

是太简单还是太难?没人能帮我吗?要求是在access的窗体中写.类似于族谱图结构,本人菜鸟一个,实在写不出,郁闷!

发表于：2007-09-14 22:41:585楼得分:0

找本书看看就知道了，很多书用这个做例子

发表于：2007-09-15 10:16:006楼得分:0

意思是整个代码都要人帮写?

自己什么也不做?

那你这100分恐怕不容易送出去了....

发表于：2007-09-20 09:23:127楼得分:0

我是个新手.我写了一段代码,不知道对你有没有用
private sub cmdsearch（)
dim cnn as adodb.connection
dim rs as adodb.recordset

set cnn = new adodb.connection
set rs = new adodb.recordset
cnn.connectionstring = "persist security info=false;user id=登录数据用户名;data source=服务器; initial catalog=数据库 "
rs.open "select * from table where teacher= ' " & trim（text1.text) & " ' or student = ' " & trim（text1.text) & " ' ", cnn, 1, 1
if not rs.eof then
text1.text = rs!teacher & rs!student
else
msgbox "无此记录! ", vbcritical
end if
cnn.close
end sub

其他资讯