社区
VB基础类
帖子详情
关于一个for循环
yinzs
2008-09-20 09:30:27
程序要用到一个参数。该参数的取值为1到10中的某一个,但是不知道到底哪个是正确的。如果取值错误的话,程序就会非正常终止。
现在想编写一个循环逐个测试,这个条件应该怎么写?(如果取值正确,则正常执行;如果取值错误,就next,但同时程序又非正常终止了)
...全文
46
6
打赏
收藏
关于一个for循环
程序要用到一个参数。该参数的取值为1到10中的某一个,但是不知道到底哪个是正确的。如果取值错误的话,程序就会非正常终止。 现在想编写一个循环逐个测试,这个条件应该怎么写?(如果取值正确,则正常执行;如果取值错误,就next,但同时程序又非正常终止了)
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
fvflove
2008-09-20
打赏
举报
回复
[Quote=引用 4 楼 fvflove 的回复:]
Private Data as long
Data=7
if Data>0 and Data <11 then
msgbox "取值正确"
'没有必要用循环
end if
[/Quote]
'如是多个参数用循环比较
Private Data(1 TO N) as long
For i=1 to N
if Data(i)>0 and Data(i) <11 then
msgbox "取值正确"
'没有必要用循环
end if
Next
yinzs
2008-09-20
打赏
举报
回复
[Quote=引用 1 楼 bob008 的回复:]
Private Sub Command1_Click()
Dim a As Integer
On Error Resume Next
For a = 1 To 10
If Text1.Tag = a Then
Text1.Text = a & "是正确的TAG"
End If
Next a
End Sub
[/Quote]
这个有用!
fvflove
2008-09-20
打赏
举报
回复
Private Data as long
Data=7
if Data>0 and Data<11 then
msgbox "取值正确"
'没有必要用循环
end if
tongnaifu
2008-09-20
打赏
举报
回复
on error goto 到for 循环那里
bob008
2008-09-20
打赏
举报
回复
你自己看着办吧,在循环里对比下就是咯
bob008
2008-09-20
打赏
举报
回复
Private Sub Command1_Click()
Dim a As Integer
On Error Resume Next
For a = 1 To 10
If Text1.Tag = a Then
Text1.Text = a & "是正确的TAG"
End If
Next a
End Sub
微服务系列第五季-Java
循环
结构
全部案例源码分享给学习的朋友,案例采用敏捷开发管理模式,让朋友们在每
一个
阶段,有着游戏过关一样的学习体验。 第五季主要是给大家介绍一下Java的
循环
结构,包括:while的使用方法、do while的使用方法、for
循环
...
跟汤老师学Java(第5季):
循环
结构
本课程从零开始,以通俗易懂的方式讲解Java入门,手把手教你掌握每
一个
知识点。真正做到零基础入门学习,最适合初学者的教程! 课程内容包括: 1.while
循环
2.练习:while 3.do...while
循环
4.练习:do...while 5....
跟刘老师学习java教学课程01
10、java中的for
循环
条件语句 11、java中的while
循环
条件语句 12、java中的数组 本套课程分六章的详细讲解,通过详细的讲解,同学们不仅仅能够掌握java开发的基础知识, 还能够掌握做java项目的业务流程和思维方式,...
python每天15分钟零基础入门
python入门教学,针对小白或者初学者,学习和了解基础语法 每小节15分钟左右,使用python3.8,全程交互界面或者程序脚本演示,真正做到手把手教学 1_windows环境下安装python 2_我的第
一个
py程序 3_获取用户输入 4_...
python编写
一个
简单压缩软件
通过
一个
一简单的实战案例来编写
一个
压缩软件,让大家了解python这门语言 课程中用到了pip install安装python模块,以及介绍了虚拟环境.用tkinter来编写了界面,并使用了zipfile模块来...
VB基础类
7,762
社区成员
197,608
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章