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


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

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

帅哥哟,离线,有人找我吗?
有点酸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | 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)

 回到顶部