代码搜索：MsgBox
找到约 3,543 项符合「MsgBox」的源代码
代码结果 3,543
www.eeworm.com/read/383272/8958425
vb dboperation.vb
Public Class DBOperation
Shared Function DBOperate(ByVal SQLString As String) As DataTable
' Try
Dim oleconn As New OleDb.OleDbConnection(CONN)
Dim cmd As OleDb.OleDbC
www.eeworm.com/read/283589/9003263
frm form2.frm
VERSION 5.00
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Begin VB.Form frmAddGrade
BackColor = &H00C0C0C0&
Caption = "Form2"
ClientHeight
www.eeworm.com/read/185574/9029108
frm frmappendfromother.frm
VERSION 5.00
Begin VB.Form frmAppendFromOther
BorderStyle = 3 'Fixed Dialog
Caption = "数据追加"
ClientHeight = 2805
ClientLeft = 2760
ClientTop =
www.eeworm.com/read/185574/9030163
frm frmobjmanipulate.frm
VERSION 5.00
Begin VB.Form frmObjManipulate
BorderStyle = 3 'Fixed Dialog
Caption = "对象操作"
ClientHeight = 2640
ClientLeft = 45
ClientTop = 33
www.eeworm.com/read/281323/9164148
vbs changetime.vbs
Flag=0
TimeGetF=100
TimeNum=TimeGetF*60
Sub ChangeTime()
TimeNum=TimeNum-1
TimeNumF=TimeNum\60
TimeNumM=TimeNum mod 60
if TimeNumF
www.eeworm.com/read/378632/9222044
txt 新建 文本文档.txt
“退出”按钮单击事件
Private sub cmd cancale_click()
Unload Me
End Sub
检查数据服务器是否存在的指定的别名
Function chechAlias(s As String) As Boolean
On Error GoTo AliasErr
Dim Retvalue As Long
Dim KeyId As Long
www.eeworm.com/read/378499/9228495
frm thyj.frm
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{50CBA22D-9024-11D1-AD8F-8E94A5273767}#8.6#0"; "TRANIMG2.OCX"
Begin VB.Form THYJ
BorderStyle
www.eeworm.com/read/378499/9228571
frm restore.frm
VERSION 5.00
Begin VB.Form RESTORE
Caption = "数据恢复"
ClientHeight = 4035
ClientLeft = 60
ClientTop = 345
ClientWidth = 6720
Icon
www.eeworm.com/read/378499/9228692
frm backup.frm
VERSION 5.00
Begin VB.Form BACKUP
Caption = "数据备份"
ClientHeight = 3450
ClientLeft = 60
ClientTop = 345
ClientWidth = 5490
Icon
www.eeworm.com/read/375879/9345861
cls clsopmtype.cls
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject