Option Explicit Type MyStruct val As Long str As String End Type Sub foo() Dim a As MyStruct a.val = 10 a.str = "abcd" MsgBox a.val & a.str End Sub

Dim dic As Object Dim d As Variant ' Objectではダメ Set dic = CreateObject("Scripting.Dictionary") dic("a") = "A" ' データ追加 dic.Add "b", "B" ' データ追加、キーが存在した場合はエラー If Not dic.Exists("c") Then ' キーの存在確認 dic.Add "…

go言語でsqlite3を使用してみる。 Windows 64bitで下記の方法だと、コンパイル時に何故かgccを要求されます。コンパイルに通常よりも時間がかかるのでgccを利用した何かを行っている？ なお作成されたexeファイルの実行はgcc環境がなくてもOKでした。 入手先…

Packagesドキュメントに、そのものの機能が見つからなかったのでメモ package main import ( "fmt" "os" ) func Exists(filename string) bool { _, err := os.Stat(filename) return err == nil } func main() { if b := Exists("sample.txt"); b { fmt.Pri…

2011年6月以降に製造販売された当社製ノートパソコンに搭載されたバッテリーパック【パナソニック株式会社にて製造】の一部ロットにおいて不具合があり、最悪の場合、発火等の安全上の問題に至る可能性があることが判明いたしました。当社は、当該ロットのバ…

最初はMeCab+nattoで試したのですが、MeCabのサイトで公開されているライブラリは64bit Rubyでは動作しませんでした。他はないのかと検索したところ、こちらでRubyによる形態要素エンジンokura（注:ocraではない）が公開されていましたので早速インストール…

配列数式というのを知ったのでメモ。 対象の範囲の演算結果を内部的に配列に格納して計算を行う？ で良いのかな？ 下記はA1:A10の範囲の値のうち偶数をB列に表示する例。 B1からB5には以下の式が入力されている。Ctrl+Shift+Enterで入力し、式の両側に{ }が…

忘れそうなのでメモ。環境は、MSYS2のWin64 Shell（MSYS2 Shellではない）上のgccの場合。 予め.bashrcに環境変数LC_ALLを設定しておく。 export LC_ALL=ja_JP Cのソース内にsetlocale(LC_ALL, "")を記述する。 #include <stdio.h> #include <locale.h> #include <wchar.h> int main(int </wchar.h></locale.h></stdio.h>…