代码搜索:msgbox
找到约 3,543 项符合「msgbox」的源代码
代码结果 3,543
www.eeworm.com/read/253753/12201578
frm jibenxinxi.frm
VERSION 5.00
Begin VB.Form jibenxinxi
Caption = "基本信息"
ClientHeight = 7005
ClientLeft = 60
ClientTop = 345
ClientWidth = 7875
Icon
www.eeworm.com/read/151418/12212914
cls clsevaluatewizard.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/151211/12228338
txt 97.txt
怎样检查声卡的存在
'-------------------------------------------------------------------
'Author: Gordon F. MacLeod
'How to detect if a sound card exists on a system.
'----------------------
www.eeworm.com/read/151211/12228360
txt 54(1).txt
如何知道计算机是否安装声卡?
声明:
Private Declare Function waveOutGetNumDevs Lib "winmm.dll" () As Long
程序:
If waveOutGetNumDevs() Then
MsgBox "系统安装了声卡。", vbInformation
Else
M
www.eeworm.com/read/132173/14105876
txt readme.txt
在函数prn()里增加
On Error GoTo PRINT_ERR
.
.
.
PRINT_ERR:
MsgBox "错误"
www.eeworm.com/read/132050/14112456
bas nlnewtonamainmodule.bas
Attribute VB_Name = "MainModule"
Sub Main()
Dim n As Integer, nMaxIt As Integer
Dim t As Double, h As Double
Dim s As String
' 3次方程
n = 3
' 分配初值和解的内存
Re
www.eeworm.com/read/132050/14112469
bas nlpqrootmainmodule.bas
Attribute VB_Name = "MainModule"
Sub Main()
Dim x As Double
' 迭代初值
x = 1
'求解
If NLPqRoot(x, 0.000001) Then
MsgBox "x = " & x
Else
MsgBox "求
www.eeworm.com/read/132050/14112477
bas nlgradmainmodule.bas
Attribute VB_Name = "MainModule"
Sub Main()
Dim n As Integer, nMaxIt As Integer
Dim s As String
' 3次方程
n = 3
' 分配初值和解的内存
ReDim x(n) As Double
' 初值
www.eeworm.com/read/132050/14112480
bas nlndhcrootmainmodule.bas
Attribute VB_Name = "MainModule"
Sub Main()
Dim n As Integer
Dim s As String
' 5次方程
n = 5
' 分配存放系数和解的内存
ReDim ar(n + 1) As Double, ai(n + 1) As Double, xr(n)
www.eeworm.com/read/132050/14112483
bas nlmivmainmodule.bas
Attribute VB_Name = "MainModule"
Sub Main()
Dim n As Integer, m As Integer
Dim s As String
' 3个未知数
m = 3
' 2次方程
n = 2
' 分配初值和解的内存
ReDim x(n) As Dou