Foxtable(狐表)用户栏目专家坐堂 → [求助]帮忙改造一下系统的“符号”框


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

主题:[求助]帮忙改造一下系统的“符号”框

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


加好友 发短信
等级:超级版主 帖子:107135 积分:544918 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/1/23 17:51:00 [显示全部帖子]

If e.Sender.Name.StartsWith("Symbol") Then 
    SendKeys.Send(e.Sender.Text)
End If

ClipBoard.SetText(e.Sender.Text) 

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


加好友 发短信
等级:超级版主 帖子:107135 积分:544918 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/1/23 20:28:00 [显示全部帖子]

1、点击单元格进入编辑状态,在插入符号

2、
Dim s As String = "01020304"
For i As Integer = 0 To s.Length - 1 Step 2
    Output.Show(s.SubString(i,2))
Next

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


加好友 发短信
等级:超级版主 帖子:107135 积分:544918 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/1/23 21:37:00 [显示全部帖子]

因为你用的是按钮,按钮点击就会使得单元格退出编辑状态,改为使用Gallery吧


另外,什么红色加粗?没看懂

 回到顶部