代码搜索：MsgBox
找到约 3,543 项符合「MsgBox」的源代码
代码结果 3,543
www.eeworm.com/read/305851/13759988
frm frmyasuo.frm
VERSION 5.00
Begin VB.Form frmyasuo
Caption = "Form1"
ClientHeight = 3180
ClientLeft = 60
ClientTop = 450
ClientWidth = 4770
LinkTopic
www.eeworm.com/read/305727/13762598
frm frmgetsv.frm
VERSION 5.00
Begin VB.Form frmGetSv
BorderStyle = 0 'None
Caption = "服务器加载中..."
ClientHeight = 1185
ClientLeft = 0
ClientTop = 0
ClientWi
www.eeworm.com/read/305500/13767142
sbs createobject函数示例.sbs
Sub Main
Dim App As Object
Set App = CreateObject("Word.Basic")
MsgBox App.[Time$]()
Set App = Nothing
End Sub
www.eeworm.com/read/304772/13787240
frm frmaddtitle.frm
VERSION 5.00
Begin VB.Form FrmAddTitle
Caption = "增加新书种界面"
ClientHeight = 2175
ClientLeft = 60
ClientTop = 450
ClientWidth = 9900
LinkTopi
www.eeworm.com/read/301229/13863211
frm frmclean.frm
VERSION 5.00
Begin VB.Form frmclean
Caption = "数据清理"
ClientHeight = 3090
ClientLeft = 60
ClientTop = 450
ClientWidth = 4680
LinkTopic
www.eeworm.com/read/301229/13863224
frm frmyasuo.frm
VERSION 5.00
Begin VB.Form frmyasuo
Caption = "Form1"
ClientHeight = 3180
ClientLeft = 60
ClientTop = 450
ClientWidth = 4770
LinkTopic
www.eeworm.com/read/136023/13878046
frm 密码修改.frm
VERSION 5.00
Begin VB.Form frmpassword
Caption = "密码修改"
ClientHeight = 3975
ClientLeft = 5115
ClientTop = 5745
ClientWidth = 5520
Icon
www.eeworm.com/read/137781/5818142
bas errhand.bas
' errhand.bas
Sub Main ()
Dim dvm As Integer
Dim res As Double
On Error GoTo ErrorHandler
dvm = iopen("hpib7,16")
Call itimeout(dvm, 10000)
argcount = ivprintf(dvm, "ME