新聞中心
vb 中獲取某個字符的個數
統(tǒng)計某個字符的代碼如下:
創(chuàng)新互聯(lián)于2013年創(chuàng)立,先為應縣等服務建站,應縣等地企業(yè),進行企業(yè)商務咨詢服務。為應縣企業(yè)網站制作PC+手機+微官網三網同步一站式服務解決您的所有建站問題。
private
sub
command1_click()
dim
i
as
integer,
ccount
as
integer
for
i
=
1
to
len(text1)
if
mid(text1,
i,
1)
=
"你所需要統(tǒng)計的字符"
then
ccount
=
ccount
+
1
next
i
msgbox
"共有"
count
"個e"
end
sub
VB.net有什么函數能統(tǒng)計“漢字、全角字符”這些占用兩個字節(jié)的數量?
VB使用Unicode編碼,任何字符(包括半角的字母、數字、符號及全角的漢字、符號等)都是占用兩個字節(jié)的。
Len() 函數返回字符串的字符個數(要注意,一個漢字也是算作一個字符的)
比如: Len("百度baidu")的返回值為7
LenB() 函數返回字符串的占用字節(jié)數
比如: LenB("百度baidu")的返回值為14
VB.NET中,如何得到文本框中字符個數?
兄弟呀這個這么簡單 用這個語法吧 MsgBox(TextBox1.Text.Length)‘就是用消息窗口顯示幾個字符
vb.net 如何實現(xiàn)輸出一串字符串中的所有字符以及每個字符的出現(xiàn)次數?
使用一個單重的循環(huán)掃描這個字符串中的所有字符,對每一個字符的出現(xiàn)次數進行統(tǒng)計,最后輸出每個字符的出現(xiàn)次數。
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下統(tǒng)計字符串中所含某字符的個數
首先保證窗體上有一個標簽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://www.dlmjj.cn/article/dsedsdp.html