VB6.0 から VB.NET(VS2008) へ STEP1

Windowsのアップグレードウィザードの実行方法

1.VS2008を開く

2.ファイル - 開く - プロジェクト/ソリューション を選択

3.VB6.0のVBPファイルを選択

4.Visual Basic アップグレード ウィザード が表示される

この後はウィザードの質問に沿って完了まで実施

これでアップグレード作業は完了

STEP2以降にてVS2008でのコンパイルエラーを手動にて処理

Access2016 メニューバー(リボン)の非表示方法

Access2016でランタイム使用時に
フォームの表示でメニューバーが気になったので消したかった。

メニューバーを非表示にする場合
DoCmd.ShowToolbar "Ribbon", acToolbarNo

メニューバーを表示させる場合
DoCmd.ShowToolbar "Ribbon", acToolbarYes

WIndows10/7 ネットワークドライブ作成でパスワードを不要にする方法

Windows10,Windowws7でネットワークドライブを作成する際に
ユーザーとパスワードの入力を求められることがある。

これを回避するには，共有フォルダのあるPCの設定で下記設定を変更すればOK
Windows10
「設定」⇒「ネットワークとインターネット」⇒
「ネットワークと共有センター」⇒「共有の詳細設定の変更」

Windwos7
「コントロールパネル」⇒「ネットワークとインターネット」⇒
「ネットワークと共有センター」⇒「共有の詳細設定の変更」

パスワード保護共有で「パスワード保護の共有を無効にする」を選択

これは，共有者をGuestとしてパスワードなしアクセスを行っている
Guestユーザーにパスワードを設定してた場合，この設定は無効にできない

太陽光発電＋蓄電池 費用

太陽光発電と蓄電池の設置。

色々調べてて太陽光の費用は調べてすぐ出たけど
蓄電池込での費用があまりよくわからなかったので
誰かの指標になればいいなと思って書いておきます。

Panasonic（2017年8月現在の最新モジュール HIT）
太陽光発電　3.9kw(南面＋東面で屋根の形の台形型）
蓄電池　5.6kw（PLJ-B21）
設置工事費込

Total：250万円
（割引などの関係で一つ一つの値段が出せません。）

国からとかの補助金含めると200万くらいになります。

Access 「この関数をコンパイルするときにエラーが発生しました。」

Windows7，VB6，Access2003ランタイムで動作していたものを
Windows10，VB6，Access2016ランタイムに変更した際に，下記エラーが発生

「この関数をコンパイルするときにエラーが発生しました。」

このエラーの原因は，VBAのどこかにエラーがあって実行できないということ。

解決方法としては，ランタイムでなくAccessが動作する環境でデバッグ実行し
エラー個所を特定，解決することで問題が解決する。

Windows10 64bit パソコン設定 自動化

パソコンの設定で自動化できるコマンドのメモ

VB6.0でWindows10の設定を行う

'Windows7でのシリアルマウス対策
dwRet = RegOpenKeyEx(HKEY_LOCAL_MACHINE, "SYSTEM\CurrentControlSet\services\sermouse", 0, KEY_ALL_ACCESS, dwKeyHandle)
dwValue = 4
dwRet = RegSetValueEx(dwKeyHandle, "Start", 0, REG_DWORD, dwValue, Len(dwValue))
dwRet = RegCloseKey(dwKeyHandle)

'電源オプションを高パフォーマンスに変更
Shell "cmd.exe /c powercfg.exe -SETACTIVE 8c5e7fda-e8bf-4a96-9a85-a6e23a8c635c", vbHide

'電源オプションのディスプレイの電源を切る時間を0（なし）に変更
Shell "cmd.exe /c powercfg -x -monitor-timeout-ac 0", vbHide

'電源オプションのUSBのセレクティブサスペンドを無効に変更
Shell "cmd.exe /c powercfg -setacvalueindex SCHEME_MIN 2a737441-1930-4402-8d77-b2bebba308a3 48e6b7a6-50f5-4782-a5d4-53bb8f07e226 0", vbHide

ポケモンGO

ポケモンGOが昨日から伝説ポケモンがレイドバトルに出現

でジムのレイドバトル仕様が変わったみたいなのでメモ
（今日までのイベント期間中だけの可能性あり）

・卵でレイドバトル発生までの時間表示がなくなる
（いつレイドバトルが発生するか不明）
・レイドバトル発生後，2時間レイドバトルとなる（変更前は1時間）

変更されたことによるメリット
・ジムにポケモンをセットしていた場合，2時間は帰ってこないため
　12ポケコイン確定！

変更されたことによるデメリット
・いつレイドバトルをすれば人が集まるのか不明
（田舎で伝説ポケモンの撃破はほぼ不可能）
前は時間がわかったことで発生直後に人が集まる傾向があったため
ド田舎でない限り数人レベルは集まってたのに・・