往窗体Form1上励口—个列表框控件List1，并编写如下代码： Private Sub Form_Load() For i=0 To 6 List1.AddItem i Next i End Sub 为了在程序运行时，按住Ctrl键单击列表中的项目可以选中多个项目，可以设置List1的属性 ______。A．List1.ListB．List1.ListIndexC．List1.MultiSelectD．List1.Text
往窗体Form1上励口—个列表框控件List1，并编写如下代码： Private Sub Form_Load() For i=0 To 6 List1.AddItem i Next i End Sub 为了在程序运行时，按住Ctrl键单击列表中的项目可以选中多个项目，可以设置List1的属性 ______。
A．List1.List
B．List1.ListIndex
C．List1.MultiSelect
D．List1.Text
相关考题：
往窗体Form1上添加一个列表框控件List1，并编写如下代码： Private Sub Form_Load() For i=0T06 Listl.AddItem i Next i End Sub 为了在程序运行时，按住Ctrl键单击列表中的项目可以选中多个项目，可以设置Listl的属性______。A．Lial.ListB．Listl.ListlndexC．Listl.MultiSelectD．Listl.Text
在窗体上用复制、粘贴的方法建立了一个命令按钮数组，数组名为ComTest1。设窗体Form1标题为“MyForm1”．双击控件数组中的第3个按钮，打开代码编辑器，编写如下代码： Privae Sub ComTest 1_Click(Index As Integer) Form1．Caption=”MyForm2” End Sub 运行时，单击按钮数组中的第1个按钮，则窗体标题显示为（ ）。A. Form1B. ComTest1C. MyForm1D. MyForm2
往窗体Form1上添加一个列表框控件List1，并编写如下代码： Private Sub Form_Load() For i=0 To 6 List1.AddItem i Next i End Sub 为了在程序运行时，按住Ctrl键单击列表中的项目可以选中多个项目，可以设置List1的属性______。A．List1. ListB．List1. ListIndexC．List1. MultiSelectD．List1. Text
往窗体Form1上添加一个列表框控件List1，并编写如下代码： Private Sub Form_Load() For i=0 To 6 List1.AddItemi Next i End Sub 为了在程序运行时，按住Ctrl键单击列表中的项目可以选中多个项目，可以设置List1的属性 _________。A．List1.ListB．List1.ListIndexC．List1.MultiSelectD．List1.Text
程序代码如下，当单击窗体上的Command1控件时，在窗体上输出的结果是( )。 Private Sub Command1_Click() Dim aa(3，3)As Integer Dim i As Integer,j As Integer Dim s As Integer For i=0 To 3 For j=0 To 3 aa(i，j)=i*4+j+1 Next j Next i For i=0 To 3 s=s+aa(i，1) Next i Print s End SubA．32B．28C．30D．36
在名为Form1的窗体上绘制一个列表框，其名称为List1；一个水平滚动条，其名称为 HS1，smallChange属性为2，LargeChange属性为10，Min属性为0，Max属性为100。编写适当的事件过程，使程序运行后，若把滚动框滚到某个位置，然后单击窗体，则在列表框中添加一个项目，其内容是“××”，其中××是滚动框所在的位置，如下图所示。注意：程序中不要使用变量：文件必须存放在考生文件夹中，工程文件名为execise97.vbp，窗体文件名为execise97.frm。
程序代码如下，当单击窗体上的Command1控件时，窗体上显示的结果是( )。 Private Sub Command1_Click() Dim i As Integer，a(9)As Integer For i=9 To 0 Step-1 a(i)=10-i Next i Print a(2); a(5)；a(8) End SubA．2 5 8B．7 4 1C．8 5 2D．3 6 9
窗体上有一个命令按钮Command1和一个列表框List1，其中List1有0、1、2、3、4的内容，有下列程序： Private Sub Command1_Click() Dim i，s For i=0 To List1．ListCount s=s+List1．List(i) Next i Print s End Sub 程序运行后，单击命令按钮，则窗体上显示的是A．0B．10C．01234D．程序出错
程序代码如下，当单击窗体上的Command1控件时，窗体上输出的结果是( )。 Private Sub Command1_Click() Dim Y As Integer，I As Integer Dim A(7)As Integer Y=18：I=0 Do A(I)=Y Mod 2 I=I+1 Y=Y\2 Loop Until Y＜1 For j=I-1 To 0 Step-1 Print A(j)； Next j End SubA．1 0 0 0B．1 0 0 1 0C．0 0 1 1 0D．1 0 1 0 0