代码搜索：MsgBox
找到约 3,543 项符合「MsgBox」的源代码
代码结果 3,543
www.eeworm.com/read/155761/11850870
bas letridmainmodule.bas
Attribute VB_Name = "MainModule"
Sub Main()
Dim dblB(13) As Double, dblD(5) As Double
'系数矩阵
dblB(1) = 1
dblB(2) = 1
dblB(3) = 1
dblB(4) = 2
dblB(5) = 1
d
www.eeworm.com/read/155761/11850897
bas leseidelmainmodule.bas
Attribute VB_Name = "MainModule"
Sub Main()
Dim dblA(4, 4) As Double
Dim dblB(4) As Double
Dim x(4) As Double
'系数矩阵
'系数矩阵
dblA(1, 1) = 7: dblA(1, 2) = 2: dblA
www.eeworm.com/read/155761/11850899
bas legaussmainmodule.bas
Attribute VB_Name = "MainModule"
Sub Main()
Dim dblA(4, 4) As Double
Dim dblB(4) As Double
'系数矩阵
dblA(1, 1) = 0.2368
dblA(1, 2) = 0.2471
dblA(1, 3) = 0.2568
d
www.eeworm.com/read/257761/11913232
txt 一个关于vb中mscomm控件的问题.txt
一个关于vb中MScomm控件的问题
各位高手:
本人新手想学习用mscomm做串口通信程序.为便于测试,我将pc上两个com口用串口线相连.想开发一小程序,实现功能如下:用两个mscomm控件在同一pc上实现通信,一个mscomm负责向com1口发送数据,另一mscomm负责从com2口接收数据,当在文本框中输入文本点发送按钮后利用mscount控件将输入文本发送至com1口,当com ...
www.eeworm.com/read/154873/11921517
frm frmmenu.frm
VERSION 5.00
Begin VB.Form popmenu
Caption = "菜单"
ClientHeight = 5430
ClientLeft = 60
ClientTop = 345
ClientWidth = 6900
LinkTopic =
www.eeworm.com/read/257401/11931943
script aaa.script
var
t:ttest;
ds:Tdataset;
a:Tadoconnection;
function GetData(sQrySQL: string;mAdocon:TAdoConnection): TCustomAdoDataSet;
var
adoDs :TCustomAdoDataSet;
q:TadoQuery;
begin
q:=tado
www.eeworm.com/read/257401/11931963
script ggg.script
var
t:ttest;
ds:Tdataset;
a:Tadoconnection;
function GetData(sQrySQL: string;mAdocon:TAdoConnection): TCustomAdoDataSet;
var
adoDs :TAdoDataSet;
q:TadoQuery;
www.eeworm.com/read/257021/11958387
frm form02.frm
VERSION 5.00
Object = "{9BD6A640-CE75-11D1-AF04-204C4F4F5020}#2.0#0"; "mo20.ocx"
Begin VB.Form Form02
Caption = "世界地图"
ClientHeight = 5325
ClientLeft = 60
Clie
www.eeworm.com/read/257021/11959165
frm form010.frm
VERSION 5.00
Object = "{9BD6A640-CE75-11D1-AF04-204C4F4F5020}#2.0#0"; "mo20.ocx"
Begin VB.Form Form10
Caption = "墨西哥地图"
ClientHeight = 5220
ClientLeft = 60
Cli
www.eeworm.com/read/257021/11959824
frm form02.frm
VERSION 5.00
Object = "{9BD6A640-CE75-11D1-AF04-204C4F4F5020}#2.0#0"; "mo20.ocx"
Begin VB.Form Form02
Caption = "墨西哥地图"
ClientHeight = 5415
ClientLeft = 60
Cli