Foxtable(狐表)用户栏目专家坐堂 → [求助]动态数据查询


  共有213人关注过本帖树形打印复制链接

主题:[求助]动态数据查询

帅哥哟,离线,有人找我吗?
riyuan
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:2725 威望:0 精华:0 注册:2013/4/9 11:49:00
[求助]动态数据查询  发帖心情 Post By:2024/6/22 8:25:00 [显示全部帖子]

有这样一个表,想在输入查询条件身份证号时,动态1和动态2的label控件显示对应的字段名称,textbox1t和textbox2控件显示对应的字段数据

图片点击可在新窗口打开查看此主题相关图片如下:123.png
图片点击可在新窗口打开查看
达到这种效果
图片点击可在新窗口打开查看此主题相关图片如下:1234.png
图片点击可在新窗口打开查看


[此贴子已经被作者于2024/6/22 8:26:37编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
riyuan
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:2725 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2024/6/23 7:55:00 [显示全部帖子]

比如说我输入吴小五的身份证号,根据身份证号遍历查询字段数据是否为空?如果字段数据为空就不显示,如果字段数据不为空就显示。

 回到顶部
帅哥哟,离线,有人找我吗?
riyuan
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:2725 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2024/6/24 9:04:00 [显示全部帖子]

窗体中没有表控件,是通过后台数据查询的表,
提示没有dt的表
Dim cmd As New SQLCommand
cmd.C
Dim str As String = e.Form.Controls("sfz").text
Dim dt As DataTable
dt = cmd.ExecuteReader()
Dim dr As DataRow
dr = DataTables(dt).Find("身份证号='" & e.form.controls("sfz").text & "'")
If dr IsNot Nothing Then '如果找到的话
   Dim i As Integer = 1
For Each dc As DataCol In DataTables(dt).datacols
If dr.isnull(dc.name) = False Then
e.form.controls("动态" & i).text = dc.name
e.form.controls("textbox" & i).text = dr(dc.name)
End If
Next
End If

 回到顶部
帅哥哟,离线,有人找我吗?
riyuan
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:2725 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2024/6/24 10:23:00 [显示全部帖子]



 回到顶部
帅哥哟,离线,有人找我吗?
riyuan
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:2725 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2024/6/24 10:23:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:1111.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:112.png
图片点击可在新窗口打开查看
为什么还是不对

 回到顶部
帅哥哟,离线,有人找我吗?
riyuan
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:2725 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2024/6/24 11:03:00 [显示全部帖子]

为什么只能查询显示最后的一列‘

图片点击可在新窗口打开查看此主题相关图片如下:123.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:345.png
图片点击可在新窗口打开查看



 回到顶部
帅哥哟,离线,有人找我吗?
riyuan
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:2725 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2024/6/24 15:31:00 [显示全部帖子]

看不到完整的代码 ,代码被屏蔽,请指教一下
[此贴子已经被作者于2024/6/24 16:35:48编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
riyuan
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:2725 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2024/6/25 11:07:00 [显示全部帖子]

显示的都是最后一列的数据

 回到顶部
帅哥哟,离线,有人找我吗?
riyuan
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:2725 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2024/6/25 11:25:00 [显示全部帖子]

请指教,,目的是想让两个数据分别显示到相应的控件中
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip


 回到顶部
帅哥哟,离线,有人找我吗?
riyuan
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:2725 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2024/6/26 20:53:00 [显示全部帖子]

请教能不能让备注列的数据始终显示在最后一个文本框中,不论其他列的数据。想固定备注到textbox3
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip


图片点击可在新窗口打开查看此主题相关图片如下:123.png
图片点击可在新窗口打开查看

 回到顶部
总数 11 1 2 下一页