Tutorial Programming

Tutorial basic, Visual Studio VB.NET 2013 Pengunaan Case

Hallo sahabat saya akan menjelaskan Pengunaan Case pada visual studio 2013, oke langsung aja


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

‘Examination Marks

Dim mark As Single

mark = TextBox1.Text

Select Case mark

Case 0 To 49
Label1.Text = “E”

Case 50 To 59

Label1.Text = “D”
Case 60 To 69

Label1.Text = “C”
Case 70 To 79

Label1.Text = “B”

Case 80 To 100
Label1.Text = “A”

Case Else
Label1.Text = “Error, please reenter the mark”

End Select

End Sub

Sekian tutorial saya sahabat semoga bermanfaat yah.


No comments:

Post a Comment

Tutorial Programming Designed by Templateism | Ary EJFA Copyright © 2015

Theme images by richcano. Powered by Blogger.