Access space和string的使用；Access希尔排序算法又一例

时　间:2022-12-07 09:04:00
作　者:欧志华   ID：51519  城市：广州
摘　要:space和string的使用。
正　文:

      对数据格式进行设置，可以使用space对数据的左边设置，让数据排列可以根据需要进行设置。

代码如下:

    Dim i As Integer
    Me.Text2 = ""
    Me.Text1 = ""
    For i = 9 To 0 Step -1
        Me.Text1 = Me.Text1 & Space(9 - i) & String(2 * i + 1, CStr(i)) & vbCrLf
    Next i
    
    For i = 0 To 9 Step 1
        Me.Text2 = Me.Text2 & Space(9 - i) & String(2 * i + 1, CStr(i)) & vbCrLf
    Next i

示   例:

点击下载此附件

图   示: