Private sub Command_Click()

       Msgbox(“123”+”456”)

    End sub

  运行时，在输出对话框中显示的提示信息是（   ）

Dim i As Integer, Sum As Integer

Dim a(1 To 11) As Integer

Sum = 6

a(11) = 49

For i = 10 To 1 Step -1

  a(i) = a(i + 1) - 1

  If a(i) Mod 3 = 0 Then Sum = Sum + a(i)

Next i

Text1.Text = Str(Sum)

该程序段运行后，文本框text1中显示的内容是（   ）

x=1 : a=x : b=x+1

x=x+1 : c=x : d=x+1

该程序段运行后，下列说法正确的是（  ）

⑴每个回文都有一个“中心”，当回文字符数为奇数时，中间的那个字符就是回文中心；但是当回文的字符数为偶数时，回文的中心是最中间的那两个字符，且这两个字符相同。

⑵对任意一个字符或者相同的两个连续字符，我们都可以假设它为回文的“中心”，向它的左右两边扩展出尽可能长的回文。对于每种假设，我们都能得到一个回文，而最长回文必定由其中的某个假设中得到！

现编写一个VB程序，在Text1中输入一串字符，单击“统计”按钮，在Text2中显示该字符串中的最大的回文子串（长度相同时，输出最左边的子串）。请回答下列问题：

from random import random

a=[1]*5

i=1

while i<=4:

    a[i]=int(random()*10)+1

    if a[i]==a[i-1]//2 or a[i]==a[i-1]*2:

        i+=1

执行该程序段后，数组a的值可能是（   ）