トップページ⇒tech
1001コメント345KB

VBプログラマ質問スレ(6.0以前) Part50

■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん2006/10/22(日) 20:39:53
ここは Visual Basic 〜6.0 の質問スレです。
質問者は使用しているOS、VBのバージョン、サービスパックのバージョン、
「何がしたくて、どうしたけど、どう困っているのか」を明確に書きましょう。

VB.NETは別物なので専門スレで、VBA、APIの質問もそれぞれのスレで。

○ 質問者の心得
 一.質問する前にMSDNやGoogle、過去ログにも目を通してみる。
 二.VBScript、インストーラーなどはこのスレでOK。
 三.質問は第三者にもわかりやすいよう簡潔かつ具体的に。
 四.荒らしは相手しない。

○ 回答者の心得
 一.答えられない質問は無駄に罵倒せずスルー。無理するな。
 二.代用法を強制しない。
 三.回答する上で必須ではない情報をむやみに聞き返さない。
 四.荒らしは相手しない。
 五.VB情報募集中。
 六.回答は質問者が理解できるよう具体的に。

MSDN Online Japan ホーム
 http://www.microsoft.com/japan/msdn/default.asp
Visual Studio 6.0 Service Pack 6
 http://msdn.microsoft.com/vstudio/downloads/updates/sp/vs6/sp6/default.aspx
Google
 http://www.google.co.jp/

※「まず自分で調べる」クセを身につけよう。
02372322006/11/16(木) 21:11:09
>>233
ちょっと面白かったです。

>>236
Exeを実行しているマシンというのがどれを指すのかちょっとわかりませんが、
自分のPCでVB起動してコード書いてコンパイルして、ってやってまして
それで今回はExeファイルすら作れないという状況です。

参照設定はできてると思います。
オブジェクトブラウザから見れますし、デバッグ(F5押してやるやつ…)では
たしかに動いていましたから。
0238デフォルトの名無しさん2006/11/16(木) 21:51:55
>>232
CreateObject でやるとか。
0239デフォルトの名無しさん2006/11/17(金) 01:33:20
>>233
無いと答える必要はない。
何故なら悪魔の証明にあるように、無の証明はまず出来ないからだ。
一個人の「無い」という回答は、「俺は知らない」と同義。
0240デフォルトの名無しさん2006/11/17(金) 04:29:08
>>225
> HTMLが表示
→テキストでおk

> ローカルのhtmlファイルを読ませる
→ファイル直読みできるメソッドアリ

つ RichTextBoxコントロール
0241デフォルトの名無しさん2006/11/17(金) 05:00:35
○ 回答者の心得
 一.答えられない質問は無駄に罵倒せずスルー。無理するな。
 二.代用法を強制しない。
0242デフォルトの名無しさん2006/11/17(金) 05:39:24
ルールを守れない質問者より、ルールを守れない回答者の方が多いスレってのも珍しいよねw
0243デフォルトの名無しさん2006/11/17(金) 05:46:29
ここの1はルールというほどの強さは無いさ
あえて心得を外すほどの回答は無いようだが。
0244デフォルトの名無しさん2006/11/17(金) 06:32:25
>>237
せめて、F8。

Option Explicitもつけて。
0245デフォルトの名無しさん2006/11/17(金) 14:31:32
> ここの1はルールというほどの強さは無いさ
その割には質問者には.NETはスレ違いだの、ググれMSDN読めと強制していたような・・・

> あえて心得を外すほどの回答は無いようだが。
いや、そうでもない。
0246デフォルトの名無しさん2006/11/17(金) 15:36:50
常識的に考えても.NETはスレ違いだろう
0247デフォルトの名無しさん2006/11/17(金) 16:35:40
常識的に考えても答えられない質問だからって罵倒するのはダメだろう
0248デフォルトの名無しさん2006/11/17(金) 21:05:52
>>245
ググルのと、MSDN をそれらしい言葉で検索するぐらいのことしてから
質問するのは常識だと思うけど。

