エントリーの編集
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
どんどんやっていきます。まずは前回までのコードです。 Option Explicit Sub Main() '出席番号のエラー... どんどんやっていきます。まずは前回までのコードです。 Option Explicit Sub Main() '出席番号のエラーをキャッチする On Error GoTo shussekiErr ' 必要な変数を作成する Dim shussekiNumber As String ' 出席番号を格納する変数 Dim name As String ' 氏名 Dim sansu As Long ' 算数点数 Dim kokugo As Long ' 国語点数 Dim rika As Long ' 理科点数 Dim syakai As Long ' 社会点数 Dim eigo As Long ' 英語点数 Dim strErrMsg As String ' 入力チェックの結果を格納する変数 ' 出席番号を入力してもらう(ここで例外発生する!) shussekiNumber = InputBox("出