【Access】テキストボックスに定形入力の設定をする

テキストボックスに決まった形で入力させたい場合があります。そういった場合は、テキストボックスに定形入力の設定を行っておくといいです。 例たとえば、次のようなフォームに郵便番号を入力させるテキストボックス（textZipcode）が貼り付けてあるとします。 このテキストボックスに定形入力を設定してみたいと思います。 Private Sub Form_Load() '郵便番号の定形入力 Me.textZipcode.InputMask = "000-0000;0;""_""" ...

Read More

【PowerShell】Wordに貼り付けた画像を変更する

Wordに貼り付けた画像を変更するスクリプトを作ってみました。 例 たとえば、このような「猫」の画像を変更して「クラゲ」の画像にしてみたいと思います。 $word = New-Object -ComObject "Word.Application" $word.Visible = $true $word.Documents.Open("C:\work\word\test02.docx") #位置やサイズを記憶 $left = $word.ActiveDocument.Shapes(1).Left $top...

Read More

【Access】テキストボックスのIMEモードを切り替える

テキストボックスのIMEモードの切り替え方法です。 例たとえば、このようなフォームにテキストボックス（textName、textTel、textAddress）が貼り付けてあるとします。 これらのテキストボックスのIMEモードを設定するには次のように記述します。 Private Sub Form_Load() 'ひらがなモード Me.textName.IMEMode = acImeModeHiragana '半角英数モード Me.textTel.IMEMode...

Read More

【Access】テキストボックスに複数行入力できるようにする

テキストボックスは初期状態だと１行しか入力できないのですが、設定で複数行入力できるようになります。 例たとえば、このようなフォームにテキストボックス（textMemo）が貼り付けてあるとします。 このテキストボックスを複数行入力できるようにするには次ように設定を行います。 Private Sub Form_Load() Me.textMemo.EnterKeyBehavior = True End Sub 実行結果 ...

Read More

【Android】メモ帳のバックアップを取る

(adsbygoogle = window.adsbygoogle || []).push({}); 今日、スマホアプリのデータをバックアップしていたのですが、「メモ帳」のバックアップ方法がよく分からず思わぬ苦労をしてしまいました。 この「メモ帳」のアプリ自体にバックアップ機能がありませんですし、実際にデータがどこに保存されているのかもよく分かりません。 うーん、困ったな。。。 データを１件ずつメールやシェア機能で保存するしかないのか。。。 でも、１５０件ぐらいあるし、ひと...

Read More

【PowerShell】ファイルを読み込み１６進数でバイナリ表示する

ファイルを読み込みこんで、１６進数でバイナリ表示するスクリプトを作ってみました。 ためしに、今回このようなテキストファイルを変換してみます。 $file = "C:\work\test.txt" [Byte[]]$data = Get-Content $file -Encoding Byte $buf = '' $cnt = 0 Write-Host foreach($a in $data) { $buf = $buf + ' ' + $a.ToString("X2")...

Read More

【Access】チェックボックスの値を設定する

チェックボックスの値は、Valueプロパティで設定します。 例たとえば、フォームを開いたときにチェックボックスの初期値を設定するには次にように行います。 Private Sub Form_Load() '初期値設定 Me.checkBox1.Value = True Me.checkBox2.Value = False Me.checkBox3.Value = True End Sub チェックボックスは、Trueでチェックが入っている状態、Fa...

Read More

【Access】チェックボックスの値を取得する

チェックボックスの値を取得する方法です。 例たとえば、このようなフォームにチェックボックス（checkBox1～3）とボタン（buttonOrder）が貼り付けてあるとします。 このボタンをクリックしたときに、チェックが入っているチェックボックスのラベルのキャプションをメッセージボックスに表示してみます。 Private Sub buttonOrder_Click() Dim msg As String If Me.checkBox1.Value Then ...

Read More

【PowerShell】対象のフォルダ内のファイルを一括で読み取り専用にする

対象のフォルダ内のファイルを一括で読み取り専用にする方法です。 例たとえば、フォルダにこのように複数のファイルがあるとします。 PS C:\work\test> Get-ChildItem ディレクトリ: C:\work\test Mode LastWriteTime Length Name ---- ------------- ------ ---- -a---- ...

Read More

【Access】トグルボタンのベベル効果を設定する

トグルボタンのベベル効果の設定です。 ベベル効果は次の表のとおりとなっています。 値効果 0なし 1円 2額縁風 3交差 4クールスラント 5角度 6ソフトラウンド 7浮き上がり 8スロープ 9切り込み...

Read More

【Access】トグルボタンのオン・オフのときの表示を変える

トグルボタンのオン・オフのときの表示を変える方法です。 例たとえば、このようなフォームにトグルボタンが貼り付けてあるとします。 このトグルボタンをオン・オフしたときに、ボタンのキャプションと前景色を変更するには次のように記述します。 Private Sub toggle1_AfterUpdate() If Me.toggle1.Value Then 'ON Me.toggle1.Caption = "ON" Me.toggle1.ForeColor...

Read More

【PowerShell】Windowsフォームにテキストボックスを表示して入力できるようにする

前回、『Windowsフォームを作成する』でWindowsフォームの表示をしてみましたが、今回は、Windowsフォームにテキストボックスを表示して入力できるようにしてみました。 まあ、マイクロソフトの下記のサイトのコードをほぼパクッてるんですが、テキストボックスをマルチラインにしたり若干アレンジを加えてますのでよかったら参考にしてみてください。 https://docs.microsoft.com/ja-jp/powershell/scripting/getting-started/cookbooks/creating-a-custom-input-box?view=powershell-5.1 Add-Type...

Read More

【サクラエディタ】矩形選択からの置換

(adsbygoogle = window.adsbygoogle || []).push({}); サクラエディタには矩形(くけい)選択という便利な機能があります。 矩形選択とは文字通り長方形の形での選択のことを言います。 そして、これがどうして便利かというと、文字列を列単位でコピーしたり切り取ったり貼り付けたり、または挿入することが出来るからです。あまり使う機会はないかもしれませんが、この機能があると作業が一気に楽になります。 例 たとえば、このようなカンマ区切りの文字列があったとします。 この文字列の左から４列目の「11111」の部分を「aaaaa」に置換するには次の行います。 まず、矩形選択の始まりの箇所にカーソルを合わせます。 カーソルを合わせたら、ここで...

Read More

【Access】タブコントロールでタブにマウスカーソルを重ねたときに文字色を変える

タブコントロールでタブにマウスカーソルを重ねたときに文字色を変える方法です。 例たとえば、このようなタブコントロールが貼り付けてあるフォールがあるとします。 このタブコントロールのタブにマウスカーソルを重ねたときに文字色を「赤」にするには次のように記述します。 Private Sub Form_Load() Me.tabCtrl.HoverForeColor = RGB(255, 0, 0) End Sub 実行結果 ...

Read More