あいさつ（最初の投稿）

-

こんにちは。初めまして。


ミヤと申します。


２０１９年４月にプログラミング（未経験）の仕事に転職。
研修期間でプログラミング（vb.netとSQLServer）を学んでおります。

入社して3か月。
最初の頃に学んだ関数等を使おうと思って、忘れて曖昧になることが多くなってきました。
そこでブログでメモを残すことにします。

まだ新人で確信を持って書けることは少ないですが、
ある程度勢いで書いていこうという方針です。（慎重になりすぎて書けなくなることを防ぐため）
不確実な情報の可能性があることをご了承ください。
ご指摘などいただけるととても助かります。

宜しくお願いいたします。

コメント

コメントを投稿

このブログの人気の投稿

[VB.NET]テキスト等チェンジイベントを有効化・無効化する

-
テキスト等のチェンジイベントは便利ですが、初期化（文字をクリア）の時などにも反応してしまいます。そういう時にイベントを動かさないようにするための方法です。 今回はDGV(データグリッドビュー)内のセル(１マス)バリューチェンジイベントで行います。 例     'DGV内セルテキストチェンジイベント     Private Sub DGV_CellValueChanged(sender As Object, e As DataGridViewCellEventArgs) '↑本来は末尾に、Handles DGV.CellValueChangedと記述されているが、削除する         'ここにチェンジイベントが起きた時の動きを記述     End Sub     'イベント有効化     AddHandler DGV.CellValueChanged, AddressOf DGV_CellValueChanged     'イベント無効化     RemoveHandler DGV.CellValueChanged, AddressOf DGV_CellValueChanged 説明 AddHandler イベント本体 , AddressOf イベント名 RemoveHandler 　〃　　　, 　　　　〃 イベントに、イベント本体？を関連付け、あるいは関連を外します。 コメント 普通、記述時にイベントをデザイナーのダブルクリックなどで呼び出しますが、自動で Handles DGV.CellValueChanged のように、イベント末尾にイベント本体が記述されています。それを削除する事で何にも反応しないコードになります。その後、AddHandlerで関連付けする、外すことで有効化、無効化できます。テキスト等の切り替わりを監視するタイミングを自由に変えられるので、知っていると便利です。
続きを読む

[VB.NET]コンボボックスの１アイテムに2つ以上の値を持たせる

-
２つの値、つまりIDと名前など (001, 太郎)を、コンボボックスComboBox(プルダウンメニュー)に入れる。そして選択アイテムとして名前の方を表示したい時の方法です。IDは内部データとして隠れます。 例     'クラス作成     Public Class CBList ' 変数宣言         Private idV As String         Private nameD As String ' ここで値を受け取る         Public Sub New(ByVal ID As String, ByVal Name As String)             idV = ID             nameD = Name         End Sub ' IDプロパティ宣言         Public ReadOnly Property ID() As String             Get                 Return idV             End Get         End Property ' Nameプロパティ宣言         Public ReadOnly Property Name() As String             Get           ...
続きを読む

[VB.NET]８ケタの文字列を日付に変換する

-
テキストボックス1に入力された８ケタの数字（文字列）を日付（0000/00/00）に変換する 例   修正済み '変数宣言   Dim moziRetu As String =  Textbox1.text     Dim hiduke As Date '文字列を数値型に変換。/スラッシュを挿入 'それが日付型に変換できるか確認し、変換出来たらテキストボックスに表示   If Date.TryParse( Format(CInt(moziRetu), "####/##/##") , hiduke) Then          TextBox1.Text = Format(hiduke, "yyyy/MM/dd")   End If 説明 細かな説明は後日します。ポイントは、 日付型に変換するには1111/11/11のようにスラッシュが入っていなければならない ということです。そのため文字型を一旦数値型にしてFormatをつかい/スラッシュを挿入しています。 コメント 個人的にプログラムコードが長く行が増えるほど読む気がなくなります。（上司には短くするより見やすさをと助言をもらってますがまだ慣れません^^;） なので省きましたが、入力された文字が数字ではなかった場合や、間に数字でないものが入っていた場合のエラー防止に下記のコードを先頭に挿入すると便利です。 変数宣言   Dim mozi As String = String.Empty ループして一文字ずつ取り出し、   For i = 0 To Len(TextBox1.Text) - 1         mozi = TextBox1.Text.Substring( i, 1) 数値型に変換できるか確認し、（変換はせずに）結合          If IsNumeric(mozi) Then         ...
続きを読む