Office2000を使用している場合、Visual Basic Editor(VBE)では
マウスホイールが使用できません。
開発する上で、非常に効率が悪いので私はアドインを使ってホイールを有効化しています。

まず、以下のURLから「VB6MouseWheel.exe」パッケージをダウンロードします。
http://support.microsoft.com/kb/837910/ja

１．「VB6MouseWheel.exe」をダブルクリックし、任意の場所にファイルを解凍します。

２．[スタート]から[ファイル名を指定して実行]で以下を入力します。

regsvr32 <path>\VB6IDEMouseWheelAddin.dll

３．解凍したファイルの中の「VBA Mouse Wheel Fix.reg」を
　　ダブルクリックしてレジストリに登録します。

４．Visual Basic Editor(VBE)を起動し、メニューの[アドイン]-[アドインマネージャ]を選択し起動。

５．利用可能なアドインのリストに「MouseWheelFix」があるので、選択し
　　ロード方法の「ロード/アンロード」「起動時にロード」両方にチェックを入れ、OKをクリックしてください。

ToneGeneratorを使って、簡単な音を鳴らしてみましょう。

必要なインポート

import android.media.AudioManager;
import android.media.ToneGenerator;

音を鳴らす

ToneGenerator toneGenerator;
toneGenerator = new ToneGenerator(
        AudioManager.STREAM_ALARM,
        ToneGenerator.MAX_VOLUME);
toneGenerator.startTone(ToneGenerator.TONE_CDMA_EMERGENCY_RINGBACK);

続きを読む…»

日付(または時刻)文字列をDate型(バリアント)へ変換するには以下のような関数があります。

DateValue
TimeValue
CDate

・書式

val = DateValue( "[日付文字列]" ) '戻り値：Variant型
val = TimeValue( "[時間文字列]" ) '戻り値：Variant型
val = CDate( "[日付文字列]" ) '戻り値：Date型

続きを読む…»

Androidで、Zip形式の圧縮ファイルを解凍します。

インポート

import java.io.File;
import java.io.FileInputStream;
import java.io.FileNotFoundException;
import java.io.BufferedOutputStream;

import java.util.zip.ZipEntry;
import java.util.zip.ZipInputStream;

必要な変数の宣言

ZipInputStream in = null;
String zipPath = null;
ZipEntry zipEntry;
int data;
String file_name;

続きを読む…»

AndroidでBluetoothを使ってみます。

Bluetoothアダプタークラスをインポート

import android.bluetooth.BluetoothAdapter;

アダプターとリクエストコードの定義

BluetoothAdapter mBluetoothAdapter = null;
final int REQUEST_ENABLE_BT = 1; //任意のコード

アクティビティのonCreateでアダプターをセットします。

@Override
public void onCreate(Bundle savedInstanceState) {
    super.onCreate(savedInstanceState);

	mBluetoothAdapter = BluetoothAdapter.getDefaultAdapter();
}

続きを読む…»