1. (2023·章丘模拟) 有如下VB 程序

    Dim i As Integer, j As Integer, s As Integer, n As Integer

    n = 3: s = 0

    For i = 1 To n

        For j = 1 To i

            s = s + j

        Next j

    Next i

    Text1.Text = s

End Sub

该程序运行后在文本框Text1 中显示的结果是（   ）