'寫入
創(chuàng)新互聯(lián)是專業(yè)的老城網(wǎng)站建設(shè)公司,老城接單;提供成都網(wǎng)站設(shè)計(jì)、網(wǎng)站制作,網(wǎng)頁設(shè)計(jì),網(wǎng)站設(shè)計(jì),建網(wǎng)站,PHP網(wǎng)站建設(shè)等專業(yè)做網(wǎng)站服務(wù);采用PHP框架,可快速的進(jìn)行老城網(wǎng)站開發(fā)網(wǎng)頁制作和功能擴(kuò)展;專業(yè)做搜索引擎喜愛的網(wǎng)站,專業(yè)的做網(wǎng)站團(tuán)隊(duì),希望更多企業(yè)前來合作!
Dim?bytes()?As?Byte?=?{34,?23,?43,?43,?55,?3}
Dim?items?=?(From?item?In?bytes?Select?item.ToString("000")).ToArray()
System.IO.File.WriteAllLines("c:\test.txt",?items)
'讀取
Dim?items2?=?System.IO.File.ReadAllLines("c:\test.txt")
Dim?bytes2?=?(From?item?In?items2?Select?Byte.Parse(item)).ToArray()
For?Each?item?In?bytes2
Console.WriteLine(item.ToString())
Next
vb判斷變量里的字符個(gè)數(shù)不夠兩個(gè)自動(dòng)在前面補(bǔ)0,提供兩種常用的方法;
1、根據(jù)長度判斷;
a = 5 '注意這里a如果定義為數(shù)字類型(Integer、long等),補(bǔ)零后的變量盡量換一個(gè)其他變量值,比如b
If Len(a) 2 Then b = "0" a else b=a ‘如果a長度小于2,就前面補(bǔ)零
2、先補(bǔ)零,再取后2位
a=5
b = "0" a
b= Right(b, 2)
沒那么麻煩啦!用Format()函數(shù)就可以啦!
Private Sub CmdNumber_Click()
TextNumber= Format(TextNumber, "000000")
TextNumber.Locked=True'鎖定文本框
End Sub
text1.text = format(txthuor.text,"000")'其中000為多少位,txthour為文本框的數(shù)值
網(wǎng)頁名稱:vb.net中輸入項(xiàng)補(bǔ)0 vb format 補(bǔ)0
文章地址:http://muchs.cn/article20/doesgjo.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供App設(shè)計(jì)、手機(jī)網(wǎng)站建設(shè)、網(wǎng)站維護(hù)、網(wǎng)站收錄、品牌網(wǎng)站建設(shè)、網(wǎng)站建設(shè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)