Foxtable(狐表)用户栏目专家坐堂 → 突发奇想,做了一个标签会动例子!


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

主题:突发奇想,做了一个标签会动例子!

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


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57634 威望:0 精华:15 注册:2008/9/1 9:45:00
突发奇想,做了一个标签会动例子!  发帖心情 Post By:2012/1/6 7:44:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:会动的字符.table


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


加好友 发短信
等级:三尾狐 帖子:746 积分:6673 威望:0 精华:1 注册:2008/9/1 11:46:00
  发帖心情 Post By:2012/1/6 8:11:00 [只看该作者]

创新


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


加好友 发短信
等级:小狐 帖子:365 积分:2693 威望:0 精华:1 注册:2011/11/25 7:55:00
  发帖心情 Post By:2012/1/6 8:13:00 [只看该作者]

有创意

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/1/6 8:24:00 [只看该作者]

呵呵,顶你一下,不过代码的效率实不太好,我给你一个合理的:

 

Dim pm As WinForm.Label = e.Form.Controls("Label1")
Dim s As String  = "请输入关键字→"
Dim l As Integer = pm.Text.length
pm.text = s.SubString(0,iif(s.length = l,1,l+1))

[此贴子已经被作者于2012-1-6 8:26:43编辑过]

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


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57634 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2012/1/6 8:41:00 [只看该作者]

我正在想能不能将一段字符拆解出来,正在想代码的问题,你就发来了,研究一下.

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


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57634 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2012/1/6 8:50:00 [只看该作者]

代码非常简介,我本来的拆解想法同你不一样,还可以这样,没有想到.

 回到顶部