第二步:点击开发工具菜单,在开发工具菜单下有控件工具栏,选择最后一个旧式工具,里面有一个文本框,点击选中后,在word界面就添加了一个文本框
第三步:添加后的文本调节到适用大小,点击右键(或在控件里点击)属性,在d出的对话框中,修改相应属性:
MultiLine
=
True(多行显示,不设此项回车不按行)
ScrollBars
=
3
-
fmScrollBarsBoth(滚动条,3是水平垂直滚动条都有)
WordWrap
=
False(自动换行,不改此项不会出现水平滚动条,因为换行了)
第四步:设置好后关闭d出框,然后关闭控件中的设计模式。
第五步:这样就可以在文本框中输入数据了,换行是要用Ctrl+Enter。这个是用JS脚本来实现,比较麻烦一些
但是现成的JS组件很多都有这个封装好的库调用的,比如YUIGOOGLE也提供JS库了
ASPNET AJAX现成的CollapsiblePanelExtender控件就是实现你所说功能的
PrivateSubCommand1_Click()
ListBoxAdditemText1Text
EndSub
按钮
Combo1AddItemText1
Combo1Text=Text1
扩展资料:
事件及说明:
(1)标题栏显示“鼠标点击”,窗体显示“欢迎来到VB”。
(2)双击鼠标事件。当程序运行时,双击表单中的一个位置将触发两个事件。第一次按下鼠标时,触发单击事件,第二次生成DblClick事件。
(3)初始化事件和加载事件。当程序运行时,当表单被加载到工作空间中时,它的加载事件会在表单启动后触发。因此,该事件通常用于在应用程序启动时初始化控制属性和变量。
(4)卸载事件。此事件在窗体卸载时触发。
(5)调整大小事件。当窗体大小发生变化时,将触发调整大小事件。
(6)激活和停用事件。激活,当一个对象成为活动窗口时发生。当窗体在程序运行过程中变为不活动时,对象成为一个不活动事件时,就发生了停用。
(7)MouseDown事件。当按下鼠标的任何键时发生
(8)MouseMove事件。当按下任何鼠标键并移动鼠标时发生。
(9)MouseUp事件。当释放任何鼠标键时发生。
方法和详细的 *** 作步骤如下:
1、第一步,启动VB60并创建一个标准项目,见下图,转到下面的步骤。
2、第二步,完成上述步骤后,右键单击表单,然后选择“菜单编辑器”选项,见下图,转到下面的步骤。
3、第三步,完成上述步骤后,输入标题和名称,并在标题括号中使用“&”调用此功能。
输入保存后,可以在下面的显示区域中看到编辑菜单的名称,见下图,转到下面的步骤。
4、第四步,完成上述步骤后,在已创建的菜单下单击,然后创建一个菜单,见下图,转到下面的步骤。
5、第五步,完成上述步骤后,无论创建的菜单是新创建的第一级子菜单还是第二级子菜单,都可以通过编辑区域上的箭头键来实现,单击右箭头按钮后可以看到,在第一级子菜单的前面有四个点,如果是第二级,点将增加到八个,见下图,转到下面的步骤。
6、第六步,完成上述步骤后,创建完成,只需确认即可,现在可以看到刚刚在表单上创建的下拉菜单,见下图。这样,就解决了这个问题了。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)