代码搜索：msgbox
找到约 3,543 项符合「msgbox」的源代码
代码结果 3,543
www.eeworm.com/read/397917/8016315
frm form5.frm
VERSION 5.00
Object = "{CFA7AFF4-3242-4269-9172-7389D695AE01}#1.0#0"; "StoneXP.ocx"
Object = "{DAAC6951-59A4-4C08-9D6E-FE3919B64861}#1.0#0"; "FlexCell.ocx"
Begin VB.Form Form5
BorderStyle
www.eeworm.com/read/296761/8078619
txt readme.txt
/************************************************************************
亿号通第三方短信通道COM接口
作者：WLB
版本：1.0
时间：2005-8-25
相关使用说明：
1、InitClientSm初始化开发包
szServerIP 连接的服务器IP
iPort 连接
www.eeworm.com/read/196203/8110800
frm frmcnn.frm
VERSION 5.00
Begin VB.Form FrmCnn
BackColor = &H00FFC0C0&
BorderStyle = 1 'Fixed Single
Caption = "连接服务器"
ClientHeight = 2070
ClientLeft = 57
www.eeworm.com/read/296211/8117866
frm frmdenglu.frm
VERSION 5.00
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Begin VB.Form frmDengLu
BorderStyle = 3 'Fixed Dialog
Caption = "登录"
ClientHeight
www.eeworm.com/read/295834/8137731
frm changepass.frm
VERSION 5.00
Begin VB.Form changepass
Caption = "修改密码"
ClientHeight = 4755
ClientLeft = 60
ClientTop = 390
ClientWidth = 5670
LinkTopic
www.eeworm.com/read/295834/8137797
frm frmzg.frm
VERSION 5.00
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Begin VB.Form frmzg
Caption = "增加固定资产记录"
ClientHeight = 5625
ClientLeft = 60
www.eeworm.com/read/295834/8137863
frm imjl.frm
VERSION 5.00
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Begin VB.Form imjl
Caption = "修改记录"
ClientHeight = 5400
ClientLeft = 60
Cl
www.eeworm.com/read/146081/12677857
frx frmmodal.frx
楾his is amodal form.Try clicking on any other
form in this project...the focus does not
shift. Also notice that the MsgBox hasn't
popped up yet.
www.eeworm.com/read/247151/12677980
bas moddboperate.bas
Attribute VB_Name = "modDbOperate"
'声明全局连接
Public CN As ADODB.Connection
'数据库链接打开
Public Sub dbConn()
On Error GoTo dbErr
Dim strConn As String
strConn = "PROVIDER=Microsoft.Jet.OLEDB.4
www.eeworm.com/read/146081/12678370
bas module1.bas
Attribute VB_Name = "Module1"
Public Document() As New frmChild
Public DocState() As Integer
Public Sub Quit()
Unload MDIForm1
End Sub
Public Sub DisplayModal()
frmModal.Show vbModal