VBAにおける文字列検索について

inStr("検索対象文字列","検索文字列")
戻り値:Integer

※第一引数に検索開始位置を指定することも可

VBAにおけるファイルアクセスについて

Dim intFileNo as Integer
Dim strBuffer as String
Dim intRows as Integer

'' ファイル番号を取得
intFileNo = FreeFile

'' ファイルオープン
Open "ファイルパス" For Input As #intFileNo
   
'' ファイルのEOF(End of File)まで繰り返す
Do Until EOF(intFileNo)

  '' 1行読み込み
  Line Input #intFileNo, strBuffer
           
  ''行を加算
  intRows = intRows + 1
 
  '' A列にレコード内容を表示
  Cells(intRows, 1).Value = strBuffer
Loop

'' ファイルクローズ    
Close #intFileNo

JavaScriptによるselectボックスの作成について

JavaScriptを用いて、selectボックスを動的に作成するサンプル
（参考：http://blog.gridworlds.com/js/how-to-create-optgroups-in-javascript）

1.オプショングループの作成

// オブジェクト作成
var asagohan = document.createElement("optgroup");
// ラベルの設定
asagohan.label = "朝ごはん";

2.オプションの作成

// オブジェクト作成
var siriaru = document.createElement("option");
// value値の設定
siriaru.value = "siriaru";
// 画面上に表示される選択文字列の設定
siriaru.appendChild(document.createTextNode("シリアル"));
// オプショングループに追加
asagohan.appendChild(siriaru);

3.選択済み項目の設定（必要に応じて）

siriaru.selected = true;

4.selectボックスクリア

// selectボックスを取得
var selectMenu = document.getElementById("foodOptions");
// 子要素がある分だけ除去
while (selectMenu.hasChildNodes()) {
  selectMenu.removeChild(selectMenu.firstChild);
}

5.オプショングループ追加

// 子要素を保持しているオプショングループオブジェクトをselectボックスに追加
  if (asagohan.hasChildNodes()) { selectMenu.appendChild(asagohan); }
  if (lunch.hasChildNodes()) { selectMenu.appendChild(lunch); }
  if (dinner.hasChildNodes()) { selectMenu.appendChild(dinner); }

Access2007におけるデータベースの最適化

Officeボタン→管理（M）

Googleで「Access2007」と入力すると、次の予測文字列は「最適化」がトップに来るぐらいみんな困ってる。