代码搜索：msgbox
找到约 3,543 项符合「msgbox」的源代码
代码结果 3,543
www.eeworm.com/read/105274/15672602
c undelwinc.c
/*
* $Id: UndelWinC.C,v 1.3 2000/08/07 11:05:17 evgeny Exp $
*
* Copyright (c) 1993 HAL Computer Systems International, Ltd.
*
* HAL COMPUTER SYSTEMS INTERNATIONAL, LTD.
*
www.eeworm.com/read/104456/15691897
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/104456/15691903
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/104456/15691906
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/104456/15691907
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/104456/15691908
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
www.eeworm.com/read/104456/15691909
bas nlaitkenmainmodule.bas
Attribute VB_Name = "MainModule"
Sub Main()
Dim n As Integer
Dim x As Double
' 迭代初值
x = 0
'求解
n = NLAitkenRoot(x, 60, 0.000001)
If n > 0 Then
www.eeworm.com/read/104456/15691915
bas nlnewtonrootmainmodule.bas
Attribute VB_Name = "MainModule"
Sub Main()
Dim n As Integer
Dim x As Double
' 迭代初值
x = 1.5
'求解
n = NLNewtonRoot(x, 60, 0.000001)
If n >= 0
www.eeworm.com/read/104456/15691925
bas nlqrrootmainmodule.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/104024/15712147
ί
VERSION 5.00
Begin VB.Form Dialog
BorderStyle = 3 'Fixed Dialog
Caption = "打开"
ClientHeight = 3540
ClientLeft = 2760
ClientTop = 3750
Cli