質問者自身のためにも。
02492452006/11/17(金) 21:19:06
>>248
あのー、それを俺に言われても・・・。
>>1に書かれていることはルールではないと言ってるのは>>243だよ。
俺はそれを受けて、ルールじゃないと主張する割にはルールのように強制してるな、と返しただけ。

俺自身は.NETはスレ違いだと思うし、先に検索するのを含めて
「○ 質問者の心得」も「○ 回答者の心得」も、それぞれが守るべきルールだと思ってる。
0250デフォルトの名無しさん2006/11/17(金) 21:24:44
>>249
頭の固い人だな、気持ち悪い
02512322006/11/17(金) 21:29:11
>>238
CreateObjectでコンパイルできました!
ありがとうございます。
しかしなぜNewではだめだったのか…わかりかねます。

>>244
Option Explicitもつけてましたし、F8も使っていました。
ですが、コンパイルできませんでした。


もう一つ質問させてください。MSDNで一応調べましたけどわかりませんでした。
またVB4.0でADOなのですが、Recordsetオブジェクトは
ActiveConnectionプロパティ、CursorTypeプロパティなどで
Open前に値の設定ができます、よね。
その設定をしているにもかかわらず、

[RecordSetオブジェクト].Open
だと「引数が足りません」と、エラーになります。
.Open "テーブル名",[Connectionオブジェクト],…
と、引数で値を設定してあげると問題なく開きます。
Connectionオブジェクトでも、同じような状態です。

開くだけならそれでいいのですが、DataGridを使用したいのです。
そのためにはRecordSetオブジェクトを開く前に
[RecordSetオブジェクト].Properties("IRowsetIdentity")=True
を記述しないと表示されないようなので、
RecordSetオブジェクトのOpen前に値の設定をしたいのです。


長くなってすみませんが、よろしくお願いします。
0252デフォルトの名無しさん2006/11/17(金) 21:30:25
Visual basic 6.0を用いた RS-232Cケーブルを用いたシリアル通信についてご質問いたします。

いま、PCとある機器を繋いで1分間隔でデータを要求し、それに対して 返信をもらうようなロガー機能を持たせたシリアル通信プログラムを
作っているのですが、知識が薄いために困っています。使用機能はMScommです。

具体的には、文字列データ約50個を1分おきに送信して (このタスクはタイマールーチンに入れます)機械に要求し、
それに対して応答が来れば受信→ファイルに書込み→ 最終的には時刻と機械から取り込んだ複数の数の関係を
グラフにしたいと思っています。 困っているのは受信のコードの記述ですが、本ケースにおいては、
イベントドリブン形式で(Rthreshold=1,Sthreshold=1等と設定して、) 1文字ずつ受信→イベント発生→1文字データ読取
とさせることが厳しい(と思う)いうことです。
ソース的には �@〜�Cまでのタスクを1分周期で行いたいです。できれば ウォッチドッグ機能もつけたいですね。
�@メインルーチンをタイマーにして、MSComm1.Output="G aa bb cc dd ee ff "
のように、相手機械にaa,bb,cc,dd,eeという変数を要求(ちなみに
Gは相手側機械に要求するというコマンド) �A要求に対する受信を待つ→aa=1.01, bb=2.02, cc=3.03, dd=4.04, ee=5.05
のような値が以下のような感じで相手から返ってくる "1.01 2.02 3.03 4.04 5.05"
�Bここで1文字ずつ受信ごとにイベント発生ではなく送信完了したら、受信待機を始めて受信バッファに
たまったものを一度で書き込む�@〜�Bを4回繰り返す(データが大量にあるため、4回にわけないといけない)
�Cファイルに書込み

