VB

 プログラムを書いているとき、参考になるソースコードを探すことはよくありますよね。 ここで紹介するのは、世界最大のソースコード共有サイトだと言われているサイトです。 最大というわけではないと思いますが、トップ 2 には間違いなく入っています :) URL：http://www.hotscripts.com/ このサイトを開くと、まずカテゴリーのページが表示されます。 カテゴリーはプログラミング言語ごとに分かれています。 主なものは PHP、CGI、ASP、Perl、Java Scripts .AJAX、C & C++、Ruby On Rails（RoR）、Python など、それぞれのソースコードです。 使いたい言語を選んで、ゆっくり探すことができます。 または、右上の検索機能を使うこともできます。 ただし、中国語では入力しないでください。 外国のサイトなので、中国語のプログラムはあまり多くないからです。 特定のカテゴリーに絞って検索することもできますし、 すべてを対象に検索する（All……と書かれたもの）こともできます。 検索ボックスのドロップダウンメニューから選ぶだけです。 お目当てのプログラムが見つかったら、簡単に説明を確認することができます。 ダウンロードしたい場合は、ウィンドウの Download ボタンをクリックするだけです。 また、注意が必要な点もあります。有料のプログラムがあることです。 通常、（Sponsor）のマークが付いているものは有料です。 このサイトにはアカウント登録機能もあります。 ただ、私が利用したときは、アカウント登録は必要ありませんでした。 海外のサイトが苦手な方は 英語が読めない方は 中国語のサイト「藍色小舖（Blueshop）」でもソースファイルを探せます。 http://www.blueshop.com.tw/download/default.asp

今日は、VB 本体が提供している方法を使ってファイル名を変更する方法をご紹介します。 構文は次のとおりです： Filesystem.rename(a,b) a は入力ファイル、つまり名前を変更する対象のファイルです。 b は出力されるファイル名です。 注意してください。a と b の両方のパラメーターは、必ずフルパスで指定する必要があります。 たとえば、c:123.txt というファイルを 456.txt に名前変更したい場合は、次のように入力します： Filesystem.rename("c:123"."c:456.txt") ご注意ください！私の二つのパラメーターはどちらも拡張子を含み、さらにドライブ名とフォルダー名も含んでいます。 もし b パラメーターにフルネームを指定しなかった場合、名前変更後のファイルはプログラムのルートディレクトリーに移動されてしまいます。 みなさん、わかっていただけましたか？ この構文は 2008 と 2005 で使えました。VB6 では試したことがないので、わかりません。

今日は、自分で関数を書く方法を説明します。 まず、関数の文法を知っておく必要があります。また、自作の関数はプログラムの最下部に置かなければなりません。 文法: Function 関数名(Byval 引数 As 引数の型,Byval 引数 As 引数の型) 関数名=実行する内容 End Function 簡単に説明します。関数名は自由に決めてかまいません。関数名をダブルクォーテーションで囲む必要もありません。 引数はあってもなくてもかまいません。関数の性質によります。値を受け取る必要がある関数の場合は、引数を設定しなければなりません。 ...

 VB でフォームを切り替えたい場合は、show() 構文を使えます。 構文は次のとおりです。 フォーム名.show() 「フォーム名」の部分には、切り替えたいフォームの名前を入れます。 たとえば、form2 というフォームに切り替えたい場合は、 form2.show() と入力すれば OK です。 また、新しいフォームを開いたあとに古いフォームを閉じたい場合の構文は次のとおりです。 フォーム名.close() 自分自身を閉じる場合は me.close() ' 自分を閉じるという意味 この構文は、ほかのフォームを閉じるのにも使えます。 ただし、閉じるフォームは自分のプログラムに属している必要があります（当たり前ですが）

VB で文字列の一部を別の内容に置き換えたい場合は、Replace 関数を使えます。 構文は次のとおりです。 文字列名.replace(A,B) 「文字列名」の部分には、文字列を格納している変数の名前を書きます。 たとえば、S1 に 123456 を格納しておきます。 その場合は S1.replace(A,B) と入力します。 ...

まず、プログラムに Timer コンポーネントを追加します。 タイマー（名前は timer1）を有効にします。 Interval を 100 に設定します。 次に、以下のコードを入力します（そのまま貼り付けて、既存のコードを上書きしてください）。 Option Strict Off Option Explicit On Public Class Form1 Inherits System.Windows.Forms.Form Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Integer, ByVal hWndInsertAfter As Integer, ByVal X As Integer, ByVal Y As Integer, ByVal cx As Integer, ByVal cy As Integer, ByVal wFlags As Integer) As Integer Dim IntR As Object Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Top = 0 Me.Left = 0 Me.Width = System.Windows.Forms.Screen.PrimaryScreen.Bounds.Width Me.Height = System.Windows.Forms.Screen.PrimaryScreen.Bounds.Height End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick IntR = SetWindowPos(Me.Handle.ToInt32, -1, 0, 0, 0, 0, 3) End Sub End Class

キーボードは、コンピューターを使ううえで今も非常に重要な入力デバイスです。マウスが主流の今日でも、多くのプログラムはキーボードなしでは操作できません。しかし、繰り返しの多い面倒なキー操作は人を疲れさせるため、キー入力をプログラムに代わりに行わせるという発想が生まれました。これにより多くの手間を省けます。按鍵精靈（キーボードマクロツール）がまさにそのようなソフトウェアです。では、VB を使って按鍵精靈に似た機能のプログラムを書くにはどうすればよいのでしょうか。まずは、Windows がキーボードイベントに反応する仕組みを理解しましょう。 ...