VB编程小练习

1. 请编写一个程序，要求输入一个字符串，默认输入为”hello, world!”,然后打印显示此字符串，请注意要有必要的注释。

 

Option Explicit
Dim i
i="Hello,World!"
MsgBox i

2. 请编写一个程序，计算从1到10连加的和，并显示结果。

 

Option Explicit
Dim i,j,k
 i="come"
 j="on"
 k="Olympic"
MsgBox i+" "+j+","+k+"!"

3. 编写一个函数，用来确定考试成绩的等级，具体功能如下：先请求输入一个考试成绩，然后根据判断确定其等级并输出成绩和等级（大于等于90分的为优，大于等于80小于90的为良，大于等于70小于80为中，大于等于60小于70为及格，小于60为不及格）。

iValue=InputBox("请输入一个考试成绩","考试成绩等级")
If iValue>=90 Then
 MsgBox "你的成绩为"+iValue+"等级为优"
 ElseIf iValue<90 And iValue>=80 Then
 MsgBox "你的成绩为"+iValue+"等级为良"
 ElseIf iValue<80 And iValue>=70 Then
 MsgBox "你的成绩为"+iValue+"等级为中"
 ElseIf iValue<70 And iValue>=60 Then
 MsgBox "你的成绩为"+iValue+"等级为及格"
Else
MsgBox "你的成绩为"+iValue+"等级为不及格"
End If