中国自动化学会专家咨询工作委员会指定宣传媒体

免费注册

广告服务 | 客服中心

您现在所在的是：

电脑编程

泓格论坛

FLIR红外热像论坛

工控论坛首页 → 电脑编程 → 浏览主题： VB程序求解

* 帖子主题：

VB程序求解

2657

yahk_08

文章数：255

年度积分：53

历史总积分：2657

作者的所有帖子(255)

注册时间：2012/9/8

发表于：2014/5/23 16:11:49

#0楼

初次接触VB，看书都看不懂特来求助，望大侠们指点迷津！程序如下：
Private Sub Cmdsend_Click()
If Textsend.Text = "" Then
pp = MsgBox("发送的数据不能为空！", 16)
Exit Sub
End If
MSComm1.Output = Trim(Textsend.Text)
For i = 1 To 20000000
Next i
End Sub

程序中的PP是什么意思？从何而来？

【方案】FLIR?红外热像仪监测水泥窑状况与性能

只看该作者 | 赞[0] | 踩[0] | 引用 | 回复 | 编辑 | 推荐 | 举报 | 结帖 | 管理

36429

cvlsam 版主

文章数：12278

年度积分：781

历史总积分：36429

作者的所有帖子(12278)

注册时间：2001/12/22

2018论坛贡献奖

2017论坛贡献奖

2016论坛贡献奖

2015论坛贡献奖

2013论坛贡献奖

2012论坛贡献奖

2011论坛贡献奖

2011国庆活动

2010论坛杰出贡献奖

发表于：2014/5/23 19:01:00

#1楼

以下是引用yahk_08在2014/5/23 16:11:49的发言：
初次接触VB，看书都看不懂特来求助，望大侠们指点迷津！程序如下：
Private Sub Cmdsend_Click()
If Textsend.Text = "" Then
pp = MsgBox("发送的数据不能为空！", 16)
Exit Sub
End If
MSComm1.Output = Trim(Textsend.Text)
For i = 1 To 20000000
Next i
End Sub

程序中的PP是什么意思？从何而来？

pp是一个变量，用于存储MsgBox的函数返回值。

Good Luck~

【方案】FA技术 | 伺服系统 QD77模块基本设置方法

只看该作者 | 赞[0] | 踩[0] | 引用 | 回复 | 编辑 | 推荐 | 举报 | 管理

39731

产品体验中心会员

tigermu 版主

文章数：14887

年度积分：689

历史总积分：39731

作者的所有帖子(14887)

注册时间：2004/8/12

2018论坛优秀版主

2018春节活动（二）

2017论坛优秀版主

2017国庆活动(一)

2016论坛优秀版主

2016国庆活动(一)

2015论坛优秀版主

西门子logo体验(三)

英威腾PLC体验(三)

2015春节活动

2014论坛优秀版主

2013论坛优秀版主

2012论坛优秀版主

2010年度论坛贡献奖

发表于：2014/5/23 19:24:19

#2楼

vb可以不定义就使用变量，这点不像c语言要求那么严。此处pp即是这样，它是magbox的返回值。

清泉石上，明月松间。

【方案】从农场到餐桌，ABB解决方案助力全面推动绿色大棚养殖业发展

只看该作者 | 赞[0] | 踩[0] | 引用 | 回复 | 编辑 | 推荐 | 举报 | 管理

2657

yahk_08

文章数：255

年度积分：53

历史总积分：2657

作者的所有帖子(255)

注册时间：2012/9/8

发表于：2014/5/24 8:12:16

#3楼

明白了，谢谢！

【方案】华北工控EM6412I，助力AMR机器人高能效低功耗稳定运行

只看该作者 | 赞[0] | 踩[0] | 引用 | 回复 | 编辑 | 推荐 | 举报 | 管理

12212

产品体验中心会员

FORELF

文章数：3114

年度积分：516

历史总积分：12212

作者的所有帖子(3114)

注册时间：2007/6/22

发表于：2014/5/24 16:30:01

#4楼

For i = 1 To 20000000
Next i
End Sub

这个做什么用的，循环里面啥都没有啊

let me go任我行

【方案】异形瓶装箱机的设计和电气控制

只看该作者 | 赞[0] | 踩[0] | 引用 | 回复 | 编辑 | 推荐 | 举报 | 管理

36429

cvlsam 版主

文章数：12278

年度积分：781

历史总积分：36429

作者的所有帖子(12278)

注册时间：2001/12/22

2018论坛贡献奖

2017论坛贡献奖

2016论坛贡献奖

2015论坛贡献奖

2013论坛贡献奖

2012论坛贡献奖

2011论坛贡献奖

2011国庆活动

2010论坛杰出贡献奖

发表于：2014/5/24 16:31:14

#5楼

以下是引用FORELF在2014/5/24 16:30:01的发言：
For i = 1 To 20000000
Next i
End Sub

这个做什么用的，循环里面啥都没有啊

延时。

Good Luck~

【方案】EtherCAT P 开发工具 FB1311 闪耀面世

只看该作者 | 赞[0] | 踩[0] | 引用 | 回复 | 编辑 | 推荐 | 举报 | 管理

工控学堂推荐视频：

PLC学习视频变频器学习视频西门子学习视频三菱学习视频更多学习视频>>

关于我们 | 联系我们 | 广告服务 | 本站动态 | 友情链接 | 法律声明 | 非法和不良信息举报

工控网客服热线：0755-86369299
版权所有工控网 Copyright©2024 Gkong.com, All Rights Reserved

62.4004