1.新建一个文件夹——用于存放Excel文件和Vb启动画面文件。
2.打开VB——新建一个 标准EXE。
3.设置Form1用户窗体的显示属性——Borderstyle、StartupPositio等。
<1>Borderstyle=0-none 去掉form1的标题栏
<2>StartupPositio=2 设置在屏幕中央显示窗口
<3>Icon 如果需要设置图标可以设置这个属性(可以不设置)
4.建立打开Excel文件的控件——这步是最重要的,也是Vb打开Excel的原理所在!添加一个Timer控件,将其Interval设为600(袜羡带控制窗口显示的时间),双击Timer控件,在出现的代码窗口中输入以下代码:
Private Sub Timer1_Timer()
Dim Exl As Object' 建立一个对象变量
Set Exl = CreateObject("Excel.Application") ' 设置对象派信为Excel(你可以通过修改这里,实现用VB打开其他类型文件)
Exl.Workbooks.Open (App.Path &"\" &"多用户登录.xls") ' 链接 EXCEL 文件
Exl.Visible = True
Unload Me
End Sub
5.生成EXE文件——命令在“文件”菜单中,将生成EXE文件保存到 1. 中建立的文件夹。
可以,VBA编写的程序都可以执行,但是必须在EXCEL、WORD环境下执行,不能独立执行。裤槐编写独立执行渗纯扰的程序需要使用VB,可以编译丛旦为一个EXE文件,这个文件可以在任何地方鼠标双击执行。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)