【教程】Visual Basic 教程(三)你的成绩怎么样

上一周由于备战“5·26”小升初考试,所以没有写教程,在此深表歉意。

还有,上次“你好,世界”中有一个函数没有给大家讲,十分抱歉。

现在来讲一讲这个函数,你也可以回到上次的教程看。

 

[Object.]Print [Expression][, or ;]

Object:对象,可以是窗体(Form)、图片框(PictureBox)、打印机(Printer)或立即窗口(Debug)。 如果省略了“对象",则是指窗体。

Expression:表达式(表),是一个表达式或多个表达式,可以是数值表达式或字符串。对于数值表达式,Print 具有计算和输出双重功能;而对于字符串,则原样输出。如果省略了“表达式表”,则输出空行。

, or ;:当输出多个表达式或字符串时,各输出项之间可以用逗号(,)或分号(;)隔开,也可以用空格。如果输出的各表达式之间用逗号分隔,则按标准输出格式(以14个字符位置为单位把一个输出行分为若干个区段)显示数据项。如果各输出项之间用分号分隔,则按紧凑输出格式输出数据,即数值与数值之间空一格,字符串之间没有空格。(不换行输出。如果 Print 末尾没有标点(逗号或分号),则自动换行。如果 Print 末尾有逗号或分号则不换行,即下一个 Print 输出的内容将接在当前 Print 所输出的信息的后面。

 

从本次教程开始,每次都会有“本次学习目标”供参考。

image

1、单语句:

     If [条件] Then [一条语句]

     If [条件] Then [一条语句] Else [一条语句]

     注意:使用 单 If 语句 时,所有的内容都必须写在同一行里,除非使用“ _”(换行符,即一个空格和一个下划线(输入下划线的方法:英文模式下 Shift + -))。

2、块语句

     If  [条件] Then

       [多条语句]

     Else
[多条语句]

     End If

     注意:Then 必须放在 If 块语句 的后面,必须按照上面的格式换行。

3、单条件的嵌套语句

     块结构的 If 语句 可以方便的进行单条件的选择,但是,条件为假时,只能提供一种动作,下面的 ElseIf 关键字可实现多条件的选择。

If  [条件] Then
     [多条语句]

ElseIf  [条件] Then
     [多条语句]

ElseIf [条件] Then
     [多条语句]
……

Else
[多条语句]

End If

     注意:1、Then 必须放在 If 或 ElseIf 的后面 ;2、Else 是可选项。

 

好啦,现在我们已经完成了本次学习目标的第 1 条,下周,我们再来完成第 2 条目标——制作一个可以判断成绩等级的程序。
打开 VB,新建“标准 EXE”,从控件工具箱拖出2个标签控件、1个文本框控件、1个命令按钮控件,并摆放成如图所示的样子:

设置控件的以下属性:

设置完成的样子如图所示:

双击“判断”,写入以下代码:

If Text1.Text < 0 Then
Label2.Caption = "错误!成绩不能小于 0 分!"
ElseIf Text1.Text > 0 And Text1.Text < 60 Then
Label2.Caption = "等级:不及格。"
ElseIf Text1.Text > 60 And Text1.Text < 85 Then
Label2.Caption = "等级:良好。"
ElseIf Text1.Text > 85 And Text1.Text < 99 Then
Label2.Caption = "等级:较优。"
ElseIf Text1.Text = 100 Then
Label2.Caption = "等级:优秀。"
ElseIf Text1.Text > 100 Then
Label2.Caption = "错误!成绩不能大于 100 分!"
End If 

然后按下 F5 运行,你就会看见运行结果。
可能有的朋友会问:“为什么我输入的不是数字,显示‘类型不匹配’?”这是因为我们程序的代码只能检测到数字,若要避免显示“类型不匹配”的错误,需要用到 错误捕获  代码,这个在日后我们会讲到。

好啦,下次再见啦! 

原文链接:,转载请注明出处

发表评论