VBシリアル通信にお詳しい方、どのようなコードにすれば良いかお教え下さい。相当困っています。
以上、よろしくお願いいたします。
0253デフォルトの名無しさん2006/11/17(金) 21:41:27
>>250
0254デフォルトの名無しさん2006/11/17(金) 22:01:29
>>251
そもそも何故VB4・・・
まさかOSはNT4なの?
0255デフォルトの名無しさん2006/11/17(金) 22:43:53
>>252
人に話すのと人に説明するのが同じ人間って言われないか?
読みづらいんだが…しかも激しく
0256デフォルトの名無しさん2006/11/17(金) 22:51:48
○ 回答者の心得
 一.答えられない質問は無駄に罵倒せずスルー。無理するな。
0257デフォルトの名無しさん2006/11/17(金) 22:53:14
○ 質問者の心得 
 三.質問は第三者にもわかりやすいよう簡潔かつ具体的に。
0258デフォルトの名無しさん2006/11/17(金) 23:02:51
>>257
無駄に罵倒する理由にはならない。
ルールは守るべきだ。
0259デフォルトの名無しさん2006/11/17(金) 23:09:28
^^;;;;;
0260デフォルトの名無しさん2006/11/18(土) 00:05:39
XPで6.0を使用しています。
ある特定の範囲内にドロップされたImageコントロールを、
特定の座標に移動させたいのですが、どのようにすればいいでしょうか?
0261デフォルトの名無しさん2006/11/18(土) 01:27:07
>>252
割り込み使うならSAMPLESにあるVBTERM参考にすればどうよ
あるいは送信して受信完までループさせて待つ手もある
0262デフォルトの名無しさん2006/11/18(土) 02:17:59
>>261
ありがとうございます。VBTERM発見しました。
これを元に考えてみます。
0263デフォルトの名無しさん2006/11/18(土) 03:10:10
VSBでHTTPSのサーバーにアクセスしてファイルをDLしてくるスクリプトを組んでるのですが、
全ての処理をバックグラウンドで行いたくて、ダイアログ等の表示が無い様にしたいんです。
IEのオブジェクトを使うと、どうしてもSSLの認証ダイアログが出てきてしまうのですが、非表示で処理する方法って無いですか?
0264デフォルトの名無しさん2006/11/18(土) 13:51:18
IEのオブジェクトを使わない。
0265デフォルトの名無しさん2006/11/18(土) 14:15:29
VBわからんけど不通にソケットでつないでリクエスト投げればファイルくらい取れるんじゃね?
0266デフォルトの名無しさん2006/11/19(日) 16:25:23
かなりいろいろ調べたのですが方法がわからないのでここ
で質問させてもらいます。
テキストファイルを読み込んでその中の最後から5行ほどだけを
を表示する方法を教えてください。
0267デフォルトの名無しさん2006/11/19(日) 16:54:59
>>266
全部または最後の五行分が余裕で入るくらいの情報を読み込んで後ろから改行コードを探す
0268デフォルトの名無しさん2006/11/19(日) 17:10:24
すみません質問なんですが
ttp://up2.viploader.net/pic/src/viploader354556.bmp
Command1を押してText1に入力した文字を変数にいれて
Command2を押すとLabel1にその変数が出力されるという問題なんですが
変数のところがよくわかりませんよろしくお願いします
0269デフォルトの名無しさん2006/11/19(日) 17:19:13
Dimを先頭に
0270デフォルトの名無しさん2006/11/19(日) 17:21:08
>>268
問題って、専門学校か何か?
VBを勉強する学校とかあるのかな?
教えるから、教えてよ。


Dim ABCD AS long

を
Private ABCD AS string

として、しかも一番上に書くとおk
0271デフォルトの名無しさん2006/11/19(日) 17:38:51
>>263
どうせスクリプトならjavaスクリプトの方が使えるぞ。


SSL認証きいてくるなら、しょうがないような気がするんだが


自分でサーバたてればねぇ
0272デフォルトの名無しさん2006/11/19(日) 17:39:02
Private Sub General()
Private ABCD As String
ABCD = Text1
End Sub
上記のようにジェネラル欄にいれたんですが変数がCommand2押しても
だめなんですがどうすれば後コマンド1-2部分は合っていますか?

