VB下统计字符串中所含某字符的个数
首先保证窗体上有一个标签label1,一个按钮command1,一个文本框text1
我们提供的服务有:成都网站设计、网站制作、微信公众号开发、网站优化、网站认证、清丰ssl等。为1000+企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务,是有科学管理、有技术的清丰网站制作公司
Private Sub Command1_Click()
Dim ii As Integer, Ccount As Integer
For ii = 1 To Len(Text1)
If Mid(Text1, ii, 1) = "e" Then Ccount = Ccount + 1
Next ii
Label1.Caption = "共有" Count "个e"
End Sub
扩展资料:
字符串函数(String processing function)也叫字符串处理函数,指的是编程语言中用来进行字符串处理的函数,如C,pascal,Visual以及LotusScript中进行字符串拷贝,计算长度,字符查找等的函数。
Visual Basic
定位函数
InStr,InStrRev,InStrB
截取函数
Mid,Right,Left
替换函数
Replace
分割函数
Split
格式化输出
Format
比较函数
StrComp,Like
长度计算
Len,LenB
编码转换
StrConv
大小写转换
LCase,UCase
重复产生
String,Space
参考资料来源:百度百科-字符串函数
VB.net有什么函数能统计“汉字、全角字符”这些占用两个字节的数量?
VB使用Unicode编码,任何字符(包括半角的字母、数字、符号及全角的汉字、符号等)都是占用两个字节的。
Len()
函数返回字符串的字符个数(要注意,一个汉字也是算作一个字符的)
比如:
Len("百度baidu")的返回值为7
LenB()
函数返回字符串的占用字节数
比如:
LenB("百度baidu")的返回值为14
vb.net 如何实现输出一串字符串中的所有字符以及每个字符的出现次数?
使用一个单重的循环扫描这个字符串中的所有字符,对每一个字符的出现次数进行统计,最后输出每个字符的出现次数。
Private Sub Command1_Click()
s = InputBox("请输入一个英文字符串:")
Dim a(128) As Integer
For i = 1 To Len(s)
t = Asc(Mid(s, i, 1))
a(t) = a(t) + 1
Next i
For i = 1 To 127
If a(i) 0 Then Print Chr(i); ":"; a(i)
Next i
End Sub
网页题目:vb.net统计字符 vb中统计字符个数
文章来源:http://scgulin.cn/article/doophop.html