第4講 If文(もしもボックスの世界)
第2話 If文による合否判定プログラム
001
     ↓
キーボードから国語の得点を入力してエンター
002
     ↓
キーボードから社会の得点を入力してエンター
003
     ↓
キーボードから数学の得点を入力してエンター
004
     ↓
キーボードから理科の得点を入力してエンター
005
     ↓
キーボードから英語の得点を入力してエンター
006
を実現するアプリ例
Module Module1

  Sub Main() '私は社長だ。
    Dim a, b, c, d, e, g As Integer 'a:国語 b:社会 c:数学 d:理科 e:英語 g:合計
    Console.WriteLine ("各教科の点数をキーボードから入力して下さい。")
    '以下各教科得点入力
    Console.Write ("国語=")
    a = Console.ReadLine()
    Console.Write ("社会=")
    b = Console.ReadLine()
    Console.Write ("数学=")
    c = Console.ReadLine()
    Console.Write ("理科=")
    d = Console.ReadLine()
    Console.Write ("英語=")
    e = Console.ReadLine()
    '以上各教科得点入力
    g = a + b + c + d + e '合計点算出
    Console.WriteLine("合計点={0:d}", g) '合計点の表示
    If g >= 300 Then Console.WriteLine ("合格") Else Console.WriteLine ("不合格") '合否結果の表示
  End Sub

End Module


今回のアプリは、1回のみで終了してしまいますが、
第3講第6話と同じように×をクリックしない限り無限に続くように変更しましょう。
実行画面
各教科の点数をキーボードから入力して下さい。
出席番号=1
国語=58
社会=62
数学=69
理科=52
英語=65
合計点=306
出席番号1番は合格

出席番号=2
国語=25
社会=32
数学=15
理科=7
英語=6
合計点=85
出席番号2番は不合格

出席番号=


と×をしない限り無限に続く。


第1話へ   第3話へ
 
002

初心者のための excel 2016 マクロ VBA 入門講義 基礎から応用まで
vc++ c言語 c++ 入門 初心者 基礎から応用まで
eclipse c++ 入門
魔方陣 数独で学ぶ VBA 入門

数独のシンプルな解き方・簡単な解法の研究
VB講義へ
VB講義基礎へ
初心者のための世界で一番わかりやすいVisual C++入門基礎講座
初心者のための世界で一番わかりやすいVisual Basic入門基礎講座
初心者のための世界で一番わかりやすいVBA入門講義(基礎から応用まで)
初心者のための VC++による C言語 C++ 入門 基礎から応用まで第1部
eclipse java 入門
java 入門 サイト 基礎から応用まで
本サイトトップへ