窗体上有一个名为List1的列表框,程序执行时在窗体上单击,输出的结果是( )。 Priate Sub Form_Click() For i=0 To List1.ListCount-1 If i Mod 2=0 Then Print List1.List(i); End If Next i End Sub Private Sub Form_Load() List1.AddItem"中国" List1.AddItem"日本" List1.AddItem"韩国" List1.AddItem"新加坡" List1.AddItem"香港" End SubA.中国韩国B.日本新加坡C.中国韩国香港D.中国日本韩国新加坡香港
窗体上有一个名为List1的列表框,程序执行时在窗体上单击,输出的结果是( )。 Priate Sub Form_Click() For i=0 To List1.ListCount-1 If i Mod 2=0 Then Print List1.List(i); End If Next i End Sub Private Sub Form_Load() List1.AddItem"中国" List1.AddItem"日本" List1.AddItem"韩国" List1.AddItem"新加坡" List1.AddItem"香港" End Sub
A.中国韩国
B.日本新加坡
C.中国韩国香港
D.中国日本韩国新加坡香港
相关考题:
( 18 )在程序运行时,下面的叙述中正确的是A )用鼠标右键单击窗体中无控件的部分,会执行窗体的 Form_Load 事件过程B )用鼠标左键单击窗体的标题栏,会执行窗体的 Form_Click 事件过程C )只装入而不显示窗体,也会执行窗体的 Form_Load 事件过程D )装入窗体后,每次显示该窗体时,都会执行窗体的 Form_Click 事件过程
在程序运行时,下面的叙述中正确的是A.用鼠标右键单击窗体中无控件的部分,会执行窗体的Form. L0ad事件过程B.用鼠标左键单击窗体的标题栏,会执行窗体的Form_Click事件过程C.只装入而不显示窗体,也会执行窗体的Form. Load事件过程D.装入窗体后,每次显示该窗体时,都会执行窗体的Form_Click事件过程
窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub Command_Click()Dim a As Integer,b As Integera=8b=12Print Fun(a,b);a;bEnd SubPrivate Function Fun(ByVal a As Integer,b As Integer)As Integera=a Mod 5b=b\5Fun=aEnd Function程序运行时,单击命令按钮,则输出结果是A.3 3 2B.3 8 2C.8 8 12D.3 8 1 2
有一个工程文件ylc.vbp(相应的窗体文件名为ylc5.frm),在窗体上画一个名为List1的列表框和一个名为Text1的文本框。编写窗体的MouseDown事件。程序运行后,如果用鼠标左键单击窗体,则从键盘上输入要添加到列表框的项目;如果用鼠标右键单击窗体,则从键盘上输入要删除的项目,将其从列表中删除。程序的运行情况如图23所示。注意:存盘时必须存放在考生文件夹下,工程文件名为ylc5.vbp,窗体文件名为ylc5.frm。
在考生文件夹中有一个工程文件exeeise86.vbp及窗体文件execise86.frm。在名为Form1的窗体上有一个名称为List1的列表框和一个名称为Cmd1、标题为;显示”的命令按钮。要求程序运行后,如果多次单击列表框中的项,则可同时选择这些项。而如果单击“显示”按钮,则在窗体上输出所有选中的列表项,如下图所示。要求;修改列表框的适当属性,使得运行时可以多选,并去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序中的其他部分。最后把修改过的程序按原名保存。
在考生文件夹中有一个工程文件execise50.vbp及窗体文件execise50.frm。在名为Form1的窗体上有一个名称为Cmd1,标题为“显示”的命令按钮,一个名称为List1的列表框。要求程序运行后,如果多次单击列表框中的项,则可同时选择这些项。而如果单击“显示”按钮,则在窗体上输出所有选中的列表项,如下图所示。要求:修改列表框的适当属性,使得运行时可以多选;去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序中的其他部分。最后把修改过的程序按原名保存。
窗体上有一个命令按钮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的命令按钮,编写如下程序:程序运行后,单击命令按钮,输出的结果是_________。