>>269 Dim をどこにいれればいいですかね
>>270 都内のコンピュータ情報系みたいな専門学校です 

0273デフォルトの名無しさん2006/11/19(日) 17:40:04
>>272
Private ABCD As String
Private Sub General()
0274デフォルトの名無しさん2006/11/19(日) 17:44:10
>>273 先生できました、ありがとうございます禿感謝
0275デフォルトの名無しさん2006/11/19(日) 18:01:27
>>274
すげぇかわいい。


今は打算でしか、物事を考えられないオレも
昔はそうやって自分で勉強したんだって記憶が
蘇ってきた・・・
0276デフォルトの名無しさん2006/11/19(日) 18:04:27
>>275 なにそれ気持ち悪いんだよ禿
02772752006/11/19(日) 18:07:57


_| ̄|○ il||li

02782632006/11/19(日) 19:02:21
>>271
そうなんですよねぇ。相手が取引先の鯖なので手が出せないんですよ。
仕方が無いので、OpenSSLのソース使ってCで認証だけ通す事にしました。
ActiveX化されたものもあるみたいなのですが数十万オーダーでしたので、自作します。
ありがとう御座いました。
0279デフォルトの名無しさん2006/11/19(日) 19:11:53
>>223
ちゃんと勉強してからいいなはれ。

世間ではよく誤解されているようだが
浮動小数点数にはいつモヤモヤと誤差があるわけじゃない。
値によってはちゃんと誤差なく表現が出来る。
まず小数部の桁数(ビット数)が足りている限り整数は全く誤差なく表現できる。
また(1/2)^nは10進表現で言えば(1/10)^mに当たる特別な数字群で
2進数の浮動小数点表現でも桁がずれる(つまり指数部の数字が変わる)
だけなので整数と同じく全く誤差なく表現できる。
(指数部が桁あふれしない限りな。)
そしてこれらの数の間の加減算は桁あわせした際に桁数が足りている限り
完全に正確に行われる。
さらに乗除算の場合は指数部の桁数が足りている限り完全に正確に行われる。
つまり浮動小数点数も注意深く使えば全く誤差のない表現と演算が可能だ。

