Foxtable(狐表) → 用户栏目 → 专家坐堂 → 文字右对齐


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

主题：文字右对齐
帅哥哟，离线，有人找我吗？
ycwk
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1219 积分：8467 威望：0 精华：0 注册：2016/2/2 21:52:00 		文字右对齐  发帖心情 Post By：2018/1/6 14:50:00 [显示全部帖子]

在学习日历，
标签上的文字长度是不固定的，但是在文字末尾希望加上该日历的负责人
例：
开车                          张三
去三号会议室开会     李四
去取快递                   王五

要达到这样的效果，字符串要怎么加工？
[此贴子已经被作者于2018/1/6 14:49:52编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
ycwk
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1219 积分：8467 威望：0 精华：0 注册：2016/2/2 21:52:00 		  发帖心情 Post By：2018/1/6 15:52:00 [显示全部帖子]

' by wk 在标签主题后增加记录人
Dim str_Topic As String=_主表dr(n主题)
Dim str_End As String
If (20-str_Topic.Length)>=0 Then  '防止主题过长,让20-str_length减成负数了报错
str_End=str_Topic.Padright(20-str_Topic.Length)
End If
Me.pl.Text = str_End & _主表dr(n记录人)      '在日程标签上显示  主题+ 记录人

我试了还是不行



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


[此贴子已经被作者于2018/1/6 15:57:21编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
ycwk
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1219 积分：8467 威望：0 精华：0 注册：2016/2/2 21:52:00 		  发帖心情 Post By：2018/1/6 16:16:00 [显示全部帖子]

汉字和字符胖瘦不一样，所以还是没有对齐

 


图片点击可在新窗口打开查看此主题相关图片如下：1.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
ycwk
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1219 积分：8467 威望：0 精华：0 注册：2016/2/2 21:52:00 		  发帖心情 Post By：2018/1/6 22:21:00 [显示全部帖子]

比之前好多了，但是 汉字行 和 字符行  还是不整齐，有办法改进吗？


图片点击可在新窗口打开查看此主题相关图片如下：1.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
ycwk
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1219 积分：8467 威望：0 精华：0 注册：2016/2/2 21:52:00 		  发帖心情 Post By：2018/1/6 23:05:00 [显示全部帖子]

顺便问一下，想在鼠标指到上面的某行时，弹出一个  ToolTip，显示该数据行的主题，   下面的方法写在全局代码里面，请问有办法显示ToolTip提示吗？我只会msgbox,但是显然这样没有ToolTip方便。 

Private Sub 自定义日历_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.MouseEnter   '发生Me.MouseEnter 事件时调用自定义日历_MouseEnter方法处理   
_事务标签日期 = _de            '先将明细的数据行传递给全局变量
_事务明细DataRow = _主表dr
   msgbox(_主表dr("主题"))
 ' Table("日历表").ShowToolTip("hello",5)    不能用

End Sub
 回到顶部
帅哥哟，离线，有人找我吗？
ycwk
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1219 积分：8467 威望：0 精华：0 注册：2016/2/2 21:52:00 		  发帖心情 Post By：2018/1/7 21:40:00 [显示全部帖子]

 zxbToolTip.SetToolTip(Me, str)

但是代码执行完上面这句，并不能弹出提示啊，看MSDN，ME后面应该跟一个控件名称，可是这里没有控件啊
 toolTip1.SetToolTip(Me.button1, "My button1")
   toolTip1.SetToolTip(Me.checkBox1, "My checkBox1")
 回到顶部
帅哥哟，离线，有人找我吗？
ycwk
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1219 积分：8467 威望：0 精华：0 注册：2016/2/2 21:52:00 		  发帖心情 Post By：2018/1/7 22:10:00 [显示全部帖子]

我用的是下面这版，鼠标点上去没有提示的


http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=101669&replyID=&skin=1

调试跟踪的时候发现是这句好像没起作用：
zxbToolTip.SetToolTip(Me, str)   不知道问题在哪里。
[此贴子已经被作者于2018/1/7 22:11:18编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
ycwk
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1219 积分：8467 威望：0 精华：0 注册：2016/2/2 21:52:00 		  发帖心情 Post By：2018/1/7 22:17:00 [显示全部帖子]

好吧，原来鼠标是要点到标签前面的感叹号上面才有提示。 其它地方是没有的

 回到顶部
帅哥哟，离线，有人找我吗？
ycwk
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1219 积分：8467 威望：0 精华：0 注册：2016/2/2 21:52:00 		  发帖心情 Post By：2018/1/8 9:17:00 [显示全部帖子]

还有个问题，关于 “事务编辑”窗口中的，提示复选框，勾上了以后以什么方式提示啊？ 在代码中没有看到有这块儿的

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04199 秒, 5 次数据查询