 |
 |
■ 加入收藏 ■ 加入收藏 ■ 联系我们 |
|
| 文字广告： ppp |
| 当前位置 > 软件教程 > 应用软件 > 图片处理 浅谈VB6.0中的实用技巧（二）
时间：2005-6-16 9:10:43 作者： 来源：大众软件网点击数：
利用VB的图片框实现屏幕的滚动
对于学习使用VB来编程的电脑爱好者来说，可能会遇到这样一个问题：就是如何实现屏幕的滚动，因为当要显示的内容超出了屏幕的大小后，利用VB所提供的垂直滚动条和水平滚动条等控件是不可能直接实现这一特殊显示功能的。那么有没有其它的办法呢?答案是肯定的。我们知道VB的图片框是用来显示图形的，但它还有许多其它用途，比如可以用来创建一些动画图形等。其实对于上面的问题我们也可以利用图片框来巧妙地解决。方法如下： 首先，单击工具框中的图片框(Picture Box)控件和命令按钮控件，在窗体(Form1)上建立图片框对象Picture1和命令按钮对象Command1，将命令按钮的Caption属性设置为"退出"，Picture1的大小设置为显示区域的大小，再单击工具框中的图片框控件，在Picture1上建立另一个图片框对象Picture2，将它的Left和Top属性设置为0。用文本框，标签框等其它控件或导入一幅图象在Picture2上设定具体的显示内容，当然Picture2的大小一定要先调整到能全部容纳所有要显示的内容，最后单击工具框中的垂直滚动条控件和水平滚动条控件，在窗体(Form1)上分别建立垂直滚动条对象VScroll1和水平滚动条对象HScroll1，并设置好它们的属性。至此在窗体(Form1)上的所有设置工作就完成了，下面是具体的程序代码： Private Sub VScroll1_Change() Picture2.Top= -VScroll1.Value End Sub Private Sub Hscroll1_Change() Picture2.Left= -HScroll1.Value End Sub Private Sub Command1_Click() End End Sub 运行程序，当按下横、竖滚动条时，就能使显示内容实现左右、上下的滚动。此方法简单易行，有兴趣的朋友不妨试一试。 VB中阴影字体的实现 Visual Basic确实是一种很不错的应用程序开发工具。笔者在使用中，也确实感到用VB设计程序，许多方法的实现是那么的简单。有时，仅仅需要几条语句，就可实现一种方法、效果或功能。下面就介绍一下，阴影字体在VB中的实现。程序如下： Private Sub Form－Click（） CurrentX＝700 CurrentY＝1000 FontSize＝30 ForeColor＝QBColor（8） Print”Software Weekly” CurrentX＝750 CurrentY＝1050 FontSize＝30 ForeColor＝QBColor（12） [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] [15] [16] [17] [18] [19] [20] [21] 下一页 |
|
|
|
|
|||||||||
