掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Operator ステートメント とは? (ID:144248)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
以下のコードにおいて、 Module Module1 Structure Seiseki Dim kokugo, sugaku, eigo As Integer Sub SetSeiseki(ByVal kamoku1 As Integer, ByVal kamoku2 As Integer, ByVal kamoku3 As Integer) kokugo = kamoku1 sugaku = kamoku2 eigo = kamoku3 End Sub Public Shared Operator +(ByVal x As Seiseki, ByVal y As Seiseki) As Seiseki Dim z As Seiseki z.kokugo = x.kokugo + y.kokugo z.sugaku = x.sugaku + x.sugaku z.eigo = x.eigo + y.eigo Return z End Operator End Structure Sub Main() Dim a, b, c, gokei As Seiseki a.SetSeiseki(70, 90, 80) b.SetSeiseki(100, 77, 50) c.SetSeiseki(92, 88, 95) gokei = a + b + c Console.WriteLine("学生aの国語={0,4} 数学={1,4} 英語={2,4}", a.kokugo, a.sugaku, a.eigo) Console.WriteLine("学生bの国語={0,4} 数学={1,4} 英語={2,4}", b.kokugo, b.sugaku, b.eigo) Console.WriteLine("学生cの国語={0,4} 数学={1,4} 英語={2,4}", c.kokugo, c.sugaku, c.eigo) Console.WriteLine("3人の学生の国語の合計={0,4}", gokei.kokugo) Console.WriteLine("3人の学生の数学の合計={0,4}", gokei.sugaku) Console.WriteLine("3人の学生の英語の合計={0,4}", gokei.eigo) Console.ReadLine() End Sub End Module gokei = a + b + cのあとに Public Shared Operator +(ByVal x As Seiseki, ByVal y As Seiseki) As Seisekiに どうして移動していくのよくわかりません。 Functionステートメント、subステートメントのときは、プロシージャー名ですぐに分かるのですが・・・。 お忙しいとは思いますが、何卒宜しくご指導宜しくお願いします。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.