请根据以下各小题的要求设计Visaul Basic应用程序(包括界面和代码)。 1.在窗体(名称为Form1)上画1个列表框(名称为L1)和1个水平滚动条(名称为HS1,Min属性为0,Max属性为100,SmallChange属性为2,LargeChan

admin2012-10-09  27

问题 请根据以下各小题的要求设计Visaul Basic应用程序(包括界面和代码)。
1.在窗体(名称为Form1)上画1个列表框(名称为L1)和1个水平滚动条(名称为HS1,Min属性为0,Max属性为100,SmallChange属性为2,LargeChange属性为10),编写适当的事件过程。程序运行后,如果把滚动框移到某个位置,然后单击窗体,则在列表框中显示“滚动条的当前值是:xx”,如图1—1所示,其中xx是滚动框所在的位置。
存盘时,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
2.在名称为Form1的窗体上画一个文体框,其名称为Text1,然后通过属性窗口设置窗体和文本框的属性,实现如下功能:
1)在文本框中可以显示多行文本
2)在文本框中显示垂直滚动条
3)文本框中显示的初始信息为“程序设计”
4)在文本框中显示的字体为三号规则黑体
5)窗体的标题为“设置文本框属性”。完成设置后的窗体如图1—2所示。
要求:不编写任何代码。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。

选项

答案按以下步骤操作: ① 启动Visual Basic,在窗体上画1个水平滚动条和1个列表框。 ② 按F4键,激活属性窗口,在属性窗口中设置滚动条和列表框的属性,见表1。 [*] ③ 编写窗体的Click事件过程; Private Sub Form_Click() L1.AddItem"滚动条的当前值是:" &HS1. Value End Sub 2.① 对象主要属性设置如表2所示。 [*] ② 分析:按试题要求在窗体上画出一个文本框,并分别将它们属性按表2的内容进行设置。MultiLine属性设置为True,文本框显示多行文本;SerollBar属性设置为2,文本框显示垂直滚动条;设置Text属性中的内容为初始信息;用FontName和FontSize属性分别设置文本框的字型和字号;Caption属性设置窗体标题的内容。 ③ 编程代码:(无)

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

最新回复(0)