Q:【(VB6)配列データの扱いについて】 以下のような流れのコーディングをしました。 流れ1:メソッドAからForm1のSetDataを呼び出し、配列を渡す 流れ2:Form1は受け取った配列をグローバル変数に設定する(イメージは以下の通り)。 Dim Array() As String Public Sub SetData(BayRef input_Array() As String) Array = input_Array End Sub 流れ3:ユーザの操作に応じて配列を修正する。 Private Sub ボタン1クリック() Array(0)="ボタン1が押されました" End Sub Private Sub ボタン2クリック() Array(0)="ボタン2が押されました" End Sub Form1が終了したとき、メソッドAで渡した配列も更新されることを期待したのですが 更新されませんでした。 以下のようにArrayを受け取るためのメソッドを用意したら配列を受け取ることができたのですが、、、、 出来ればForm1で設定したとおりに、メソッドAの配列が自動的に更新されるのが好ましいです (ポインタのようにデータを直接編集できる方法とあると嬉しいです)。 コーディング方法についてアドバイスいただきたく宜しくお願いします。 Public Sub GetData()As String() GetData = Array End Sub A:回答
Q:VB6について質問です Dim ctrlLabel() As Labelという配列が存在します。 このctrlLabel配列の中にForm1上に存在するLabel1を設定したいと思いますが可能でしょうか? 狙いはForm1からメソッドBを呼び出す際に、Label1を渡してあげることにあります。 メソッドBはラベルの存在しないFormBからも呼び出されるため、 配列にデータが存在するときのみ引数として受け取ったLabel配列(0)に 書き込み+リフレッシュを行うように考えています。 アドバイス宜しくお願いします。A:回答
Q:【満点差し上げます】[VB.NETで2次元配列の列1を、別の配列の列0に格納する方法] VisualBaisc2008Expressでプログラムしています。 2次元配列strA()と、同じく2次元配列strB() があるとします。 strA()の「第1行」を、strBの「第0行」に格納するサブルーチンを書いていただけますか。 例: strA = " AAAA aaaa BBBB bbbb CCCC cccc" strB = "" ↓ strA = " AAAA aaaa BBBB bbbb CCCC cccc" strB = " aaaa bbbb cccc"A:回答
Q:【満点差し上げます】[VB.NETでCSVファイルを2次元配列に格納するには?] VisualBasic2008Expressでプログラムしています。 指定されたCSV形式のファイル(カンマ区切り)を読み込み、それを、指定された2次元配列の変数に格納するサブルーチンを書いていただけませんか。A:回答
Q:VB2008のコードを教えてください。 特定のフォルダから、特定の文字で始まるテキストファイルのリストと、それらのそれぞれのプロパティを、2次元の動的配列に格納するサブルーチンです。 Private Sub GaineFilesByStartingCharactorsOfFile(ByRef strPathToSearch As String, ByRef strStartCharactorsOfSearch As String, ByRef strGainedFiles() As String, ByRef intNumbersOfGainedFiles As Integer) で始めます(正しいですか?)。 strPathToSearchで指定されたフォルダの中から、strStartCharactorsToSearchで指定された文字列で始まるファイル名(すべて「.txt」で終わります)のテキストファイルのファイル名のリスト(それぞれに「.txt」を含める)をstrGainedFiles()の列0に格納し、各ファイルの更新年を、ファイル名に対応する各行の列1に、同じく更新月を列2に、更新日を列3に、更新時を列4に、更新分を列5に、更新秒を列5に、それぞれstringにしたものを格納し、得られたファイルのファイル数をintNumberOfFileに格納する。 という動作をするコードを教えてください。どうぞよろしくお願いいたします。A:回答
Q:vs2005 VBで以下のプログラムを書いています。やりたいことはNOTEPADが起動しているかどうかをしらべて起動していたら処理をするものです。しかし、HASEXISTEDで実行エラーとなります。 どうしてでしょうか? Dim myProcesses() As Process myProcesses = Process.GetProcessesByName("notepad") If myProcesses(0).HasExited Then <=ここでエラー notepadが存在していたら何らかの処理をする Else 存在してなかったらなにもしない End If NOTEPADが立ち上がった状態で実行して以下のエラー 'System.IndexOutOfRangeException' のハンドルされていない例外が XXX.exe で発生しました。 追加情報: インデックスが配列の境界外です。 A:回答
Q:VB.NETの正規表現を使って、ある一行の文字列から一部だけを抜き出したいと思っています。文字列のフォーマットは以下の通りです。 LEAK,http://counter.hatena.ne.jp/genfm/1?js=1&mode=default&c=1024x768,32&r=http://b.hatena.ne.jp/hotentry,,Sat Nov 29 11:05:51 2008 ,1[1],FJF2BQFL,HTTP/1.1 200 OK P3P: CP='NOI DSP COR HISa OUR NOR' X-Framework: Hatena/2.0 Content-Type: application/x-javascript; charset=utf-8 Content-Encoding: gzip Content-Length: 371 Keep-Alive: timeout=5, max=99 ~U:me 「,」で情報を区切っています。この一行の文字列から2番目、4番目、5番目、6番目のブロックを抜き出して配列に格納したいです。VB.NETでの方法がいまいちわからないので、どなたかお教えお願いします。 <追記> http://counter.hatena.ne.jp/genfm/1?js=1&mode=default&c=1024x768,32&r=http://b.hatena.ne.jp/hotentry 2ブロック目のURL中に「,」が入っちゃってますが、これは無いとしてお願いします。A:回答
Q:マクロかプログラムで以下の事をやりたいと思っています。 ・ブラウザであるサイトにアクセスする(プログラムでアクセスする場合は、ログインが必要です) ・そのサイトにはX件のリンクが存在する ・またページ数はY件存在する ・まずは1ページ目のリンクのみを抽出して配列に入れる ・次のページに行って同じ事をする ・Y件まで行ってすべてのURLを配列に入れる Windows XPで動作するものであれば何のマクロだろうとプログラムだろうとかまいません。これを行うのに一番簡単なプログラム言語と、大まかなプログラムの流れを教えてください(できればコード付で)。Perlとかはやめてください。VB,Ruby,WSH,Power Shellとかわかりやすいものでお願いします。UWSCでできればそれでもOKです。A:回答