vb初学者编程代码（vb编程入门代码）

大家好，我是小新，我来为大家解答以上问题。vb初学者编程代码，vb编程入门代码很多人还不知道，现在让我们一起来看看吧！

给你写个简单的分数小程序，你照我的写一遍，就知道，了解VB语言的编写思路之后，学他就不难了，很多语言都是差不多的，只是编写思路不同而已，就说c和c++吧，c++是建立在C的基础之上的，但很多编写思路就不同，JAVA ,vc++又是一种思路，很大的不同，但都是一个共同目的，希望可以编写出好的程序来。

如下：

Private Sub Command1_Click()

If Not IsNumeric(Text1.Text) Then

MsgBox "输入有误，只可以为数字", 48

ElseIf Val(Text1.Text) < -0.1 Then

MsgBox "最小值不可以下于0，请输入正确的数字", 48

Text1.Text = ""

Text1.SetFocus

ElseIf Val(Text1.Text) < 60 Then

MsgBox "你没有及格，请继续努力！"

ElseIf Val(Text1.Text) >= 60 And Val(Text1.Text) <= 75 Then

MsgBox "还不错，您及格了"

ElseIf Val(Text1.Text) >= 76 And Val(Text1.Text) < 90 Then

MsgBox "很好，您的分数中等偏上"

ElseIf Val(Text1.Text) > 90 And Val(Text1.Text) <= 100 Then

MsgBox "你的成绩非常出色"

ElseIf Val(Text1.Text) < 0 Then

MsgBox "数字可以小于0"

Text1.Text = ""

Text1.SetFocus

ElseIf Val(Text1.Text) > 100 Then

MsgBox "分数的最大值不可大于100，请重新输入！", 48

Text1.Text = ""

Text1.SetFocus

Else

MsgBox "您的输入有误，请输入正确的数字"

End If

End Sub

注意：要想运行代码，先要在窗体上建立一个“command1,命名为：确定”

建立一个，文本“和text1”

再加上一个“label”,不可以运行这个小程序了，

这个小程序非常简单，如果还有不明白的地方，可以问我。

本文到此讲解完毕了，希望对大家有帮助。