您的位置:程序门 -> vb -> 基础类



单击datagrid控件获取数据库纪录信息


[收藏此页] [打印本页]选择字色:背景色:字体:[][][]


单击datagrid控件获取数据库纪录信息
发表于:2007-05-30 09:10:51 楼主
如何通过单击datagrid控件中的一条纪录来获取当前对应数据库中信息,利于id,姓名,......,请个位大哥多多帮忙了!!!
发表于:2007-05-30 10:35:021楼 得分:0
单击一条纪录,获取的是相应的数据库纪录,如相应的id,姓名等等....,真的又那么难吗
发表于:2007-05-30 10:44:042楼 得分:0
代码如下:  
private   sub   datagrid1_click()  
dim   msg,   style,   title,   response,   mystring ',   ctxt,   help  
dim   xs_shuju(10)   as   variant  
for   i   =   0   to   3  
xs_shuju(i)   =   adodc1.recordset(i)  
next  
msg   =   "数据显示 "   '   定义信息。  
style   =   vbyes  
title   =   "说明 "   '   定义标题。  
msg   =   msg   &   vbnewline   &   _  
"num:   "   &   xs_shuju(0)   &   vbnewline   &   _  
"shuju1: "   &   xs_shuju(1)   &   vbnewline   &   _  
"shuju2: "   &   xs_shuju(2)   &   vbnewline   &   _  
"shuju3: "   &   xs_shuju(3)   &   vbnewline  
response   =   msgbox(msg,   style,   title)  
if   response   =   vbyes   then   '   用户按下“是”。  
mystring   =   "yes "   '   完成某操作。  
end   if  
end   sub  
发表于:2007-05-30 11:23:023楼 得分:0
如何我的数据库中有大量的数据,这种方法是不就大大影响程序执行效率呢,有没有好方法呢??
发表于:2007-05-30 12:10:224楼 得分:0
private   sub   datagrid1_click()  
frmxianshi.text1   =   datagrid1.columns(0)  
frmxianshi.text2   =   datagrid1.columns(1)  

frmxianshi.text9   =   datagrid1.columns(9)  
frmxianshi.show  
end   sub  
发表于:2007-05-30 16:04:185楼 得分:0
我的意思是单击任意一条纪录,然后返回相对应的数据库中的树脂,例如我单击的第二行,就可以获取datagrid控件第二行所对应的数据库的数值,这些数值包括:id   ,姓名等等。
发表于:2007-05-31 09:50:066楼 得分:0
如果我同时选择许多行,有没有方法把点击过的行数,统计到一个数组当中呢


快速检索

最新资讯
热门点击