请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 在名称为Form1的窗体上画一个列表框,其名称为List1,通过属性窗口向列表框中输入9个项目,分别为10、20、30、40、50、60、70、80、90;画一个文本框,其名

admin2016-01-31  26

问题 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
在名称为Form1的窗体上画一个列表框,其名称为List1,通过属性窗口向列表框中输入9个项目,分别为10、20、30、40、50、60、70、80、90;画一个文本框,其名称为Text1,初始内容为空白;再画一个水平滚动条,其名称为HScroll1,Min属性和Max属性分别为0和100,如图3-2(a)所示,编写适当的事件过程。程序运行后,如果单击列表框中的某个项目,则在文本框中显示该项目内容,并把滚动条的滚动框移到相应的位置,如图3-2(b)所示。
    要求:不得使用任何变量。
    注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
   

选项

答案审题分析 列表框的Text属性用于返回列表框中选择的项目的内容,返回值总与列表框的List(ListIndex)属性的返回值相同。本题需要在列表框的属性窗口中输入列表框中的项目,然后在列表框的单击事件中将选定项赋值给文本框和滚动条的Value属性。 操作步骤 步骤1:新建一个“标准EXE”工程,在窗体上画一个列表框、一个文本框和一个水平滚动条,按表4-2设置其相关属性。 [*] 步骤2:在打开的代码编辑窗口中,编写列表框的单击事件代码: 参考代码: Private Sub List1_Click() Text1.Text=List1.Text HScroll1.Value=Val(List1.Text) End Sub 步骤3:按要求将文件保存至考生文件夹中。 考点链接 选择控件、滚动条。

解析
转载请注明原文地址:https://kaotiyun.com/show/ErLp777K
0

随机试题
最新回复(0)