🏠

🌡️ 📆 令和5年10月3日

👨‍🏫   第５回　プログラミング／MS-VS 2005(VB)／条件識別

情報処理概論 では、 「 情報処理概論＿履歴 」 の中で、 「第５回　プログラミング／MS-VS 2005(VB)／条件識別」について 述べられています ⇒#1403@講義;。

•  コントロール

①前回の復習

②今週の内容
１．条件分岐　IF ～　Then ～ Else

２．ループ処理
・Do Loop While　文
　 ・While End While　文

☆今週のプログラム
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim LoopNumber As Integer
Dim Counter As Integer
Dim Sumup As Double
Dim element As Double
LoopNumber = LoopNumTextBox.Text
element = 1 / LoopNumber

100:
Sumup = Sumup + element
Counter = Counter + 1
If Counter < LoopNumber Then GoTo 100

ResultTextBox.Text = Sumup.ToString


End Sub
End Class

演習　上記のプログラムを　Do Loop While　文またはWhile End Whileに書き換える

【関連講義】情報処理概論,プログラミング言語プログラミング概論¹⁾

---

 > プログラミング概論,
伊藤 智博,情報処理概論, 講義ノート, (2008).

---

(1)  > プログラミング概論,
伊藤 智博,情報処理概論, 講義ノート, (2008).

関連の展示品

◇ 参考文献( 書籍 ・雑誌 ・URL )

• (1) . ＪＰＮＩＣとは. . http://www.nic.ad.jp/ja/profile/index.html, (参照2009-5-1).
• (2) . ドメイン名について. . http://jprs.jp/, (参照2009-5-1).
• (3) . WebClass. . https://ecsylms1.kj.yamagata-u.ac.jp/webclass/login.php?group_id=1352227, (参照2013-4-24).
• (4) . データ通信技術. . https://ecsylms1.kj.yamagata-u.ac.jp/webclass/login.php?id=f0e2109bc122fa0dc53964b3cf9d5261&page=1, (参照2013-4-24).
• (5) . 署名付きのメール. . https://ecsylms1.kj.yamagata-u.ac.jp/webclass/login.php?id=ac41dd44853217f18939f706d19b3870&page=1, (参照2013-4-24).
• (6) . 頭脳ラピッド. . http://www.photron.co.jp/rapidpro17/, (参照2013-4-24).
• (7) . HTMLについて. . http://www.htmq.com/index.htm, (参照2014-5-7).
• (8) . マセマティカ. . http://www.wolfram.com/mathematica/index.ja.html?footer=lang, (参照2015-6-23).
• (9) 金融広報中央委員会「知るぽると」. お金の知恵を学ぶリンク集 ～金融学習ナビゲーター～. 金融広報中央委員会「知るぽると」. https://www.shiruporuto.jp/public/, (参照2018-1-3).

• 金融広報中央委員会「知るぽると」.第５回　プログラミング／MS-VS 2005(VB)／条件識別. 山形大学,  情報処理概論 講義ノート, 2007. https://edu.yz.yamagata-u.ac.jp/developer/Asp/Youzan/@Lecture.asp?nLectureID=1403 ,  （参照 2023-10-3）.

---

https://edu.yz.yamagata-u.ac.jp/developer/Asp/Youzan/@Lecture.asp?nLectureID=1403

---

山形大学 データベースアメニティ研究所

〒992-8510 山形県米沢市城南4丁目3-16

３号館（物質化学工学科棟） 3-3301

准教授 伊藤智博

0238-26-3573

http://amenity.yz.yamagata-u.ac.jp/