Vol.829 24.Sep.2021

LEDヘッドランプ VB2019_ユーザーインターフェイス

Ｈ　LEDヘッドランプ

ｂｙ　ｆｊｋ

　夜、車を走らせていると、車のヘッドライトが暗く感ずることがあり、もう少し明るくできないかと思って調べてみると、車のヘッドライトバルブは、ハロゲン（電球）、HID、LEDの3種類が一般的に使われている。

【ハロゲン】
　フィラメントが発光する電球（淡い暖色系の光）で、対向車にも優しいが、明るさではHIDやLEDに劣る。発熱量と消費電力（60W前後）が多く、寿命が短い（800時間）のが欠点。ただし、雨や霧のときの視認性は比較的優れていて、雪国ではヘッドライトに付着した雪を、ハロゲンの発熱で溶かしてくれる。価格は1,000〜2,000円。
　
【HID】（高輝度放電ランプ）
　アーク放電で発光するため球切れの心配がなく、非常に明るい（青みががった色）。寿命は約2,000時間、消費電力も35〜55W と省電力。光のカラーバリエーションが多い。短所は、点灯してから最大の光量を得るまで5秒〜10秒ぐらいかかること。発熱量はハロゲンほどではないが少しはある。また、構成部品点数が多く、取り付け交換には専門的知識が必要。価格は2,000〜10,000円。
　
【LED】
　発光ダイオードを使ったライトで、明るさはHIDより劣るが、光の色は真っ白(異なる色温度のものももある)。長所は圧倒的な長寿命（30,000時間）と消費電力（20W）の少なさ。交換もユーザが簡単に行える。ハロゲンランプの車なら、元々が暗いので、LEDに交換する価値は大いにある。ただし、後付けのLEDキットは配光が難しく、きれいなカットラインが出なくて、車検（保安基準）をクリアできないものもあるので要注意。価格は2,000〜10,000円。

　適合する製品を選んだとしても、明らかな光軸のズレがある場合は車検が通らない。例えばロービームは対向車のドライバーを惑わせないよう、カットオフラインの調整が必要。車種ごとに実績のある製品を選ぶことが重要で、防水性や放熱対策などもメーカーによって差があるので、ノウハウのあるショップで購入するのがベター。
　オートバックスで値引きされたLEDバルブ（ライトエース用はH4）を見つけ、勧められて衝動買い。 交換してみると、色の違いと、LEDは明るさの範囲が狭そう（ハイビーム時）だが、LEDは中心部がより明るいためと思われる（全体ではLEDの方が明るい）。

ALBALIZEバルブ
（日星工業)		 シュピーレンで点灯テスト
（左：LED、右：ハロゲン)
ヘッドライトの比較（左：LED、右：ハロゲン)

Ｖ　VisualBasic2019(3)　〜ユーザーインターフェイス

ｂｙ　ｆｊｋ

　VisualBasicには直ぐに使えるツールが多数あり、これらを用いることで開発は早くなる。その一部はabc827でも紹介したが、フォームに配置するツールとしてはコントロールとコンポーネントがある。
　コントロールについてはabc778でExcelのVBA（Visual Basic for Applications）としても紹介したが、VBAはOffice製品上でのみ使用可能な言語で、VBは開発環境を構築する必要があり、VBで開発したアプリケーションはそれ単体で動作させることができる。
　ツールを使うには「表示」タブから「ツールボックス」を選ぶとツールボックスのリストが表示される。
　※詳細は「VisualBasicのガイド」などを参照。

「表示」タブから ツールボックス

【コントロール】
コントロールはフォーム上に配置できるオブジェクトで、ユーザーがコントロールを操作することによりイベントが発生し、イベントハンドラーに記述されたことが実行される。参考
　
【コンポーネント】
コンポーネント （機能）はそれだけで完結した機能を提供するプログラムコードのかたまりで、その意味ではコントロールもコンポーネントと言える。コンポーネントはユーザーがデザイン可能であり、ツールボックスへの追加、フォームへのドラッグ アンド ドロップ、デザイン サーフェイスでの操作が可能。
コントロール コンポーネント
※コントロールやコンポーネントの詳細は、「System.Windows.Forms 名前空間」などを参照。
　
【よく使うツール】
◆MessageBox （[Microsoft.VisualBasic.]MessageBox）
　ダイアログボックス (DialogBox) にメッセージを表示する。MessageBoxはモーダルウィンドウであり、ユーザーが閉じるまで、他の操作ができない。 なお、MessageBox には、テキスト、ボタン、およびユーザーに情報や指示を伝えるための記号を表示できる。結果はDialogResul列挙体を返す。
　　　MessageBox.Show(”メッセージ”, ”タイトル”、MsgBoxStyle列挙型)
　※VBAのMsgBox 関数も同様に使うことができるが、引数や記述方法が異なるので注意が必要。

◆InputBox （[Microsoft.VisualBasic.]InputBox）
　ダイアログボックスにメッセージ、テキストボックス、OKボタン、Cancelボタンを表示する。文字列が入力されるかOKボタンがクリックされると、テキストボックスの文字列を返す。Camcelボタンがあ押されると””（ヌル文字列、長さ0の文字列）を返す。
　　　InputBox(”メッセージ”, “タイトル”, ボックスの初期値)

◆Timer　（Date型変数）
　データサンプリング時など、現在の日付や時刻が必要な時がある。こんな時にはタイマーコントロールが使える。
　Date（日付）型は、西暦1年1月1日０時から起算したデータで８バイトの整数（Long）。
　Date型へ変数を代入するには、
　　　Din dteDateTime As Date = #17/9/2021 8:15 PM#・・・日付を「／」で区切り、全体を「＃」で囲む
　Intervalプロパティを使うと、ミリ秒単位でイベントを発生させることができる。

＜主なDateAndTimerクラスのプロパティ＞
DateString： 現在の日付（文字型、M-d-yyy）
Now： 現在の日付と時刻(日付型）
TimeString： 現在の時刻（文字型、HH:mm:ss）
Today： 現在の日付（日付型）
コンテナー メニューバー・ツールバー 印　刷
ダイアログ データ WPF相互運用機能
LEDヘッドランプ VB2019_ユーザーインターフェイス