网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

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


参考答案

更多 “ ( 10 ) 在窗体上画一个名称为 Combo1 的组合框 , 然后画两个名称分别为 Label1 、 Label2 , 标题分别为 “ 城市名称 ” 和空白的标签 。 程序运行后 , 在组合框中输入一个新项目并按回车键 , 如果输入的项目在组合框的列表中不存在 , 则自动将其添加到组合框的列表中 , 并在 Label2 中给出提示 “ 已成功添加新输入项,如图所示。如果输入的项目已存在,则在 Label2 中给出提示 “ 输入项已在组合中。请填空。 ” 相关考题
考题 ●试题五阅读以下应用说明及Visual Basic部分程序代码,将应填入(n)处的字句写在答题纸的对应栏内。【说明】在窗体上画一个名称为Combo1的组合框,画两个名称分别Label1、Label2及Caption属性分别为"城市名称"和空白的标签。程序运行后,当在组合框中输入一个新项后按回车键(ASCII码为13)时,如果输入的项在组合框的列表中不存在,则自动添加到组合框的列表中,并在Label2中给出提示"已成功添加输入项";如果存在,则在Label2中给出提示"输入项已在组合框中"。【程序】Private Sub Combo1_ (1) (KeyAscii As Integer)If KeyAscii= (2) ThenFor i=0 To (3)If Combo1.Text= (4) ThenLabel2.Caption="输入项已在组合框中"Exit SubEnd IfNext iLabel2.Caption="已成功添加输入项"Combo1. (5) Combo1.TextEnd IfEnd Sub

考题 在窗体上画一个名称为 Combo1 的组合框,然后画两个名称分别为 Label1 、 Label2 ,标题分别为 \" 城市名称 \" 和空白的标签。程序运行后,在组合框中输入一个新项目并按回车键,如果输入的项目在组合框的列表中不存在,则自动将其添加到组合框的列表中,并在 Label2 中给出提示 \" 已成功添加新输入页。 \" ,如图所示。如果输入的项目已存在,则在 Label2 中给出提示 \" 输入项已在组合框中。 \" 。请填空。Private Sub Combol_KeyPress(KeyAscii As Integer)If KeyAscii=13 ThenFor i=0 To Combo1  ListCount-1If Combo1  Text= 【 12 】 ThenLabel2  Caption=" 输入项已在组合框中。 "Exit SubEnd IfNext iLabel2  Caption=" 已成功添加新输入项。 "Combo1 ______ Combo1 TextEnd IfEnd Sub

考题 (13)在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名称分别为Label1、Label2.要求程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下的标签中显示出来,请填空使程序完整。Private Sub Combo1_Click() Call ShowItem(Combo1,Label1) End SubPrivate Sub Combo2_Click() Call ShowItem(Combo2,Label2)End SubPrivate Sub ShowItem(tmpCombo As ComboBox,tmpLabel As Label) Caption=_____.TextEnd Sub

考题 在窗体上画一个名称为Combol的组合框,然后画两个名称分别为Label1、Label2,标题分别为“城市名称”和空白的标签。程序运行后,在组合框中输入一个新项目并按回车键,如果输入的项目在组合框的列表中不存在,则自动将其添加到组合框的列表中,并在Label2中给出提示“已成功添加新输入项。”,如图所示。如果输入的项目已存在,则在Label2中给出提示“输入项已在组合框中。”。请填空。Private Sub Combo1_KeyPress(KeyAscii As Integer)If KeyAscii=13 ThenFor i=0 To Combo1.ListCount-1If Combo1.Text=【 】ThenLabel2.Caption="输入项已在组合框中。"Exit SubEnd IfNext iLabel2.Caption="已成功添加新输入项。"Combo1.【 】Combo1.TextEnd IfEnd Sub

考题 在窗体上有一个名称为Drivel的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分别为Label1、Label2的标签(标题分别为空白和“共有文件”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化,并且在标签Label1中显示当前文件夹中文件的数量。下列能够正确实现上述功能的程序是( )。

考题 在窗体上画两个名称分别为Label1和Label2的标签,再画一个名称为Command1的命令按钮,然后编写如下事件过程:运行上面的程序,单击命令按钮.其输出结果是A.8 9B.8 18C.64 9D.64 18

考题 在名称为Form1的窗体上画两个标签(名称分别为Label1和Label2,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Textl和Text2,初始内容均为空)和一个命令按钮(名称为Command1,标题为“显示”)。然后编写命令按钮的Click事件过程。程序运行后,在两个文本框中分别输人姓名和年龄,然后单击“显示”按钮,则在窗体上显示两个文本框中的内容,如图所示。要求程序中不得使用任何变量。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjtl.vbp,窗体文件名保存为sjtl.frm。

考题 (1)在名为Form1的窗体上绘制两个标签(名称分别为Label1和Label2,标题分别为“长”和“宽”)、两个文本框(名称分别为Text1和Text2,Text属性均为空白)和一个命令按钮(名称为Command1,标题为“输入”)。编写命令按钮的Click事件过程,使程序运行后,若单击命令按钮,则先后显示两个“输入”对话框,在两个“输入”对话框中分别输入长和宽,并分别在两个文本框中显示出来,运行后的窗体如图21-1所示。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为sj1.vbp,窗体文件名为sj1.frm。(2)在名为Form1的窗体上绘制一个标签(名称为Label1,标题为“输入”)、一个文本框(名称为Text1,Text属性为空白)和一个命令按钮(名称为Command1,标题为“显示”)。请编写命令按钮的Click事件过程,使程序运行后,在文本框中输入内容,然后单击命令按钮,则标签和文本框消失,并在窗体上显示文本框中的内容。运行后的窗体如图21-2和图21-3所示。注意:要求程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为Sj2.vbp,窗体文件名为sj2.frm。

考题 在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名称分别为Label1、Label2,如图所示,程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下面的标签中显示出来。请填空。Private Sub Combo1_Click()Call ShowItem(Combo1, Label1)End SubPrivate Sub Combo2_Click()Call ShowItem(Combo2, Label2)End SubPublic Sub ShowItem(tmpCombo As ComboBox, tmpLabel As Label)______.Caption =______.TextEnd Sub