そしてこの性質と
一部のプロセッサでは専用ハードウェアによってlongを使う整数演算より
浮動小数点演算のほうが早いということを生かして大量の整数演算する際に
わざわざ浮動小数点演算を利用するという研究が実際にある。
0280デフォルトの名無しさん2006/11/19(日) 19:19:18
>>279
どうでもいいから、>>224を試しに実行してみればいいじゃん。
0281デフォルトの名無しさん2006/11/19(日) 19:22:56
>>270
Dimのままじゃだめなんですか
02822752006/11/19(日) 19:25:37
>>281
オレに聞いてるv(´∀`*v???
0283デフォルトの名無しさん2006/11/19(日) 20:28:29
>>266
5行分のバッファを用意して、最初から順番に読んで格納し、
6行目は一行目のバッファに上書きして・・・ってやればいい。
最後迄読めば、最後の5行分が残るでしょ。
02842662006/11/19(日) 20:34:23
ありです
できました
0285デフォルトの名無しさん2006/11/19(日) 23:42:10
>>260ですが、何かいい方法はないでしょうか?
0286デフォルトの名無しさん2006/11/19(日) 23:51:17
>>285
俺はルールを守っている。
0287デフォルトの名無しさん2006/11/19(日) 23:53:44
>>260
ある範囲内に
Imageをドラッグドロップした座標4点が含まれてるか調べる。
含まれてたらImageを特定の座標に移動。
0288デフォルトの名無しさん2006/11/20(月) 09:26:51
>>287
オマイの回答と>>260の質問と、何が違うのか教えてくれw
02892872006/11/20(月) 10:50:00
>>288
ソース無しで答えるにはこれが精一杯だと思うw
まぁ書いてることは変わってないけど・・・
書いてるとおりの事をソースで書けば良いだけなのになぁ・・・
0290デフォルトの名無しさん2006/11/20(月) 11:50:53
○ 回答者の心得
 一.答えられない質問は無駄に罵倒せずスルー。無理するな。
0291デフォルトの名無しさん2006/11/20(月) 11:53:55
>>287
わかりました、ありがとうございます
もう少し頑張ってみますね
0292デフォルトの名無しさん2006/11/21(火) 14:31:16
VBでHashtableの機能を持つ型ってある?

せいぜい、コレクションくらいしか、今のところ知らない。
ArrayListすらVB6.0にはないよね?

ないなら、自作しかないのかな?
0293デフォルトの名無しさん2006/11/21(火) 16:53:09
CollectionかDictionaryが使えるんとちゃうん?
02942922006/11/21(火) 17:03:32
>>293
Dictionaryは初めて知りました。
自作なんかより全然速そうで素敵です。

アリガ�d
0295デフォルトの名無しさん2006/11/21(火) 18:36:52
VB6で、イメージの部分に順番に図を表示していきたいのです。
それと、リストボックスで選択したものをファイルに書き込みたいのです。
以下のようにやってみたのですが、うまくいかずどうしていいか分かりません。
教えていただけないでしょうか。

Public dirl, angele As String
Dim fname(100) As String
Public cot As Integer

Private Sub form_load() 'フォームが開いたときの処理
Dir1 = "C:\Documents and Settings\karalab\My Documents\ito\図形\0" '表示イメージを読み込みするファイル
For i = 1 To 100
fname(i) = Str(i) + ".jpg"
Next
End Sub

'スタートの処理
Private Sub Command1_Click()
cot = 1
Image1.Picture = LoadPicture(Dir1 + fname(cot)) 'イメージを表示
End Sub

'次へを押したときの処理
Private Sub Command2_Click()
Image2.Picture = LoadPicture(Dir1 + fname(cot)) 'イメージを表示
End Sub

Private Sub Command3_Click() '「END」ボタンを押した場合
End
End Sub
0296デフォルトの名無しさん2006/11/21(火) 18:40:35
DTPickerってEnterキーでもKeyDownイベント起きるよな?
BreakPoint仕掛けてるのに一向に通ってくれないよ。
Spaceとか他のキーならOKなのにEnterだけ効かん。orz
0297デフォルトの名無しさん2006/11/21(火) 18:55:00
カレントユーザーのマイドキュメントのパスを取得する方法ってある?
0298デフォルトの名無しさん2006/11/21(火) 18:59:22
>>296
普通はくるね。
0299デフォルトの名無しさん2006/11/21(火) 19:02:09
>>297
環境変数でTMPあたりから取得したパスを加工するとか
あらかじめ、環境変数に入れとくとかじゃだめ?
0300デフォルトの名無しさん2006/11/21(火) 19:07:53
>>296
Command Button のどれかをデフォルトボタンにしてるのでは。

>>297
環境変数の USERPROFILE を参照するとか。
0301デフォルトの名無しさん2006/11/21(火) 19:08:12
>>297
Dim obj As Object

  Set obj = CreateObject("WScript.Shell")
  Debug.Print obj.SpecialFolders("MyDocuments")
0302デフォルトの名無しさん2006/11/21(火) 19:13:58
>>295
ソースが汚ねぇ

それに Str(i)ってどこで宣言してる?
Option Explicitを入れてコンパイル汁。

あとdirlの宣言ではバリアントになってるけどいいの?
03032962006/11/21(火) 19:16:55
>>298
�d。だよねぇ。
別のフォーム上ではちゃんとKeyDown発生してる・・・orz
0304デフォルトの名無しさん2006/11/21(火) 19:19:45
いろいろ、ありがとうございます。
今直してみて、2つディレクトリを使って
「次へ」を押したときにDirから+1ずつ足してずを表示していきたいのですが+1しかされず、
その後、足されていかないのですがどうしたらいいでしょうか?

Private Sub Command1_Click()
Dir1 = "C:\Documents and Settings\karalab\My Documents\ito\図形\21\" '表示イメージを読み込みするファイル
Dir2 = "C:\Documents and Settings\karalab\My Documents\ito\図形\11\" '表示イメージを読み込みするファイル
For i = 1 To 100
fname(i) = Mid(Str(i), 2) + ".jpg"
Next
cot = 1
Image1.Picture = LoadPicture(Dir1 + fname(cot)) 'イメージを表示
Image2.Picture = LoadPicture(Dir2 + fname(cot))
End Sub
'次へを押したときの処理
Private Sub Command2_Click()
Image1.Picture = LoadPicture(Dir1 + fname(cot + 1)) 'イメージを表示
Image2.Picture = LoadPicture(Dir2 + fname(cot + 1))
End Sub
0305デフォルトの名無しさん2006/11/21(火) 19:24:15
書いてる通りに動いてる
0306デフォルトの名無しさん2006/11/21(火) 19:31:01
>>304
まさにソースに書いてある通りに動いてる。
cotの値はいくら?
0307デフォルトの名無しさん2006/11/21(火) 19:36:44
前のレスで質問させていただいたものは解決することが出来ました。
申し訳ありません。
あと、もうひとつ質問なのですがリストボックスで選択したものをファイルに書き込みたいのです。

以下のような、書き方では書き込むことは出来ませんか?

Open "C:\DATA\OrderData.csv" For Append As #2
Write #2, list1.Text, _
list2.Text, _
list3.Text, _
Close #2
0308デフォルトの名無しさん2006/11/21(火) 19:52:24
ピクチャーボックスで
Picuture1.Heightでは高さが変わるんですが
Picture1.ScaleHeightではピクチャーボックスの大きさが変わりません
値の取得はできるのですが…

大きさの方はフレームの分も考えながらHeightで設定しなければいけないのでしょうか?
0309デフォルトの名無しさん2006/11/21(火) 19:58:46
すいません、分かりました、
ScaleHeightに値を設定すると、ユーザー設定の座標系になるんですね。
ScaleHeight=100 としたら、上から下までを100とするオリジナルの座標系になると
いや、分かりにくい書き方ですけど自己解決
0310デフォルトの名無しさん2006/11/21(火) 23:16:19
VBでプログラミングの世界に入ってみようと思うのですが
初心者におすすめの入門書、参考書を教えてください。
0311デフォルトの名無しさん2006/11/22(水) 00:04:35
>>310
いまさら6.0をはじめるのか?
やめとけよ
0312デフォルトの名無しさん2006/11/22(水) 00:28:01
>>311
ぐわ、6.0以前スレでしたか・・・
誤爆でした。すみません。
0313デフォルトの名無しさん2006/11/22(水) 04:08:21
VBでアイコンをリソース登録したんだけど、それを使おうとするとエラーになるのは何で?
WAVファイルをリソース登録して鳴らす方法は色んなサイトにあるのに、
アイコンの使い方書いてるサイト見つけられなかったんだけど。
0314デフォルトの名無しさん2006/11/22(水) 09:09:40
>>313
画面にワーク用のイメージリストコントロールをはる。
そこにリソースから取得したアイコンをAddする。
最後にイメージリストのItemをExtractIconメソッドでアイコン化して
そこから、使いたい場所へ使う。

なんてのはどうよ?
0315デフォルトの名無しさん2006/11/22(水) 11:41:28
エクセルVBAで作ったフォームをVB6にインポートしましたがデザイナというフォルダ内にセットされました。
コントロールを追加しようとするとFormデザイナでは使用できません云々のエラーとなってしまいます。
プログラム自体は問題なく走るんですが、コントロールの追加は一切無理です。コントロールの削除や移動はできます。
やり方が悪いのか、これで当たり前なのかすらわからない状況です。
先輩諸氏の皆様どうかご指導ください。
0316デフォルトの名無しさん2006/11/22(水) 12:31:02
>>314
ありがとやってみる。
ずいぶん前に諦めたからエラーの内容や関数名忘れてるけど、
どちらにせよ記憶に無いやり方みたいなんでやる価値ありそうだ。
0317デフォルトの名無しさん2006/11/22(水) 13:39:14
http://www.vector.co.jp/soft/win95/util/se072729.html
作者の方へ

VisualBasicの学習者たちのためにソース公開してください
(公式サイトが消滅しているようなので、ここにカキコします)
((((;゚Д゚)
0318デフォルトの名無しさん2006/11/22(水) 14:34:36
>>317
BREGEXP.DLLじゃないか
0319デフォルトの名無しさん2006/11/22(水) 15:15:06
ソース公開の強要って、、、w
頭おかしいんじゃないの?
03203152006/11/22(水) 20:00:28
エクセルVBAで作ったフォームをVB6にインポートしましたがデザイナというフォルダ内にセットされました。
コントロールを追加しようとするとFormデザイナでは使用できません云々のエラーとなってしまいます。
プログラム自体は問題なく走るんですが、コントロールの追加は一切無理です。コントロールの削除や移動はできます。
やり方が悪いのか、これで当たり前なのかすらわからない状況です。
先輩諸氏の皆様どうかご指導ください。



0321デフォルトの名無しさん2006/11/22(水) 20:19:00
当たり前。
VBAとVB6は多くの部分で互換性があるが、完全互換ではなく
その互換性がない部分の一つがVB6のフォーム対VBAのユーザーフォームの部分。

まあテキストエディタで開いて少し修正すれば使えないこともないから
やり方が悪いとも言えるかも知れないが。
どう修正するかはググればわかるから自分で調べること。
03223152006/11/22(水) 20:26:55
>>321
厳しくも暖かいご意見ありがとうございました。
散々ググッて見たのですがググり方が足りなかったようです。
これからググりまくってみます。
0323デフォルトの名無しさん2006/11/22(水) 21:27:03
>>322
エクセルでそれを見ながらVBでゼロから作った方が早い。
0324デフォルトの名無しさん2006/11/22(水) 22:59:06
VB6 SP6をWindowsXP Home Edition SP2で使用しています。
作成されたアプリケーションをエクスプローラから見ると、ファイル名の下に
登録ユーザー名が表示されてしまうのですが、これを変更することはできないのでしょうか?
0325デフォルトの名無しさん2006/11/22(水) 23:00:42
ユーザー名ではなく所属でした。。。お願いします。
0326デフォルトの名無しさん2006/11/22(水) 23:03:27
変更できます。
0327デフォルトの名無しさん2006/11/22(水) 23:38:20

http://pc8.2ch.net/test/read.cgi/tech/1159388733/64 VB6 >>>>>>>>>> VB.NET
http://pc8.2ch.net/test/read.cgi/tech/1152851763/91 VB vs Delphi @夏厨2006
http://pc8.2ch.net/test/read.cgi/tech/1106538237/766 【VB.NET】VS2005 選ぶならどっち?【C♯】
http://pc8.2ch.net/test/read.cgi/tech/1161250878/375 VB.NET質問スレ (Part18)
http://pc8.2ch.net/test/read.cgi/tech/1159446575/23 VB6とVB2005って全然違わない?
http://pc8.2ch.net/test/read.cgi/tech/1151836157/21 CとVB.NETってよく似てるよな
http://pc8.2ch.net/test/read.cgi/tech/1147201705/40 VB.NETのとんでもない欠陥に気づいた
http://pc8.2ch.net/test/read.cgi/tech/1134464762/104 VBで作られた有名なアプリって何?
http://pc8.2ch.net/test/read.cgi/tech/1121006960/123 VB vs Delphi @夏厨2005
http://pc8.2ch.net/test/read.cgi/tech/1099112351/441 C++VB 初めてプログラム板来た初心者スレ delphi hsp
http://pc8.2ch.net/test/read.cgi/tech/1151412015/989 VBA総合質問スレッド
http://pc8.2ch.net/test/read.cgi/tech/1054356121/781 ●EXCEL・VBAの勉強法教えてスレ●

他のスレで>>317を見かけたので、試しにVB系のスレ回ってみたら.NETやVBAのスレにまで…
0328デフォルトの名無しさん2006/11/22(水) 23:41:58
そんなヒマがあったら腹筋でもしろよ
0329デフォルトの名無しさん2006/11/22(水) 23:59:37
というか、その情熱をVBの勉強に向ければ、
他人のソースなんて当てにしなくても、コード掛けるようになるのでは?
0330デフォルトの名無しさん2006/11/23(木) 01:20:23
VBAスレから誘導されました。よろしくお願いします。

ExcelのVBAでDOM使ってXML書き出すプログラムを作ってます。
で、標準の文字コードがUnicodeのため、XMLファイルもUnicodeで出力されてしまいます。
これをShift-JISで出力したいのですがどうすればよいのでしょうか?
DOMリファレンスで見た限りメソッドにもそれらしいものは見当たらなかったのですが。。
03313132006/11/23(木) 05:40:48
ごめん思い出した。
LoadResDataで「実行時エラー326 識別子101のリソースが見つかりません」て出るんよ。
定数使用してLoadResData(101,vbResIcon)もダメ、(vbResIcon=1)
MSのサポートページにあるLoadResData(101,3)もダメ。
WAVは"CUSTOM"と文字を打つのでLoadResData(101,"アイコン")とやったがダメ。全角半角両方。
上記はすべて同じエラーになる。
WAV同様"CUSTOM"なら取り込める。
でもバイトデータだから、これをまたアイコンにするんだったら意味わからん。
リソースファイルにアイコン入れるまではいいが取り出せないのは何なんよ…
0332デフォルトの名無しさん2006/11/23(木) 08:57:25
>>331
基本からなってねぇ

LoadResPicture(リソース番号, vbResIcon)
0333デフォルトの名無しさん2006/11/23(木) 13:01:02
>>332
ありがとう。でもvbResIconて数値いくつ?
変数が定義されてませんてエラーになるんで…
0334デフォルトの名無しさん2006/11/23(木) 13:12:58
>>333
>定数使用してLoadResData(101,vbResIcon)もダメ、(vbResIcon=1)
     . .... ..: : :: :: ::: :::::: :::::::::::: : :::::::::::::::::::::::::::::::::::::::::::::
          Λ_Λ . . . .: : : ::: : :: ::::::::: :::::::::::::::::::::::::::::
         /:彡ミ゛ヽ;)ー、 . . .: : : :::::: :::::::::::::::::::::::::::::::::
        / :::/:: ヽ、ヽ、 ::i . .:: :.: ::: . :::::::::::::::::::::::::::::::::::::::
        / :::/;;:   ヽ ヽ ::l . :. :. .:: : :: :: :::::::: : ::::::::::::::::::
   ̄ ̄ ̄(_,ノ  ̄ ̄ ̄ヽ、_ノ ̄
0335デフォルトの名無しさん2006/11/23(木) 13:22:29
>>334
ごめんこ今やったらできた!
LoadResPictureか、そらLoadResDataでググッても使い方出ないわけだ。
額にアイコン張り付けてコンビニ逝ってくるよ。ありがとう!
ε=ヽ( ゚逝゚)ノ
0336デフォルトの名無しさん2006/11/23(木) 13:23:53
For Each...Next ステートメントには DoEvents みたいなのありましぇんか
■ このスレッドは過去ログ倉庫に格納されています