希望每vb道题都能给个解释
A：ListIndex
B：ListCount
C：Count
D：Index
参考答案：B
2、在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。
A：Private Sub List1_Click()
Label1.Caption=List1.Text
End Sub
B：Private Sub List1_Click()
Label1.Name=List1.ListIndex
End Sub
C：Private Sub List1_Click()
Label1.Name=List1.Text
End Sub
D：Private Sub List1_Click()
Label1.Caption=List1.ListIndex
End Sub
参考答案：A
3、在列表框中当前被选中的列表项的序号是由下列哪个属性表示______。
A：Listindex
B：Index
C：List
D：Tabindex
参考答案：A
4、为了清除列表框中的所有内容，应使用的方法是：______。
A：Clear
B：Remove
C：RemoveItem
D：Cls
参考答案：A
5、在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为______。
A：For i=1 To List1.ListCount
……
NEXT
B：For i=0 To List1.Count-1
……
NEXT
C：For i=0 To List1.ListCount-1
……
NEXT
D：For i=1 To List1.Count
……
NEXT
参考答案：C
6、设有如下程序：
Option Base 0
Private Sub Form_Click()
Dim a
Dim i As Integer
a = Array(1, 2, 3, 4, 5,6, 7, 8, 9)
For i = 0 To 3
Print a(5 - i);
Next
End Sub
程序运行后，单击窗体，则在窗体上显示的是______。
A： 6 5 4 3
B： 5 4 3 2
C： 4 3 2 1
D： 7 6 5 4
参考答案：A
7、设执行以下程序段时依次输入1、3、5，执行结果为______。
Dim a(4) As Integer,b(4) As Integer
For K = 0 To 2
a(K + 1) = Val(InputBox("请输入数据"))
b(3 - K) = a(K + 1)
Next K
Print b(K)
A： 0
B： 3
C： 5
D： 1
参考答案：D
8、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub Command1_Click()
Dim i As Integer,jAs Integer
Dim a(10,10) AsInteger
For i=1 To 3
For j=1 To 3
a(i,j)=(i-1)*3+j
Print a(i,j);
Next j
Next i
End Sub
程序运行后，单击命令按钮，窗体上显示的是______。
A： 1 2 3
4 5 6
7 8 9
B： 2 3 4
34 5
4 5 6
C： 1 4 7
2 5 8
3 6 9
D： 1 2 3
2 4 6
3 6 9
参考答案：A
9、用下面的语句所定义的数组的元素个数是：______。
Dim arr(3 To 5,-2 to 2)
A：24
B：12
C：15
D：20
参考答案：C
10、下列______语句可以为动态数组分配实际元素个数。
A：static语句
B：Dim语句
C：public语句
D：ReDim语句
参考答案：D
11、假定程序中有以下语句：
answer =MsgBox("String1",,"String2","String3",2)
执行该语句后，将显示一个信息框，此时如果单击"确定"按钮，则answer的值为：______。
A：String3
B：String2
C：String1
D：1
参考答案：D 展开
解答这么多题就给这么点儿分，题主于心何忍？！
【1】
A. ListIndex，当前选中项目的索引值
B. ListCount，列表中的项目数（所以这个答案是对的）
C. Count，ListBox 下没有这个属性（在ListBox.Items.Count才有）
D.Index，控件的索引值
【2】
区分 Caption 和 Name 的不同，Name 是这个 Label 控件的名字，Caption 是它显示在屏幕上的字。
Index 和 Text 这个不用区分了吧？见【1】。
【3】
A. B. 参考【1】
C.List，列表中所有项目的集合
D.Tabindex，表示控件在当前父窗体中按Tab键给与焦点的次序
【4】
A.Clear，没什么好解释的，懂英文的就知道
B.Remove，删除某一项
C.RemoveItem，同上
D.Cls，只有在 Form.Cls 和 Picture1.Cls 才有这个方法，其他的基本都是 Clear，两者是一个意思，不同控件叫法不同而已，这里是问 ListBox 控件，所以应该是 A.
【5】
VB 中索引号起始从 0 开始，所以循环每一项的话就是从索引号为 1 开始一直到总项数 - 1 结束。
【6】
a = Array(1, 2, 3, 4, 5,6, 7, 8, 9)
For i = 0 To 3
Print a(5 - i);
Next
就是说 a(0)=1, a(1)=2, a(2) = 3 ......, a(8)=9。
所以 a(5 - i) 当 i 分别等于0、1、2、3的时候输出什么题主就该懂了。
【7】
For K = 0 To 2
a(K + 1) = Val(InputBox("请输入数据"))
b(3 - K) = a(K + 1)
Next K
K = 0 时输入了 1，那么 a(1) = 1, b(3) = 1。
K = 1 时输入了 3，那么 a(2) = 3, b(2) = 3。
K = 2 时输入了 5，那么 a(3) = 5, b(1) = 5。
K = 3 时退出循环，所以 Print b(K) 即 Print b(3) = 1。
【8】
For i = 1 To 3
For j = 1 To 3
a(i, j)=(i - 1) * 3 + j
Print a(i, j);
Next j
Next i
嵌套循环而已，建议题主一步一步在草纸上演算。
【9】
Dim arr(3 To 5,-2 to 2)
题主可以把二维数组想象成矩阵，横向 3 to 5，共3、4、5 三行；纵向 -2 to 2，共 -2、-1、0、1、2 五列。所以共 15 个元素。
【10】
为动态数组的元素赋值的语句就是 ReDim，这没什么好解释的，就这么规定而已。
【11】
answer = MsgBox("String1", ,"String2","String3",2)Msgbox() 函数一共五个参数，其中第一个参数是必选，后面可选。从左到右依次是：在对话框里显示的文字、对话框里显示的按钮和图标、对话框的标题、对话框的帮助文件、帮助文件中的索引号。返回值是所按下的按钮的值。
这里单击了确定，那么返回值就是 1。
P.S. 11道题目没有一道不是基础题，如果题主从来没接触过编程，那么只要懂一些英文的话某些题也能蒙对。一道题都不会真说不过去了，在百度上问了也还是不会。多看书吧。
这样的题目，不是解释能解决问题的，而是你需要从头开始，好好读书学习！
这么多朋友的解释，无非就是书上的内容！
