2010年10月27日水曜日

IE7のショートカット

Check

IE7

キーボードのショートカット

後ろに新しいタブを作成してリンクを開く
CTRL+クリック

前面に新しいタブを作成してリンクを開く
CTRL+SHIFT+クリック

前面に新しいタブを開く
CTRL+T

アドレス バーから新しいタブを開く
ALT+ENTER

検索ボックスから新しいタブを開く
ALT+ENTER

クイック タブを開く (縮小表示)
CTRL+Q

タブを切り替える
CTRL+TAB/CTRL+SHIFT+TAB

指定のタブ番号に切り替える
CTRL+n (n は 1 から 8)

最後のタブに切り替える
CTRL+9

現在のタブを閉じる
CTRL+W

タブをすべて閉じる
ALT+F4

ほかのタブを閉じる
CTRL+ALT+F4

マウス ショートカット

リンクを後ろのタブで開く
リンクで中央のマウス ボタンをクリック

新しいタブを開く
最後のタブの右側で空の場所をダブル クリック

タブを閉じる
タブの真ん中のマウス ボタンをクリック

2010年10月22日金曜日

ブラウザで簡単にスマートフォンアプリが作れる!

Check
http://www.widgetbox.com


RSSリーダーを作ってみたよ!


コードを書かずに作れるので垣根が低くなりましたね!

2010年10月19日火曜日

クイックソートのソースを読んだ

Check
抽象化するのか具体化するのか中途半端になっちゃった。




もっとこまかくしたいな。


'Sub関数宣言(引数:array=配列、first=開始位置、last=終了位置)
 Sub quicksort(array, first, last)
     '変数宣言(point=配列の値, f=, l, tmp)
     Dim point, f, l, tmp
     '一番初めの配列の値を格納する
     point = array(first)
     '開始位置と終了位置を格納する
     f = first: l = last
     'ループ処理
     Do
         '値同士を比較して、一番初めに格納した値よりも小さければ、fを加算し続ける
         While array(f) < point: f = f + 1: Wend
         '値同士を比較して、一番初めに格納した値よりも大きければ、lを減算し続ける
         While array(l) > point: l = l - 1: Wend
         'fがlと一致するかlよりも大きい場合ループ処理を抜ける
         If f >= l Then Exit Do
         'fがlより小さい場合f番目の配列の値をtmpに格納する、
         'f番目の配列の値にl番目の配列の値を格納する、
         'l番目の配列の値にtmpを格納する
         '(要するにf番目の配列とl番目の配列を入れ替える)
         tmp = array(f): array(f) = array(l): array(l) = tmp
         'fに1加算、lから1減算
         f = f + 1: l = l - 1
     Loop
     '引数の開始位置よりもf-1が大きい場合再帰する(引数に配列、開始位置、f-1を設定)
     If first < f - 1 Then quicksort array, first, f - 1
     'l+1よりも引数の終了位置が大きい場合再帰する(引数に配列、l+1、終了位置を設定)
     If l + 1 < last  Then quicksort array, l + 1, last
'関数終了
 End Sub