易截截图软件、单文件、免安装、纯绿色、仅160KB

VB/VB.Net如何实现用Label在不同位置移动的效果？

还记得上微软网站更新系统补丁时，每当勾选一个升级项时，在当前勾选的位置会出现一个带文字的黑框平滑的飞向已选数量的位置上并加1，当取消勾选时以相反的方向从已选数量的位置上飞回并减1，这个效果动感有个性，现在我想在VB也想实现这种效果，请问用VB如何实现？用什么算法？

请各位大虾帮帮忙，VB6或VB.Net都可以！
直接用GDI函数对屏幕DC操作。
引用
直接用GDI函数对屏幕DC操作。

如何实现？
用shape控件模拟。但要注意：check控件只显示一个钩选框，其显示内容用另外的label实现。
引用
用shape控件模拟。但要注意：check控件只显示一个钩选框，其显示内容用另外的label实现。


不知怎样实现，能否给出示例代码吗？或思路、算法也可以！
GDI不懂，简单的用Move命令来实现，大致如下：
VB code:
Option Explicit
Dim lngL As Long
Dim lngT As Long
Dim lngW As Long
Dim lngH As Long
Private Sub Command1_Click()
Do
lngT = lngT + 2
lblMove.Move lngL, lngT
DoEvents
Loop Until lblMove.Top >= 3000
End Sub

Private Sub Form_Load()
With lblMove
.Left = 0
.Top = 0
lngL = .Left
lngT = .Top
lngW = .Width
lngH = .Height
End With
End Sub


要是移动效果平滑些，可在循环中加上Sleep函数，效果会更好
楼上的


相关问答：

VB中有无TApplication对应类型

我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用?
你好，用instance不是就可以了&# ......

VB 获取网页源代码

一个查询某信息的ASP网页，提交采用的是post方法，查找结果的网页必须右键点击“查看源文件”才能看到真正查询结果网页的源代码，用浏览器菜单看到的是查询前的源代码
用VB有什么办法可以获取到这个查询后的源代� ......

vb如何调用Illustrator（此前Illustrator未启动）？

请教一下：我用vb写了一个调用Illustrator的测试程序，代码很简单：Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......

vb中可选参数的问题

function multi(a as integer,b as integer,optional third)
  dim n as integer
  n = a * b
if not ismissing (third) then
    n = n * thid
end if
multi = n
end fu ......

怎樣優化VB程式

由于窗體的增多；
明顯感覺程式運行慢了；
怎樣優化；
优化你的程序逻辑，比如将不用的窗体及时Unload，将不用的对象及时释放

引用
优化你的程序逻辑，比如将不用 ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号