- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [讨论]给指定的单元格赋值 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74908)
-- 发布时间：2015/9/22 15:17:00
-- [讨论]给指定的单元格赋值
如表所示，表的第一行为标题，第二行才是具体的值，如“姓名”来自“医生名单”中的“医生姓名”，不知道怎么弄？谢谢！
此主题相关图片如下：360反馈意见截图16780701173347.png
-- 发布时间：2015/9/22 15:28:00
--
根据姓名和日历和列名，去查表数据，然后赋值啊。
-- 发布时间：2015/9/22 15:29:00
--
你要日历的打印，昨天你不是弄出来了么？直接打印就行啊。
-- 发布时间：2015/9/22 15:56:00
--
给指定单元格赋值。例如:医生姓名就只能在第一列的第二行开始，公历就只能在第一行的第二列，第五列等。
昨天的那个我只需要开始时间和截止时间之间的数据，其他的不要。不知道怎么弄了？
-- 发布时间：2015/9/22 16:54:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:54321 (1).table |
-- 发布时间：2015/9/22 19:51:00
--
代码如下，怎么在第二次赋值的时候中间没有隔一行呢？
Dim t As Table = Tables("排班表预览")
DataTables("排班表预览").DeleteFor("")
Dim drs As List(Of DataRow) = DataTables("医生名单").Select("", "工号")
Dim csum As Integer= drs.count
t.addnew(2*csum+2)
Dim i As Integer=1
Dim j As Integer=1
For j= 1 To 2
For Each dr As DataRow In drs
t.value(i,0)= dr("医生姓名")
i=i+1
Next
If i=csum Then i=csum+1
Next
-- 发布时间：2015/9/22 19:58:00
--
搞懂了，第一次循环后i变成了csum+1了
-- 发布时间：2015/9/23 9:53:00
--
请问星期一_上午，星期二_上午，星期三_上午，。。。。。。，我想要表中的所有上午的列，不管是星期几，代码“e.Col.name="_上午" Or e.Col.name="_下午" Then”没有反应。怎么搞？谢谢！
-- 发布时间：2015/9/23 9:55:00
--
If e.Col.Name Like "*_上午" Then
End If
-- 发布时间：2015/9/23 11:09:00
--
另外，窗口打印时上面有日期文字，如截图所示：
此主题相关图片如下：20713337283.png