Foxtable(狐表)用户栏目专家坐堂 → 窗口多界面显示


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

主题:窗口多界面显示

美女呀,离线,留言给我吧!
朱女士
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:513 积分:4073 威望:0 精华:0 注册:2020/2/8 11:14:00
窗口多界面显示  发帖心情 Post By:2022/12/22 10:33:00 [只看该作者]

老师:您好!
  我要弄一个大屏幕显示,提醒各项目进度。我想实现:一次性输入多个项目号,窗口中有多个“table控件”,按照输入的项目个数循环同时显示同一个数据表的不同项目号的内容。
 如下图片。可是我的代码,实现不了这个想法。请指教!谢谢!

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


DataTables("项目进度计算表").LoadFilter = ""
DataTables("项目进度计算表").Load

Dim b1 As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim value As String = b1.value
Dim Names() As String = Value.Split(chr(13))

Dim v As String
For Each name As String In Names
   Dim n As Integer = 0
    name = name.replace(chr(10), "")
     n = n + 1
    v = Str(n)
    Dim xx As String = "Table" & Trim(v)

    Tables("项目工序进度提示屏_" & xx & "").DataTable.LoadFilter = "[项目号] = '" & name & "'"
    Tables("项目工序进度提示屏_" & xx & "").DataTable.Load
    
Next


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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/12/22 10:43:00 [只看该作者]

窗口表全部改为sqltable:http://www.foxtable.com/webhelp/topics/1907.htm

 回到顶部