有一个工程文件ylc6.vbp,请在窗体中画一个组合框和一个命令按钮。程序的功能是在运行时,如果在组合框中输入一个项目并单击命令按钮,则搜索组合框中的项目;如果已有此项,则弹出提示:“已有此项”,之后清除输入的内容。界面如图20所示。注意:存盘时必须存放在考生文件夹下,工程文件名为ylc6.vbp,窗体文件名为ylc6.frm。

有一个工程文件ylc6.vbp,请在窗体中画一个组合框和一个命令按钮。程序的功能是在运行时,如果在组合框中输入一个项目并单击命令按钮,则搜索组合框中的项目;如果已有此项,则弹出提示:“已有此项”,之后清除输入的内容。界面如图20所示。

注意:存盘时必须存放在考生文件夹下,工程文件名为ylc6.vbp,窗体文件名为ylc6.frm。


相关考题:

在窗体上有一个命令按钮和一个文本框。编写如下事件过程:Private Sub Command1_Click()a=InputBox("请输入一个整数")Text1.Text=aIf a > 0 ThenIf a Mod 3 = 0 ThenMsgBox "True"ElseMsgBox "error"End IfEnd IfEnd Sub程序运行后,单击命令按钮,在输入对话框里输入12,则弹出的提示内容是______。

( 10 ) 在窗体上画一个名称为 Combo1 的组合框 , 然后画两个名称分别为 Label1 、 Label2 , 标题分别为 “ 城市名称 ” 和空白的标签 。 程序运行后 , 在组合框中输入一个新项目并按回车键 , 如果输入的项目在组合框的列表中不存在 , 则自动将其添加到组合框的列表中 , 并在 Label2 中给出提示 “ 已成功添加新输入项,如图所示。如果输入的项目已存在,则在 Label2 中给出提示 “ 输入项已在组合中。请填空。

在窗体上画一个命令按钮,然后编写如下程序:Dim k As Longk=1Do While numLoopfun=kEnd FunctionPrivate Sub Command1_Click()Dim n As LongDim r As LongMsgBox rEnd Sub程序运行后,单击命令按钮,在输入对话框中输入234,消息框显示的结果为( )。

在窗体上画1个组合框(名称为Cbl,设置为简单组合框)和1个命令按钮(名称为C1,标题为“添加”),编写适当的事件过程。程序运行后,在组合框中输入一个列表项,单击命令按钮后,程序检查组合框的下拉列表,如果列表中没有此项,则把此项添加到列表中;如果有此项,则通过信息框提示“此项已存在”,并清除输入的内容。程序的运行情况如图2—1所示。存盘时,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。2.在窗体上画一个名称为L1的列表框,通过属性窗口向列表框中添加3个项目,分别为“123”、“456”和“789”。编写适当的事件过程。程序运行后,每次双击列表框中的任何一项,则总在最后面添加一项,该项的内容为前面所有项之和。程序的运行情况如图2—2所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sjt4.frm,工程文件名为sjr4.vbp。

在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:程序运行后,单击命令按钮,将显示一个输入对话框,如果在对话框中输入25,则程序的执行结果是( )。A. 输出0B. 输出25C. 输出45D. 无任何输出

在窗体上画一个命令按钮和一个文本框,其名称分别为Commandl和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程: Private Sub Commandl_Ciick() a=InputBox("Enter an integer") b=InputBox("Enter an integer") Text1.Text=b+a End Sub 程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示的内容是______。A. 108B.18C.810D.出错

在考生文件夹中有一个工程文件execise88.vbp及窗体文件exeeise88.frm。在名称为 Form1的贸体中有一个组合框和一个命令按钮,如下图所示。在运行程序时,如果在组合框中输入一个项目并单击命令按钮,则搜索组合框中的项目,如果没有此项,则把此项添加到列表中;如果有此项,则弹出提示: “已有此项”,然后清除输入的内容。要求:去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分,也不得修改控件的属性。最后原名保存修改后的文件。

在考生文件夹中有一个工程文件execise38.vbp,相应的窗体文件名为execise38.frm。在名为Form1的窗体中有一个组合框和一个命令按钮,如下图所示。程序的功能是:在运行时,如果在组合框中输入一个项目并单击命令按钮,则搜索组合框中的项目,如果没有此项,则把此项添加到列表中;如果有此项,则弹出提示:“此项已存在”,然后清除输入的内容。要求:去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分,也不得修改控件的属性。最后原名保存修改后的文件。

在名为Form1的窗体上绘制一个名称为Lab1、标题为“AddItem:”的标签;绘制一个名称为Text1的文本框,没有初始内容;绘制一个名称为Com1的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意):再绘制两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为Add和Display。在运行时,向Text1中输入字符,单击Add按钮后,则Text1中的内容作为一个列表项被添加到组合框的列表中:单击Display按钮,则在窗体上显示组合框中列表项的个数,如下图所示。请编写两个命令按钮的Click事件过程。注意:程序中不得使用变量,也不能使用循环;文件必须存放在考生文件夹中,工程文件名为execise13.vbp,窗体文件名为execise13.frm。