2013-02-06から1日間の記事一覧

VB.net （Excel ブックを開く）

◎Excel ブックを開く Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 'ファイルを開くダイアログボックスを表示する 'OpenFileDialog クラスの新規インスタンスを生成 Dim FDlg As New Open…

VB.net　電卓 (演算ボタン)

演算ボタンをまとめて書くとき #Region "演算ボタン" Private Sub btnEnzan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPlus.Click, btnMinus.Click, btnMulti.Click, btnDiv.Click '演算子(＋、−、＊、/)のボタンを押…

VB.net　電卓 (数字ボタン)

◎数字ボタンをまとめて書くとき #Region "0〜9ボタン" Private Sub btnSuuji_Click(ByVal sender As System.Object, ByVal e ASystem.EventArgs) Handles btnZero.Click, btnOne.Click, btnTwo.Click, btnThree.Click, btnFor.Click, btnFive.Click, btnSix.…

VB.net　電卓 (配列の作り方)

◎配列の作り方Private Sub 電卓_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load'配列を作る(0から9) suuji(0) = CInt(btnZero.Text) suuji(1) = CInt(btnOne.Text) suuji(2) = CInt(btnTwo.Text) suuji(3) = CInt(b…