代码搜索：msgbox
找到约 3,543 项符合「msgbox」的源代码
代码结果 3,543
www.eeworm.com/read/242302/13076753
txt 如何判断某一窗体是否被装载.txt
可 以 访 问 Forms集 合 ， 这 个 集 合 中 包 括 了 所 有 已 经 装 载 的 窗 体 ， 如 ：
For i = 0 To Forms.Count - 1
If Forms(i).Caption = "欢 迎 " Then
MsgBox "欢 迎 窗 体 已 经 加 载 ！ "
End If
Next
www.eeworm.com/read/242302/13078266
txt 如何检测指定目录下的指定文件是否存在.txt
用 Dir函 数 ， 如 果 函 数 返 回 为 空 字 符 串 则 文 件 不 存 在 ， 如 ：
If Dir("C:\Win95\My.txt") = "" Then MsgBox "文 件 不 存 在 。 "
www.eeworm.com/read/324682/13252696
frm c1.frm
VERSION 5.00
Begin VB.Form c1
BackColor = &H00FF8080&
BorderStyle = 1 'Fixed Single
Caption = "管理员登陆"
ClientHeight = 3600
ClientLeft = 5790
www.eeworm.com/read/321842/13396487
bas main.bas
Attribute VB_Name = "Module1"
Option Explicit
Public mw As String
Sub main()
Dim i As Integer, pas(7) As String
Dim zb As Database
Dim re As Recordset
Set zb = OpenDatabase(App.Path + "/zb.mdb"
www.eeworm.com/read/317630/13500564
htm 165.htm
建立你自己的浏览器－发送到软盘
1. Add an Inet Control ( Component – Microsoft Internet Transfer Control )
2. Add these line into your Click Event
Dim ss As Strin
www.eeworm.com/read/482825/6613846
bas main.bas
Attribute VB_Name = "Module1"
Option Explicit
Public mw As String
Sub main()
Dim i As Integer, pas(7) As String
Dim zb As Database
Dim re As Recordset
Set zb = OpenDatabase(App.Path + "/zb.mdb"
www.eeworm.com/read/479849/6681222
bas modbase.bas
Attribute VB_Name = "ModBase"
Option Explicit
Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
www.eeworm.com/read/346740/11726518
htm 165.htm
建立你自己的浏览器－发送到软盘
1. Add an Inet Control ( Component – Microsoft Internet Transfer Control )
2. Add these line into your Click Event
Dim ss As Strin
www.eeworm.com/read/151211/12227524
txt 38.txt
加速Visual Basic For Application(VBA)
如今的CPU的发展是越来越快，从386、486到今天的Pentium、Pentium Ⅱ，发展速度可谓快矣。然而，在CPU高速发展的同时，应用软件的“体重”也随之猛涨，从我学电脑时的几K、几十K ，到今天的几十兆、几百兆，这变化连我自己都感到吃惊。CPU的进步，使人们工作更加快速，效率大增，同时也养成了人们“不求简”的不良 ...
www.eeworm.com/read/128708/14280910
mac simple2.mac
MsgBox "Hello world!",vbInformation,"Script Control - VBScript"