还是挺简单的。步骤如下。
在永康等地区，都构建了全面的区域性战略布局，加强发展的系统性、市场前瞻性、产品创新能力，以专注、极致的服务理念，为客户提供网站设计、成都网站建设 网站设计制作按需定制制作,公司网站建设,企业网站建设,成都品牌网站建设,成都全网营销,外贸营销网站建设,永康网站建设费用合理。
1)打开ppt。
2)打开“控件工具箱”， 步骤：菜单视图工具栏控件工具箱。
3)用控件工具箱画控件。
4)在控件上右键，通过“属性”命令设置每一个控件的属性。
5)在某一个控件上右击，选择“查看代码”，这时就出现了Visual Basic窗口。
6)现在你可以像在VB里编写程序一样，来编写每一个控件的代码。
在这里，每一张幻灯片就是一个对象，它的级别和窗体相当。幻灯片上的控件是幻灯片对象的子控件。
步骤就是这样。下面我举一个例子。
新建ppt.
在幻灯片1上画一个CommandButton,一个Label。
将CommandButton1的Caption属性设置为"生成随机数",Label1的Caption属性设置为空白。
在CommandButton1控件上右击，进入Visual Basic界面，编写代码：
Private Sub CommandButton1_Click()
Slide1.Label1.Caption = Int(Rnd * 100 + 1)
End Sub
这句代码可以生成一个1到100之间的随机整数，并把它输出到label1。
还要注意一点，这里编写的VB程序实际上就是“宏”。很多人把病毒编写为宏，随着用户打开ppt文档，病毒就进入了你的电脑。所以为了安全，很多人都把宏禁用了。但是宏如果被禁用了，那么我们刚才编写的程序就不起作用了。所以我们还应该启用宏，方法是ppt中的工具选项菜单，“安全性”选项卡，“宏安全性”按钮，在弹出的“安全性”窗口中就可以设置宏的安全级别。
————
我都写了这么多了，觉得好就给分吧 ^_^
体是Windows应用程序的基础 新一代的开发工具Visual Basic Net为设计制作窗体提供了更多简单而丰富的方法 无需再求助于复杂而易错的API函数 我们就可以轻松制作多种特效窗体 轻松制作透明窗体VB NET可以轻松制作出任一透明度的窗体 我们只要在窗体的 属性 窗口中 将 Opacity 属性设置为一个介于 （完全透明）与 （完全不透明）之间的值就可以了 Dim frm As FrmTrans = New FrmTrans()frm Opacity = frm ShowDialog() 轻松制作始终位于最上层的窗体在VB 中 要制作一个始终位于最上层的窗体我们只能求助于令人头痛的API函数 然而在 NET 中 我们只要简单设置窗体的 TopMost 属性就可实现同样效果了！例如 Dim frm As frmTopMost = New frmTopMost()frm TopMost = Truefrm Show() 轻松制作不可见的窗体如果要编写一个不让别人发现的隐藏程序 制作不可见的窗体就是必须实现的第一步 窗体的可见性通常由 Visible 属性控制 但是 如果希望 Windows 应用程序的主窗体在应用程序启动时不可见 您将会发现将它的 Visible 属性设置为 False 的方法无效 窗体总会自己显示出来（这是因为 启动窗体的生存期决定了应用程序的生存期） 虽然如此 我们还是可以通过简单将应用程序的启动设置为一个模块 从而从窗体的生存期分出应用程序的生存期 轻松实现不可见的窗体 在下面这个例子中 窗体在特定的时间内自动隐藏 （ ）在 Visual Basic 中 右击项目并选择 添加模块 以将模块添加到 Windows 应用程序 （ ）在已添加的模块（或类）内 创建可作为项目启动对象的 Main 函数 Sub main()Dim f As New Form ()f Visible = FalseWhile Hour(Date Now) 如果当前时间早于 点 窗体自动隐藏Application DoEvents()End Whilef ShowDialog()End Sub 轻松编写托盘程序托盘程序作为一类特殊的窗体 其快捷图标显示在系统托盘中 窗体本身则隐藏不可见 在 NET之前版本的VB中编写托盘程序是十分困难的 但是VB NET提供的新的NotifyIcon组件却使VB初学者也能轻松编写一个这样的程序 新建 Windows应用程序 设置主窗体Opacity属性为 FormBorderStyle属性为None ShowInTaskbar属性为False 这样窗体将在启动后隐藏 在窗体上放置一个NotifyIcon组件NotifyIcon 一个ContextMenu（弹出菜单）组件ContextMenu 并根据需要为ContextMenu 添加菜单项 设置NotifyIcon 的ICON属性 这个图标就是应用程序出现在系统托盘中的快捷图标 设置NotifyIcon 的Text属性为 VB NET托盘程序 这就是鼠标移动到托盘图标时弹出的文字说明 设置NotifyIcon 的ContextMenu属性为ContextMenu 也就是右键单击快捷图标时的弹出菜单为ContextMenu OK 按F 运行！几乎不用编写代码 一个托盘程序就这样轻松实现了 lishixinzhi/Article/program/net/201311/13831
只是picturebox支持而已...
把gif每帧都单独存成一张图片，加个timer不断更换treeview节点显示的图片，用来实现简单的动画是够了。
很简单啊，软糖给你代码
For i = 1 To 9999
Dim 名称 As String = String.Format("Img{0}.png", 编号) '会返回Img1.png,Img2.png...
picturebox1.Image = Bitmap.FromFile(名称)
Next
满意请采纳，谢谢。
