代码搜索：MsgBox
找到约 3,543 项符合「MsgBox」的源代码
代码结果 3,543
www.eeworm.com/read/324996/13234024
frm frmland.frm
VERSION 5.00
Begin VB.Form frmLand
BackColor = &H00404040&
Caption = "登陆"
ClientHeight = 4620
ClientLeft = 60
ClientTop = 450
ClientWidt
www.eeworm.com/read/324996/13234027
bas 备份.bas
Attribute VB_Name = "备份"
'
' If getDB Then '如果 weboy 数据库存在，则...
' If getUsersTable And getConsumersTable Then '如果 users 表及 consumer 表存在，则...
'
www.eeworm.com/read/137347/13327680
frm borrow.frm
VERSION 5.00
Begin VB.Form Form2
BorderStyle = 1 'Fixed Single
Caption = "借书"
ClientHeight = 1665
ClientLeft = 45
ClientTop = 330
ClientW
www.eeworm.com/read/321362/13408224
cls clsopmtype.cls
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
www.eeworm.com/read/317458/13504565
frm form5.frm
VERSION 5.00
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomct2.ocx"
Begin VB.Form form5
BackColor = &H80000008&
BorderStyle = 0 'None
Caption =
www.eeworm.com/read/317062/13511028
vb clsdboperation.vb
Public Class ClsDBOperation
Shared Function DBOperate(ByVal SQLString As String) As DataTable
Try
Dim CONN As String
CONN = "Provider=Microsoft.Jet.OLEDB.4.0;P
www.eeworm.com/read/316664/13519003
frm form2.frm
VERSION 5.00
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Begin VB.Form frmAddGrade
BackColor = &H00C0C0C0&
Caption = "成绩录入"
ClientHeight
www.eeworm.com/read/316093/13530421
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/315738/13537263
vbs changetime.vbs
Flag=0
TimeGetF=100
TimeNum=TimeGetF*60
Sub ChangeTime()
TimeNum=TimeNum-1
TimeNumF=TimeNum\60
TimeNumM=TimeNum mod 60
if TimeNumF