窗体上有一个名称为Combol的组合框,一个名称为Commandl的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编

admin2020-04-18  26

问题 窗体上有一个名称为Combol的组合框,一个名称为Commandl的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编写如下程序,以期实现上述功能:
flag=0
For i=0 To Combol.ListCount=1
If strl=Combol.List(i)Then
flag=1
End If
End If
程序中存在问题,以下关于程序问题的叙述中,正确的是

选项 A、For循环的循环初值i应该从1开始
B、语句Combol.RemoveItem i有错误
C、语句Combol.AddItem Combol.Text有错,Combol.Text的内容己存在于组合框中
D、应把程序倒数第3行中的Ifflag=1改为If flag=0

答案D

解析 本题中首先用一个循环遍历组合框的所有列表项,依次取出每一个列表项与str1进行比较,若相同则删除该项,将flag置为1,否则flag为0;循环结束后如果flag的值为0则说明没有任何一个现有的列表项与str1相同,需要将str1添加到组合框中,否则不需添加。
转载请注明原文地址:https://jikaoti.com/ti/b3x0FFFM
0

最新回复(0)