樓上的午飯吃多了吧?
成都創(chuàng)新互聯(lián)公司從2013年開始,先為密云等服務(wù)建站,密云等地企業(yè),進行企業(yè)商務(wù)咨詢服務(wù)。為密云企業(yè)網(wǎng)站制作PC+手機+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問題。
num=asc("A")-96
就可以了,但是只能轉(zhuǎn)換大寫字母,大小寫字母通用的:
str="a"
num=asc(ucase(str))-96
Convert.ToInt32(char);
描述:將指定的
Unicode
字符的值轉(zhuǎn)換為等效的
32
位有符號整數(shù)。
由
.NET
Compact
Framework
支持。
date是一個類型。。。似乎不能賦值吧
由Sting轉(zhuǎn)換成 Integer 可以這樣寫
dim a as string="adasdfsdfsferqwer"
dim b as integer
b= CUInt(a)
語法是正確的。。。但你要是把 幾個字符轉(zhuǎn)硬轉(zhuǎn)換為 數(shù)字整型 但這幾個字符串又不是數(shù)子 一定要出錯的
如果是下面就沒錯了
dim a as string="45446464646"
dim b as integer
b= CUInt(a)
1、int類型數(shù)組轉(zhuǎn)換為Integer類型的數(shù)組。
2、long類型數(shù)組轉(zhuǎn)換為Integer類型的數(shù)組。
3、char類型數(shù)組轉(zhuǎn)換為Integer類型的數(shù)組。
4、String類型數(shù)組轉(zhuǎn)換為Integer類型的數(shù)組。
5、double類型數(shù)組轉(zhuǎn)換為Integer類型的數(shù)組。
明白你的意思了,只要是字母都會轉(zhuǎn)換成數(shù)字,幫你寫好了("usernane"和 "pasward" 我這里寫成 "username" 和" password")
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim username, password As String
Dim temp As Long
Dim r As String = ""
Dim v As String = TextBox1.Text
For Each c In v.ToString
If IsNumeric(c) Then
r = c
Else
r = ((Asc(c) - 65).ToString("00"))
End If
Next
username = r
temp = username * 3 - 500
password = CStr(temp)
TextBox2.Text = password
End Sub
本文題目:vb.net字母轉(zhuǎn)數(shù)字,vb數(shù)字轉(zhuǎn)換成字母
標題來源:http://sd-ha.com/article2/hdhgoc.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供ChatGPT、網(wǎng)站維護、動態(tài)網(wǎng)站、網(wǎng)站策劃、企業(yè)網(wǎng)站制作、品牌網(wǎng)站制作
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)