当前位置：首页 → 问答吧 → Visual Basic 初学一问

Visual Basic 初学一问

时间：2014-04-02

来源：互联网

Module Module1
Sub Main()
Dim str1 As String
Dim password As Integer
Dim count As Integer

Do
Console.Write("请输入帐号 :")
str1 = Console.ReadLine()
Console.Write("请输入密码 :")
password = Console.ReadLine()

If (str1 = "Basic") And (password = "2012") Then
Console.WriteLine("登入成功")
Exit Do
Else
Console.WriteLine("登入失败")
End If
Loop
Console.Read()
End Sub
End Module

以上program无问题,不过个Loop 会无限重覆, 除非登入成功
但点样写到登入失败3次错误时就中止个LOOP, 再Console.WriteLine("失败3次不能登入") ?

thx~

作者: 201411 发布时间: 2014-04-02

哎呀, 来呃1分先. 各位高手卸住卸住 ...

Module Module1
Sub Main()
Dim str1 As String
Dim password As Integer
Dim count As Integer
count=0
Do
count=count+1
Console.Write("请输入帐号 :")
str1 = Console.ReadLine()
Console.Write("请输入密码 :")
password = Console.ReadLine()

If (str1 = "Basic") And (password = "2012") Then
Console.WriteLine("登入成功")
Exit Do
Else
Console.WriteLine("登入失败")
if count=3 Then
Console.WriteLine("失败3次不能登入")
Exit Do
End If
End If
Loop
Console.Read()
End Sub
End Module

[ 本帖最后由 me888 於 2014-3-24 04:05 PM 编辑 ]

作者: me888 发布时间: 2014-04-02

thx

作者: 201411 发布时间: 2014-04-02

引用:原帖由 me888 於 2014-3-24 03:52 PM 发表
哎呀, 来呃1分先. 各位高手卸住卸住 ...

Module Module1
Sub Main()
Dim str1 As String
Dim password As Integer
Dim count As Integer
count=0
...

红字意义何在

?
我cut 左佢一样正常run到

作者: 201411 发布时间: 2014-04-02

一般编译器会将定义咗类别嘅变数预设为0, 但有些会例外，习惯上最好设定为0, 以便回圈里做累加混算，count=count+1

[ 本帖最后由 me888 於 2014-3-24 10:34 PM 使用编辑 ]

作者: me888 发布时间: 2014-04-02

引用:原帖由 me888 於 2014-3-24 10:13 PM 发表
set count to 0, 有些程式会预设，未定义嘅变数做0，习惯上最好先设定为0, 以便做累加混算 count=count+1

个 count 字本身系programme language?
count 既definition 系咩?
count = count + 1 <<点样应用同埋可以应用系边?

作者: 201411 发布时间: 2014-04-02

count 你定义咗佢做 integer, 佢系variable 来架，唔系电脑语言，佢唔系 reserved word 又唔系特定指令。

作者: me888 发布时间: 2014-04-02

count=count+1, 意思是将 (count 初值=0)+1 存入 count (变咗新值)，你上堂老师会讲啦，未教定上堂发梦呀

作者: me888 发布时间: 2014-04-02

引用:原帖由 me888 於 2014-3-24 10:56 PM 发表
count=count+1, 意思是将 (count 初值=0)+1 存入 count (变咗新值)，你上堂老师会讲啦，未教定上堂发梦呀

我个MAJOR 同comp science 完全无关
都系睇书自学紧..无人教

红字我明~
我知个count 系呢到系代表输入次数
但系点解个PROGRAM 会知呢个系代表输入次数,而唔系其他?

作者: 201411 发布时间: 2014-04-02

编译器知鬼你用count 代表咩，当count 普通一个 integer type 嘅 variable. 你话圆话扁佢都无所谓，况且佢都唔鬼理你，佢只识由上至下做毎个 instruction 计算，系你set 咗个condition 当count累加至3就 exit do 跳出回圈。明白吗？

[ 本帖最后由 me888 於 2014-3-25 07:38 AM 使用编辑 ]

作者: me888 发布时间: 2014-04-02

引用:原帖由 me888 於 2014-3-25 06:37 AM 发表
编译器知鬼你用count 代表咩，当count 普通一个 integer type 嘅 variable. 你话圆话扁佢都无所谓，况且佢都唔鬼理你，佢只识由上至下做毎个 instruction 计算，系你set 咗个condition 当count累 ...

明白了..thx
师兄系programmer?
之后可能大把野求赐教

作者: 201411 发布时间: 2014-04-02

唔使客气。Yes, 以前系 programmer. 十多年无写program la. 感觉好多都要重新学过，大家一齐学，一齐进步。

作者: me888 发布时间: 2014-04-02