Excel的Visual Studio（Visual Basic)の書き方

Class MainWindow

    Private Sub bnt判定_Click(sender As Object, e As RoutedEventArgs) Handles bnt判定.Click
        Dim 点数 As Integer

        点数 = txtbx入力エリア.Text
        lbl判定結果.Content = IIf(点数 < 60, "不可", IIf(点数 < 70, "可", IIf(点数 < 80, "良", "優")))

    End Sub

    Private Sub bnt厳しく判定_Click(sender As Object, e As RoutedEventArgs) Handles bnt厳しく判定.Click
        Dim 点数 As Integer

        点数 = txtbx入力エリア.Text
        If 点数 < 60 Then
            lbl判定結果.Content = "不可"
        Else
            If 点数 < 70 Then
                lbl判定結果.Content = "可"
            Else
                If 点数 < 80 Then
                    lbl判定結果.Content = "良"
                Else
                    lbl判定結果.Content = "優"
                End If
            End If
        End If

    End Sub
End Class
上の方の書き方は、エクセルとかでセルに関数を埋め込む場合の書き方ですよね。下は従来の書き方。

見たことのある方は上の方が楽かもしれませんね。文字数は少ないようですね。何時からこう書けるように

なったんでしょうか？