我用如下的方法把0-255的數值轉為十六進位字串到文字盒,但速度很慢,請問有改善的方法嗎?
If number <= 15 Then
txtText1.Text=txtText1.Text & “0” & Hex(number) & Space
Else
txtText1.Text=txtText1.Text & Hex(number) & Space
EndIf
If number <= 15 Then
txtText1.Text=txtText1.Text & “0” & Hex(number) & Space
Else
txtText1.Text=txtText1.Text & Hex(number) & Space
EndIf
文章標籤
全站熱搜

Private Sub Command1_Click() For i = 0 To 5 For Number = 0 To 255 If Number <= 15 Then txtText1.Text = txtText1.Text & "0" & Hex(Number) & Space(1) Else txtText1.Text = txtText1.Text & Hex(Number) & Space(1) End If Next Next End Sub Private Sub Command2_Click() Dim sText As String sText = txtText1.Text For i = 0 To 5 For Number = 0 To 255 If Number <= 15 Then sText = sText & "0" & Hex(Number) & Space(1) Else sText = sText & Hex(Number) & Space(1) End If Next Next txtText1.Text = sText End Sub
稛滖源楊辦竭嗣儸ㄐ珴珴硌﹝ 筍趼揹(String)?腔講湮苤衄妦癹秶ˋ
字串有兩種:可變長度與固定長度的字串。 可變長度字串最多可有大約 20 億 ( 2^31)個字元。 固定長度的字串可有 1 到大約 64K ( 2^16 ) 個字元。 節錄自msdn說明文件
謝謝告知!