01、创建窗体

首先，我们创建一个窗体，在窗体上放一个文本框（txtLen），用于填写最大的显示长度，接着我们在放一个标签(lblTitle)用于内容的显示，如下图：

02、添加代码

接着，我们来添加一下代码

Option Compare Database
Option Explicit
Dim s As String
Private Sub Form_Load()s = lblTitle.Caption
End Sub
Private Sub txtLen_AfterUpdate()Dim Tmpstr As StringDim ctl As ControlIf Len(Me.txtLen) > 0 ThenFor Each ctl In Me.ControlsIf ctl.ControlType = acLabel ThenIf ctl.Name = "lblTitle" ThenIf Len(ctl.Caption) > Val(Nz(Me.txtLen, 0)) ThenTmpstr = ctl.Captionctl.Caption = Left(Tmpstr, Val(Me.txtLen)) & "..."ctl.ControlTipText = TmpstrEnd IfEnd IfEnd IfNextElselblTitle.Caption = sEnd If
End Sub

代码原理比较简单，其实就是判断一下长度，如果超出了设置的长度，那超出的部分用...代替

03、运行测试

最后，我们来运行看一下效果

那到这里的话，整个示例就讲完了，大家快去试一下吧。

标题太长用省略号代替相关推荐

使用springer nature模板页眉显示标题太长超出页面解决
Springer Nature's LaTeX template下载投稿期刊,用上述模板:出现页眉显示标题太长超出页面的问题: 如下图: 可以看出这个标题超出页面的都直接不显示了. 解决: 参考这个 ...
R语言中可视化图像的标题太长如何进行换行？
R语言中可视化图像的标题太长如何进行换行? 目录 R语言中可视化图像的标题太长如何进行换行? R语言是解决什么问题的? R语言中可视化图像的标题太长如何进行换行? R语言是解决什么问题的? R 是一个 ...
latex 分行表格标题过长_使用latex软件，其页眉显示标题内容，由于标题太长，不能一行显示，如何使页眉显示多行，谢谢...
你给的那段代码编译不了(应该是 \sethead 前面的 { 没有 } 封口),我没用过 \newpagestyle 这个命令,所以自己找其他资料试了试. 得出以下这段代码可以"参考看看&q ...
html新闻标题太长,关于seo优化新闻标题的撰写注意事项
标题设计是网站运行中不可缺少的过程.即使你有精彩的内容,如何使用标题让目标读者感到愉悦,并有点击的冲动,也是特别重要的. 因此,在网站上写新闻标题已经成为SEO人员的必修课. 在做标题设计时,主要基于 ...
ASP.net中太长的数据缩略显示
问题: 用<%# DataBinder.Eval(Container.DataItem,"NewsID")%>显示数据的,如果标题太长了怎么规定字数,多余的用" ...
qtreewidgetitem 文字内存太长换行_table文字溢出显示省略号问题
每日金句『专注做一件事』2009 年的<麻省理工科技评论>(MIT TechnologyReview)中有一篇文章写道,人脑的带宽只有区区60比特/ 秒,是(那个年代)上网带宽的十万分之 ...
android文字在图片底下的按钮样式、textview太长的情况用省略号表示
一.android文字在图片下的按钮最终的效果为: 背景设置成透明: android:background="#00ffffff" 文字设置在图片的下面: android:dra ...
latex 分行表格标题过长_latex排版中表格中表格文字太长需要强制换行。
latex排版中表格中表格文字太长需要强制换行. (2017-11-17 10:02:20) 标签: it 教育科研 \newcommand{\tabincell}[2]{\begin{tabul ...
jwt token 太长_理解 JWT 鉴权的应用场景及使用建议
JWT 介绍 JSON Web Token(JWT)是一个开放式标准(RFC 7519),它定义了一种紧凑(Compact)且自包含(Self-contained)的方式,用于在各方之间以JSON对象 ...

标题太长用省略号代替

01、创建窗体

02、添加代码

03、运行测试

标题太长用省略号代替相关推荐

最新文章

热门文章