vb 中获取某个字符的个数

统计某个字符的代码如下：

创新互联于2013年创立，先为应县等服务建站，应县等地企业，进行企业商务咨询服务。为应县企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

private

sub

command1_click()

dim

i

as

integer,

ccount

as

integer

for

i

=

1

to

len(text1)

if

mid(text1,

i,

1)

=

"你所需要统计的字符"

then

ccount

=

ccount

+

1

next

i

msgbox

"共有"

count

"个e"

end

sub

VB.net有什么函数能统计“汉字、全角字符”这些占用两个字节的数量？

VB使用Unicode编码，任何字符（包括半角的字母、数字、符号及全角的汉字、符号等）都是占用两个字节的。

Len() 函数返回字符串的字符个数（要注意，一个汉字也是算作一个字符的）

比如： Len("百度baidu")的返回值为7

LenB() 函数返回字符串的占用字节数

比如： LenB("百度baidu")的返回值为14

VB.NET中，如何得到文本框中字符个数?

兄弟呀这个这么简单 用这个语法吧 MsgBox(TextBox1.Text.Length)‘就是用消息窗口显示几个字符

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代码声明一个一维字符类型的数组，有20个元素，每个元素最多存放十个字符。字符个数随机，

Dim a(20) As String

Dim num As Integer

Dim ppp As String = ""

Dim temp As String = ""

For i = 1 To 20

temp = ""

num = Int(Rnd() * 10 + 1)

For j = 1 To num

temp = temp  Chr(Int(Rnd() * 26 + 97))

Next

a(i) = temp

Next

Dim max As Integer = 0

For i = 1 To 20

If a(i).Length  max Then

max = a(i).Length

End If

Next

For i = 1 To 20

If a(i).Length = max Then

ppp = ppp  "字符最多的元素是第"  i  "个元素"  a(i)  vbCrLf

End If

Next

For i = 1 To 20

TextBox1.Text = TextBox1.Text  a(i).PadRight(10)  "          "

If i Mod 4 = 0 Then

TextBox1.Text = TextBox1.Text  vbCrLf

End If

Next

TextBox1.Text = TextBox1.Text  ppp

VB下统计字符串中所含某字符的个数

首先保证窗体上有一个标签label1，一个按钮command1,一个文本框text1

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计算字符串个数
文章位置：http://cdweb.net/article/dsedsdp.html