Foxtable(狐表)用户栏目专家坐堂 → [原创]按照规则格式字符串


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

主题:[原创]按照规则格式字符串

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


加好友 发短信
等级:幼狐 帖子:72 积分:1257 威望:0 精华:0 注册:2017/11/6 12:18:00
[原创]按照规则格式字符串  发帖心情 Post By:2020/10/19 11:09:00 [只看该作者]

有一个字符串,例如 :“alipay.data.dataservice.bill.downloadurl.query"”

要求,去掉所有 点,且每个单词的首字母大写,变成 “AlipayDataDataserviceBillDownloadurlQuery"


去掉点,我会,点后面的第一个字母,变成大写字母,要怎么做才能实现
[此贴子已经被作者于2020/10/19 11:09:12编辑过]

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


加好友 发短信
等级:五尾狐 帖子:1093 积分:6682 威望:0 精华:0 注册:2013/7/1 9:05:00
  发帖心情 Post By:2020/10/19 11:49:00 [只看该作者]

Dim ss() As String ="alipay.data.dataservice.bill.downloadurl.quer".split(".")
Dim r As String
For Each s As String In ss
    r = r + s.SubString(0,1).ToUpper + s.SubString(1)
Next
MessageBox.show(r)

 回到顶部