Asc 函數(shù)
在天水等地區(qū),都構(gòu)建了全面的區(qū)域性戰(zhàn)略布局,加強發(fā)展的系統(tǒng)性、市場前瞻性、產(chǎn)品創(chuàng)新能力,以專注、極致的服務理念,為客戶提供成都網(wǎng)站建設、網(wǎng)站設計 網(wǎng)站設計制作按需求定制設計,公司網(wǎng)站建設,企業(yè)網(wǎng)站建設,高端網(wǎng)站設計,營銷型網(wǎng)站,成都外貿(mào)網(wǎng)站建設公司,天水網(wǎng)站建設費用合理。
返回一個 Integer,代表字符串中首字母的字符代碼。
語法
Asc(string)
必要的 string 參數(shù)可以是任何有效的字符串表達式。如果 string 中沒有包含任何字符,則會產(chǎn)生運行時錯誤。
說明
在非 DBCS 系統(tǒng)下,返回值范圍為 0 – 255 。在 DBCS
系統(tǒng)下,則為 -32768 – 32767。
注意 ?? AscB
函數(shù)作用于包含在字符串中的字節(jié)數(shù)據(jù),AscB 返回第一個字節(jié)的字符代碼,而非字符的字符代碼。AscW 函數(shù)返回 Unicode 字符代碼,若平臺不支持 Unicode,則與 Asc
函數(shù)功能相同。
Asc 函數(shù)示例
本示例使用 Asc 函數(shù)返回字符串首字母的字符值(ASCII 值)。
Dim?MyNumber
MyNumber?=?Asc("A")???'?返回?65。
MyNumber?=?Asc("a")???'?返回?97。
MyNumber?=?Asc("要")???'?返回?-11606
Public Function dec_to_hex(dec As Long) As String
Dim a As String
dec_to_hex = ""
Do While dec 0
a = CStr(dec Mod 16)
Select Case a
Case "0": a = "30H"
Case "1": a = "31H"
Case "2": a = "32H"
Case "3": a = "33H"
Case "4": a = "34H"
Case "5": a = "35H"
Case "6": a = "36H"
Case "7": a = "37H"
Case "8": a = "38H"
Case "9": a = "30H"
Case "10": a = "65H"
Case "11": a = "66H"
Case "12": a = "67H"
Case "13": a = "68H"
Case "14": a = "69H"
Case "15": a = "70H"
End Select
dec_to_hex = a " " dec_to_hex
dec = dec \ 16
Loop
End Function
Dim i As Integer
Dim max As Integer = 0
For i = 0 To ListBox1.Items.Count - 1
If Asc(ListBox1.Items(i)) Asc(ListBox1.Items(max)) Then
max = i
End If
Next
Label1.Text = ListBox1.Items(max) ‘將結(jié)果顯示在一個標簽上。
可使用Asc 函數(shù)將字符轉(zhuǎn)換為ASCII,使用Chr 函數(shù)將ASCII轉(zhuǎn)換為字符。
Asc 函數(shù),返回一個 Integer,代表字符串中首字母的字符代碼。
Asc 函數(shù)示例
本示例使用 Asc 函數(shù)返回字符串首字母的字符值(ASCII 值)。
Dim?MyNumber
MyNumber?=?Asc("A")???'?返回?65。
MyNumber?=?Asc("a")???'?返回?97。
MyNumber?=?Asc("字符")???'?返回?-10282。
Chr 函數(shù),返回 String,其中包含有與指定的字符代碼相關的字符 。
Chr 函數(shù)示例
本示例使用 Chr 函數(shù)來返回指定字符碼所代表的字符。
Dim?MyChar
MyChar?=?Chr(65)???'?返回?A。
MyChar?=?Chr(97)???'?返回?a。
MyChar?=?Chr(62)???'?返回?。
MyChar?=?Chr(-18437)???'?返回?符。
新聞標題:vb.net怎樣轉(zhuǎn)asc,vb 類型轉(zhuǎn)換
文章地址:http://chinadenli.net/article30/hegeso.html
成都網(wǎng)站建設公司_創(chuàng)新互聯(lián),為您提供、Google、App開發(fā)、網(wǎng)站收錄、搜索引擎優(yōu)化、動態(tài)網(wǎng)站
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)