Dim wClct As New Collection wClct.Add 100 '「wClct.Item(1)->100」と表示される MsgBox "wClct.Item(1)->" & wClct.Item(1) '「wClct(1)->100」と表示される MsgBox "wClct(1)->" & wClct.Item(1) Set wClct = Nothing Collectionは、上記のようにItemを省略して記述することができます。 VBで何故このようなことができるか不思議でしたが、 自作のクラスでもできることがわかったのでメモメモ。 以下に簡単な例を作成しました。 Class1.cls Public Property Get Data() As Long ...
フィロの村note | 2010.10.31 Sun 21:45
文字列のバイト数を取得したい場合、どのようにすれば良いでしょうか? まず思い浮かぶのは文字列のバイト数を取得するLenB()を使用する方法だと思います。 しかし実際に「LenB("abc")」のように実行してみると、 文字数×2の「6」という値が返ってきてしまうかと思います。 (※VB6より前のバージョンでは3と返ってくるそうです。) これはVB6の内部コードがUnicodeであるため、 全ての文字が2バイトとして扱っているからだそうです。 しかし英数字は1バイト、日本語は2バイトのように計算したいこともあるかと思います。 ...
フィロの村note | 2010.10.31 Sun 21:45
VB6のテキストボックスは数値のみの入力を許可したい等の場合、 入力キーをキャンセルする方法があったのでメモしておきます。 VB暦4年でこれを知らなかったことに愕然としました。 今までChangeイベント時に文字列の入力位置を調べて不要文字削除~みたいな面倒なことをしてました… 無知って怖い…; 以下の例では全ての入力をキャンセルしています。 Private Sub TxtBox_KeyPress(KeyAscii As Integer) KeyAscii = 0 '入力キャンセル End Sub …そうですよね。 ByValの指定がないので、KeyAsciiは参...
フィロの村note | 2010.10.24 Sun 22:02
パソコン 初心者向けにはよさそうですねぇ。 プログラミングできるといいよねぇ~ 楽しそうだ。 JUGEMテーマ:プログラミング
キンキン | 2010.09.26 Sun 20:56
JUGEMテーマ:プログラミング 前回、macにRubyの導入は終わったので、次はゲーム開発ができる様に必要なライブラリを入れていきます。 これには前回よりも導入に時間がかかりました。。。 ホントにmacはめんどくさい! とりあえず続きからどうぞ。
PityuuuuN!ブログ | 2010.09.22 Wed 10:49
JUGEMテーマ:プログラミング 普通、macにはRubyの開発環境が入ってるんですが、versionが古いので新しくしようとしたら、5時間もかかったwww 基本的にUNIX系はコンソールだかターミナルだかしらんが、わかりづらいんだよ! WindowsみたいにGUIでいいじゃない!! ま、それはおいといて、もしまた導入せざるおえなくなった時のためにメモを残しておく。
PityuuuuN!ブログ | 2010.09.21 Tue 21:52
JUGEMテーマ:プログラミング AppleScript(アップルスクリプト)は、アップルが開発したMac OS用のオブジェクト指向のスクリプト言語。System 7(Mac OS 7にあたる)から採用されている。 仕組みAppleScriptはOSAに準拠したスクリプト言語の一つであり、アプリケーション等のプロセスにAppleEventを送ることにより自動操作を実現する。そういった意味ではマクロ言語と同等。しかし実際にはプログラミング言語の一種であり,通常はコンパイル済みのバイトコードが保存され実行される。このため,基本的にはOSのバージョン(Clas...
人気プログラミング言語種類一覧 | 2010.08.26 Thu 01:04
モンブかがくしょーのこどもむけWebサイト「プログラミン」。あそびながらプログラミングがまなべるよ。じぶんでおえかきしてうごかしたりできるよ。よいこもわるいこもおねーさんもおじーさんも、プログラミングをさわったことないひともあるひともいちどはあそんでみては?子供の頃に遊んだ「RPGツクール」を思い出すなぁ。コレ。授業でこんなんやってたら、誰でも簡単なプログラミングが出来る時代もすぐ来そう。「えいえんのイモムシ」音鳴るから注意 programin.showParts("d4c1182781d81455be826d68d9a2f17a"); JUGEMテーマ...
ウィスザッキ | 2010.08.22 Sun 19:58
顔写真の表示、顧客登録用紙を画面上で表示させるとフォームの表示自体の処理が必要で、処理速度に影響するので、コマンドボタンを用意し、そこからクリックし、拡大表示させる形にしたいです。☆コマンドボタンからのリンクPrivate Sub CommandButton10_Click() パス = Application.GetOpenFilename If パス <> False Then TextBox10.Value = パス Image10.Picture = LoadPicture(パス) ...
斜め35度の視点|こんな僕でも社長になれた。 | 2010.07.26 Mon 15:43
☆国内外の区別、所属クラスの区別(オプションボタン表示) '国内/外国区別 If Cells(表示行, 3).Value = "国内" Then seKOKUNAI.Value = True Else seGAIKOKU.Value = True End If '所属クラスのセレクトボタン If Cells(表示行, 186).Value = "A" Then seA.Value = True ...
斜め35度の視点|こんな僕でも社長になれた。 | 2010.07.22 Thu 15:31
全1000件中 911 - 920 件表示 (92/100 ページ)