求VB高手 求解關於vbCrLf,chr 13 ,chr

時間 2021-08-30 09:32:05

1樓:匿名使用者

1.print "5" & chr(13) & chr(10) & "7" 換了一行。

2.print "5" & chr(10) & chr(13) & "7" 換了兩行。

第乙個因為chr(13)+chr(10)(等價於vbcrlf)為標準的

換下一行,所以只換一行。

第二個為非標準的,chr(10)和chr(13)順序相反,他們的

後乙個和前乙個都不能找到整個的換下一行,即不能湊成

vbcrlf,所以print以二進位制的形式,都表示成換行,

(編譯器自動湊成一對,即chr(13)+chr(10))

所以換了兩行,你把上面的chr(10)或者chr(13)去掉乙個,

就是換一行了。

至於vbcrlf換兩行只是編譯器自動識別的,讓他多換一行。

假如這樣:

dim a as string

a = vbcrlf

print "5" & a & "7"

編譯器就識別不出vbcrlf,就只換一行了。

text1.text = "5" & chr(13) & chr(10) & "7" (對)

text1.text = "5" & chr(10) & chr(13) & "7" (錯)

我想你應該知道text是文字框的乙個屬性,屬性其實

就是方法(函式)符號過載後變成的一種表達方式。

寫成函式就是

call text1.text( "5" & chr(13) & chr(10) & "7" )

(當然,你這樣寫是不對的,只是便於理解。)

然後text函式呼叫api函式sendmessage或setwindowtext

將視窗標題改變,等於你寫的東西,只是讓編譯器原封不動

的傳給api了,沒有像print那樣,編譯器進行了處理,

由於chr(10) & chr(13)不表示換行,所以就顯示出

其他的字元了。

2樓:匿名使用者

正如每個人對同一件事的反應未必一樣,text 和 print 對應不同的使用範疇,他們對回車換行的演算法不一樣也不足為奇。既然你發現了這個規律,就好好記住它,好好利用它,沒必要叫微軟把這個"bug"補丁掉吧.........(亂說一通,別砸!)

vb中的 chr(13)和chr(10)的區別

3樓:匿名使用者

chr(13)表示換行,就是換行。比如'a' + chr(13) + 'b' 得到結果是ab

而chr(10)表示回車,即回到本行的起點,比如'a' + chr(10) + 'b' 得到結果是

b看不到a,因為本來a已經列印了,但是回車命令回到了a之前的位置,再列印b,把a列印的位置覆蓋了

現代計算機比較難於理解這兩個字元的區別,舊式機械印表機就比較簡單了

13表示滾動了一行(走紙),10表示回到本行起點(歸零) ,用舊式印表機列印'a' + chr(10) + 'b' 得到結果是看到a和b兩個字母的油墨重疊在了一起

4樓:

chr(10)換行

chr(13)回車

vb中的chr(13) 和chr(10)是什麼意思

5樓:四捨**入

chr(10):ascii碼中的換行鍵,相當於vblf。

chr(13):ascii碼中的回車鍵,相當於vbcr。

在窗體輸出中:

chr(13)、chr(10)、chr(13)+chr(10)是換一行;chr(10)+chr(13)、兩個chr(13)、兩個chr(10)是換兩行。

6樓:匿名使用者

chr 函式

返回 string,其中包含有與指定的字元**相關的字元 。

0 到 31 之間的數字與標準的非列印 ascii **相同。例如,chr(10) 可以返回換行字元。

vb中的chr(13) 和chr(10)是表示cr和lf兩個字元。

chr(13)是回車字元,chr(10)是換行字元。

參考:msdn6.0

VB求詞語解釋,vb求解釋

end是立即結束程式,執行了end之後所有資源將被釋放,之後不會再執行其他 而unload me相當於點選視窗的那個x 關閉窗體,意思是解除安裝本窗體,但是執行unload me之後仍然會執行unload queryunload等事件或其他 unload me並不能保證程式結束,但end一定會結束程...

高手們 求解 30,求解,求高手

證明dbf aed ecf全等 sas 所以dfe全等 sss def是等邊三角形,所以a b c 三個角相等 三邊也相等,又ad bf ec,所以db ae fc,就全等了 這個題我已經看到n遍了,直接反證法就可以證了,你知道裡面找找,非常多。求解,求高手 就 來看,應該是圖示快取的原因,把快取檔...

關於VB的問題 高手進

程式 流程圖 private sub command1 click dim n as integer dim k as integer dim str as string n val text1.text str 是素數 for k 2 to n 2 if n mod k 0 then str 不是...