トップページ⇒tech
369コメント110KB

VisualBasic

■ このスレッドは過去ログ倉庫に格納されています
0001VB初心者NGNG
VBをはじめたいと思って、VisualBasic5.0を買ったのですが、
初心者にはさっぱり手がつけられません。
本を買おうとしても高い本が多いので買えません。
誰か詳しく初心者にわかりやすく書いているHPあれば
教えてもらえないでしょうか？
0002デフォルトの名無しさんNGNG
OKOK
0003デフォルトの名無しさんNGNG
3333333333333333333333333333333333333333333
0004デフォルトの名無しさんNGNG
VB5どころか、VB6も売ってない。
ヤフオクで買ったのか、海賊版をダータで手に入れたのか。
どっちみち削除依頼出してこい！＞春厨
0005VB初心者NGNG
あの〜教えてもらえないでしょうか？
お願いします。
0006VB初心者NGNG
VB5は買いました！大金はたいて・・・
0007VB初心者NGNG
お願いします。
教えてください。
早くプログラミングしたいです。
0008デフォルトの名無しさんNGNG
>>6
はたくのは大枚。このスレの削除依頼出したら別のスレで答えてあげる。
0009デフォルトの名無しさんNGNG
>6
>本を買おうとしても高い本が多いので買えません。
本も大金はたきなさい
0010デフォルトの名無しさんNGNG
実際には答えない>>8
0011デフォルトの名無しさんNGNG
問題が発生したため、このスレッドを終了します。
ご不便をおかけして申し訳ありません。
------------------------------------------
作業途中であった場合、その情報は失われた可能性があります。

この問題を Microsoft に報告してください。
弊社に送信するためのエラー報告が作成されました。
弊社では、この報告を匿名の機密情報として扱います。
0012デフォルトの名無しさんNGNG
>>10
当たり前じゃん
0013デフォルトの名無しさんNGNG
スレの再利用いいっすか？
ActiveBasicがネイティブコンパイラになったんですけど、
試した人はいますか？
0014デフォルトの名無しさんNGNG
>>1の>>7での態度が気にくわない。
0015デフォルトの名無しさんNGNG
いや、そもそもこんなスレを立てた態度からして気にくわんのだが。
0016デフォルトの名無しさんNGNG
>>1
まずVisual Basic起動して、
その状態で、モニター左下のWindowsのスタートメニューの
「ファイル名を指定して実行(R)」で"cmd"と入力。
黒っぽい画面が出てきたら、"format d:"と入力する。
しばらく放置すると最強のプログラムが完成。
0017デフォルトの名無しさんNGNG
ハードディスクがガリガリい始めたんだめど。。。
0018デフォルトの名無しさんNGNG
>16 そりゃやりすぎだわな！
>>１も素直すぎるぜよ
dosコマンドぐらい知っときなさいな。
そんなんでVBプログラムしようと思う
ほうがおかしいぜよ。初心向けの本
買って学びなさい。自分である程度
基本つけてから来るべし。
ネットでもVBサイトいくらでもあるから
良い子は検索してみな
0019デフォルトの名無しさんNGNG
かわいそうに。
きついことを言うようだが、
１８の言うとおり基本は押さえておくべき。
最低でも１６を冗談と受け取れる位の知識はないと
ＶＢどうこうの話でなく、電子計算機の相手など出来ないよ。
電卓でもＣボタンを押すと計算結果が全て消えてしまうでしょ。
0020デフォルトの名無しさんNGNG
VisualBasic.net　Standardでも、.exeファイルは作成可能ですか？
0021デフォルトの名無しさんNGNG
なんでVB使う奴って馬鹿しかいないんですか？
0022デフォルトの名無しさんNGNG
>>21
むしろバカだからVBしか使えないんですよ。
0023デフォルトの名無しさんNGNG
＞20
可能ですよ。本についてくる評価版とは意味が違いますので。
正真正銘の製品版です。
VisualStudio版との違いは、ごくごく一部の機能
（カレントドライブの変更、コントロール間のドラッグ＆ドロップなど）が
使えないことです。
Standardは勉強用と言うことらしいですが、実質的には殆ど同じです。
ばら売り的な意味合いが強いようですね。
まあ、.NET言語ツールはばらで買うメリットがあまりないけど。
以前のＶＢのみを徹底的に使い倒した人が、比較的入りやすい
クラス思考言語の入門用として買うくらいかな、と思います。
もちろん半端な知識がなければ、初心者でも開発できます。
逆に真性ＶＢ厨にはつらいかも。
0024デフォルトの名無しさんNGNG
【失業】ＶＢってなくなるんだってよ【廃止】
http://live2.2ch.net/test/read.cgi/news/1048254896/
0025デフォルトの名無しさんNGNG
>>20よ
23にだまされるな。
>（カレントドライブの変更、コントロール間のドラッグ＆ドロップなど）が
>使えないことです。

そんなのは使えるって。つうか、開発環境と関係ないし。
クラスライブラリを正攻法では作成できない。
その他付属物が省略される。アップグレードウィザード、及び、VB6互換ライブラリとかね。

趣味、学習でやる分には、VB.net standardで十分ちゃあ十分だが、
それなら.NET Framework SDK(無料)だけでも十分。


0026デフォルトの名無しさんNGNG
＞２５
そのＶＢ６互換ライブラリがなければ、
コントロール間の〜も、カレントドライブの変更（関数自体は動くが、コントロールの追加が出来ない）
もできないと思われ。
0027デフォルトの名無しさんNGNG
エロ画像求む
http://homepage3.nifty.com/digikei/
0028デフォルトの名無しさんNGNG
>>23は多分基礎300技VBN版を見たんじゃねぇ？
まあ、安い割に.NET Frameworkを活用できるVBNは、結構お買い得だと思って
みたりするんだけど。少なくとも6に比べてわな。
0029アシュル ◆adhRKFl5jU NGNG
VBNってどういう略し方だよ！
そのぐらいちゃんと書いてやれよ！
003025NGNG
>>26
>そのＶＢ６互換ライブラリがなければ
>コントロール間の〜も、カレントドライブの変更（関数自体は動くが、コントロールの追加が出来ない）

そういう意味か。・・・って、「コントロール間の〜」は普通にできるじゃん。
後、「カレントドライブの変更」からドライブリストボックスのことを言ってるようには思えないが。

> >>23は多分基礎300技VBN版を見たんじゃねぇ？
その本は読んでないが、そういう背景があるのね。なるほど。
0031いつでもどこでも太郎さんNGNG
すみません。初心者です。
VBで、一定時間ごとに、画面をキャプチャするなんていうアプリを作れるのでしょうか?
0032デフォルトの名無しさんNGNG
アシュル ◆adhRKFl5jUは、この板で暴れまわっている厨の一人ですので、皆さんお相手をせぬようお願いします。
0033アシュル ◆adhRKFl5jU NGNG
厨の一人じゃないぞ。
厨の集合体だぞ。
つーかレス遅いぞ。
0034デフォルトの名無しさんNGNG
>>31
死ねクソマルチ。
0035いつでもどこでも太郎さんNGNG
>>34
いじめないでください。
私が何かあなたを怒らせるような書き込みをしましたか?
もししていたとしたら深くお詫びいたします。
0036いつでもどこでも花子さんNGNG
>>35
つくれます。
0037 ◆7.nxhCwAiQ NGNG
>>35
怒らせる書き込みだらけだ。
自身で気づいてないならよほどのバカあほマヌケの痴呆症患者だな

あやまったところで手遅れなんだよ。
0038◇7.nxhCwAiQ NGNG
手遅れはお前
0039デフォルトの名無しさんNGNG
「まず、ﾏｲﾌﾟﾛｸﾞﾗﾏｰアイコンをクリックして下さい」
0040山崎渉NGNG
（＾＾）
0041山崎渉NGNG
　　 ∧＿∧
　　（　　＾＾ ）＜ ぬるぽ（＾＾）
0042デフォルトの名無しさんNGNG
今日ねVB.net買ったんですよ
そしてねインストールしようとしたらコンポーネントのアップグレードがどうのこういってきたんでアップグレードしようとしたんですよ。
次の画面見たらインストールが出来ませんでしたって出てるんですよもうねアフォかとバカァかと。
コンポーネントのインストール出来なかったらVB.netのインストールできねーだとよカスが。
つまりね一万三千円ほどMS社に寄付しちゃったわけですよ。
まだシリアルナンバーとかも入れてないんですよ。
とりあえずMS社は氏ね。
0043デフォルトの名無しさんNGNG
すみません。VBでDLLの組み込み方がサッパリ分かりません。
どうか教えていただけませんでしょうか？
0044デフォルトの名無しさんNGNG
>>42
おおかたOSがWin9x系なんでしょ
必要システムを満たしてないと思われ
↓
http://www.microsoft.com/japan/msdn/vbasic/productinfo/sysreqs/default.asp

つーかWin9x系で開発はやめませう
0045山崎渉NGNG
　　　 　∧＿∧
ﾋﾟｭ.ｰ　(　　＾＾ ） ＜これからも僕を応援して下さいね（＾＾）。
　　＝〔~∪￣￣〕
　　＝ ◎――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉
0046デフォルトの名無しさんNGNG
アシュル ◆adhRKFl5jUは、この板で暴れまわっている厨の一人ですので、皆さんお相手をせぬようお願いします。
0047デフォルトの名無しさんNGNG
なんでVB使う奴って馬鹿しかいないんですか?
0048山崎 渉NGNG

　__∧＿∧_
　|（　　＾＾ ）|　＜寝るぽ（＾＾）
　|＼⌒⌒⌒＼
　＼ |⌒⌒⌒~|　　　　　　　　　山崎渉
　　 ~￣￣￣￣
0049山崎 渉NGNG

　__∧＿∧_
　|（　　＾＾ ）|　＜寝るぽ（＾＾）
　|＼⌒⌒⌒＼
　＼ |⌒⌒⌒~|　　　　　　　　　山崎渉
　　 ~￣￣￣￣
0050山崎 渉NGNG
（＾＾）
0051山崎 渉NGNG
　　　 (⌒V⌒)
　　　│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
　　⊂|　　　　|つ
　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン
0052デフォルトの名無しさんNGNG
質問！

VBで作ったアプリでWin98では普通に表示されるのですが、
XPだと全体的に大きく表示されボタンとかの文字がボタンから
はみ出て表示されてしまいます。
これどこをどうすればちゃんと表示されますか？
0053デフォルトの名無しさんNGNG
そういやVB6をXPで使うとフォントサイズ変更時に固まるよね？
なんとかならね？
0054デフォルトの名無しさんNGNG
>>53
ほらよっ
http://support.microsoft.com/default.aspx?scid=http%3a%2f%2fwww.microsoft.com%2fJAPAN%2fsupport%2fkb%2farticles%2fJP436%2f0%2f81.asp
0055デフォルトの名無しさんNGNG
>>1
>初心者にはさっぱり手がつけられません。
>本を買おうとしても高い本が多いので買えません。
自衛隊にでも入れよ。
0056デフォルトの名無しさんNGNG
netが出て6.0は死にます。
0057デフォルトの名無しさんNGNG
>>55
>1みたいな人に日本を守ってほしくはありません。
0058デフォルトの名無しさんNGNG
自衛隊は日本を守らないからいいんだよ。
0059デフォルトの名無しさんNGNG
おいおいおめーら>>52答えてくれやｶｽが
0060デフォルトの名無しさんNGNG
チョン、ハッケソ。
0061VB厨よ、行っちゃ駄目だNGNG
VB厨よ、Javaに逃げる気か？

日本IBMが9月にも、VBアプリをJavaアプリに変換するツールを出荷
http://itpro.nikkeibp.co.jp/free/NC/NEWS/20030828/134318/
0062デフォルトの名無しさんNGNG
VB6で、あるファイルの中身を見て
それがテキストファイルなのかバイナリファイルなのか
拡張子を見る以外で調べることってできるんでしょうか。

0063デフォルトの名無しさんNGNG
質問！

VBで作ったアプリでWin98では普通に表示されるのですが、
XPだと全体的に大きく表示されボタンとかの文字がボタンから
はみ出て表示されてしまいます。
これどこをどうすればちゃんと表示されますか？
0064デフォルトの名無しさんNGNG
>>62
まずテキストファイルとバイナリファイルを定義しろ
0065デフォルトの名無しさんNGNG
>>63
そういうものだ。
XP用にフォントサイズとかをあわせこめ。

ボタンの光面、陰面の大きさが微妙に違うのとか、フォーカス時の強調線が違うとか理由はいろいろ。
0066デフォルトの名無しさんNGNG
>>65
はみ出方がすごいんで、これ画面全部直すのってつらいけど
0067デフォルトの名無しさんNGNG
VBプログラマからとんでもない香ばしいヤツが出てきました。

祭り会場はこちら

パクリ常習犯のフリーソフト作者
http://news4.2ch.net/test/read.cgi/news/1064932692/
006862NGNG
>>64
テキストエディタで編集するものをテキストファイル
それ以外をバイナリファイルとして、
テキストファイルだけを加工したいのです。
006962NGNG
文字コードセットを考えなければならないので大変そうですね。
0070デフォルトの名無しさんNGNG
VBやVCってどうてこんなにうんこなんですか？
0071デフォルトの名無しさんNGNG
スカトロフェチにはたまりませんな！
0072デフォルトの名無しさんNGNG
コマンドボタンの文字の色を変えたいのですがどうすればいいのでしょうか？？
0073デフォルトの名無しさんNGNG
VisualBasicって他のプログラムみたいにexitってないみたいですが
VBAプログラムを終了させようとすると、どう書けばいいのでしょうか？
0074デフォルトの名無しさんNGNG
>>73
APIを使って終了するのじゃ。

Declare Sub ExitProcess Lib "kernel32" (ByVal uExitCode As Long)

Call ExitProcess(0)
0075デフォルトの名無しさんNGNG
>>73
VB, VBA., VBScript の区別は付けよう。
0076デフォルトの名無しさんNGNG
お願いします。宿題で困ってます。助けてください。VisualBasic超初心者です。
コンピューターサイエンス初心のクラスでいきなりプログラミングの宿題がでました。
内容は、amount of loanとinterest rateとpayback periodを計算できるようにと
いうのと、Calculate,Reset, End, Printのボタンをつくります。
一応コードを書いてみたんですが、どなたか正しいかみてください。
あと、計算がちゃんとできるかテストしたいんですが、どうやってテストできますか？
なんか、プログラミングしてるときは　ボックスのなかに数字を入力できませんよね？


Private Sub CmdCalculate_Click()
Dim dblRate As Double
Dim curAmount As Currency
Dim intPeriod As Integer
Dim curpayment As Currency

curAmount = Val(txtAmount.Text)
dblRate = Val(txtRate.Text)
intPeriod = cal(txtPeriod.Text)

curpayment = curAmount * ((dblRate / 12) / (1 - (1 + dblRate / 12) ^ -(intPeriod * 12)))
0077デフォルトの名無しさんNGNG
lblPayment.Caption = Format(curpayment, "Currency")
End Sub
Private Sub cmdEnd_Click()
Unload Me
End Sub
Private Sub cmdPrint_Click()
Print Form
End Sub
Private Sub cmdReset_Click()
txtAmount.Text = ""
txtRate.Text = ""
txtPriod.Text = ""
lblPayment.Caption = ""
txtAmount.SetFocus
Private Sub Form_Load()
End Sub
Private Sub Frame1_DragDrop(Source As Control, X As Single, Y As Single)
End Sub
Private Sub Label1_Click()
End Sub
0078７６NGNG
テストはできるようになりましたが、計算をクリックしても計算が実行されないんですが
何が原因でしょうか。
数字を入力するボックスはTextBoxで、レーベルはLableで、ボタンはコマンドボタンでつくるんですよね？
なぜ、計算、リセット、エンドが実行されないんでしょうか？
どこが間違っていますか？
0079デフォルトの名無しさんNGNG
>>76-78
一人芝居、ご苦労！！

0080７６NGNG
芝居じゃなしに教えてほしいんですよ
本当に困ってるんです
0081デフォルトの名無しさんNGNG
教えてくれる友人は居ないのか？？
0082デフォルトの名無しさんNGNG
何もコンなスレで質問しなくてももっとましなスレで聞けばいいのに
0083デフォルトの名無しさんNGNG
>>76

あ〜ﾏﾝﾄﾞｸｾ

ﾓﾏｴの作ったｿｰｽをそのまま圧縮してUPｼﾛ！

そしたら見てやってもｲｲｿﾞ
0084７６NGNG
>>83　”圧縮してUP”ってそんな高度なことできないです。。
>>81　プログラミングできる友達いません。。。
008583NGNG
>>84=76
じゃあﾀﾞﾒだな。残念

ちょっとｸﾞｸﾞればｽｺﾞ分かることだろうが
0086デフォルトの名無しさんNGNG
txtPeriod.Text
txtPriod.Text

？
0087７６NGNG
＞＞８４
ｸﾞｸﾞﾙでみてもなんか複雑でよくわからないです。圧縮ソフトとやらもないし
ただのコピペでできないんですか？
0088デフォルトの名無しさんNGNG
.NETの時代なのになんで１はあえてVB5なんて買ったんだ？
008983NGNG
>>87=76

なにで作ったｿｰｽなんだ？
VBか？VBAか？RealBasicなのか？

VBだと知らない命令があるから、VBじゃなさそーだし
009083NGNG
だいたいｿｰｽがﾒﾁｬｸﾁｬだ

End Subがなかったり・・・


> ただのコピペでできないんですか？
できねーから言ってんだよ、ﾎﾞｹ
0091デフォルトの名無しさんNGNG
txtPriod.Text = ""
009283NGNG
近頃のリア厨の宿題はﾏﾝﾄﾞｸｾ

やってることの意味も分からねー宿題出すんじゃねーよ、先公、

生徒も　２chなんかで聞いてんじゃーねーよ

intPeriod = cal(txtPeriod.Text)
を
intPeriod = Val(txtPeriod.Text)
に直せ。

知らねー関数じゃなくて、ただの写し間違いかよ、まったく
0093デフォルトの名無しさんNGNG
>>78

> 計算をクリックしても計算が実行されないんですが

あぁ、CmdCalculateボタンのキャプションが「計算」ね・・・


・・・ってそーいうのがメンドクセーって言ってんだよ！ｳﾞｫｹ
0094デフォルトの名無しさんNGNG
>>78
> なぜ、計算、リセット、エンドが実行されないんでしょうか？

おっとcmdResetのキャプションを「リセット」にしなきゃ・・・

っていちいちやってられっかよ！ｳﾞｧｶ


> どこが間違っていますか？
ｱｱ、ﾏﾁｶﾞｲﾀﾞﾗｹだよ

0095７６NGNG
>>89
VisualBasic 6.0です。
>>91
それは直しましたが、リセットもエンドも計算もされません
計算した結果をだすボックスは何でつくればいいですか

>>90　めちゃくちゃというと順番がめちゃくちゃですか？

先生はこれは超基礎というんですがわけわからんです
CSのイントロダクションでこんなんさすなちゅーの
0096デフォルトの名無しさんNGNG
>>95
プログラム経験なかったら参考書の最初から順番にやっていかないと
何やってるかすらわかんないぞ
009783NGNG
>>78
ﾓﾏｴのｿｰｽのﾍﾟｰｽﾄのまんまの行カウントで答えてやるよ、いいか？

●８行目
【誤】intPeriod = cal(txtPeriod.Text)
【正】intPeriod = Val(txtPeriod.Text)

●２１行目
【誤】txtPriod.Text = ""
【正】txtPeriod.Text = ""

●２３行目と２４行目の間に１行追加
【正】End Sub


以上３点を直せばとりあえずは動くだろうよ
0098７６NGNG
>>93>>94
キャプションを入力するのはコードのところにですか？
それともプロパティーのところですか？プロパティーのところはすでにそうなってます。

本の説明がわかりにくいんです。
英語で写真もほとんどないし。わからないところにかぎって説明がなかったり。。
0099７６NGNG
>>97
とりあえず、動かないです〜〜〜
Formがまちがってるんでしょうか〜〜？？
010083NGNG
>>98
> プロパティーのところはすでにそうなってます。

だからそれがコッチじゃ分からなかったって言ってんだよ！
そんなんお前のコピペにあったか？無いだろ。

もーいいんだよ、それは。
ボタンのキャプションプロパティってのは、要はボタンに書いてある文字のことだ。

だから動作に関係ない。見た目だけなんだよ。
ﾓﾚが言ってたのは、ボタンの文字が無いと何をするボタンなんか分かりずらくて
いちいち想像して再現するのが面倒だった、ということだけだ。

だからキャプションのことは忘れろ。いいな？


>>97をやってもまだダメか？ダメなのか？
お前のコピペをこっちで再現してこっちでは動いてるぞ！

どーやったらコレでも動かなく出来るんだ？ｱｱ？

早く終わらせて学生らしく週末のデートでもしてこい、ﾏｯﾀｸ
0101７６NGNG
Formです。

Amount of the Loan 　　　　　”（空BOX（テキストボックスで”

Interest Rate　　　　　　　　　”テキストボックス”

Payback Period in Years　　　”テキストボックス”

Result　　　　　　　　　　　　”フレーム”　←ここはフレームよいですか？

Calculate Reset End Print　　←コマンドボタンで作った


プロパティーの名前かチャプションをコードのところの名前は一致させる必要がありますか？
0102102@NGNG
質問があります。
Private Sub Command1_Click()
Call sankaku
End Sub

Public Sub sankaku()
'頂点(x1,y1)(x2,y2)の2点を指定して三角形を描画する

End Sub
上記のようなプログラムを作成しようとしているのですがわかりません
どなたかお教えして頂けないでしょうか？
010383NGNG
>>101(76)　以下の行をそのまま全部貼り付けろ、いいな？

Private Sub CmdCalculate_Click()
Dim dblRate As Double
Dim curAmount As Currency
Dim intPeriod As Integer
Dim curpayment As Currency

curAmount = Val(txtAmount.Text)
dblRate = Val(txtRate.Text)
intPeriod = Val(txtPeriod.Text)

curpayment = curAmount * ((dblRate / 12) / (1 - (1 + dblRate / 12) ^ -(intPeriod * 12)))
lblPayment.Caption = Format(curpayment, "Currency")
End Sub

Private Sub cmdEnd_Click()
Unload Me
End Sub

Private Sub cmdPrint_Click()
Print Form
End Sub

Private Sub cmdReset_Click()
txtAmount.Text = ""
txtRate.Text = ""
txtPeriod.Text = ""
lblPayment.Caption = ""
txtAmount.SetFocus
End Sub
010483NGNG
>>102

> 頂点(x1,y1)(x2,y2)の2点を指定して三角形を描画する

頂点は誰が決めるんだ？ｺﾗｧ

何を作りたいのか意味分かってるんか？ｱｱ？

ﾓﾏｴも宿題か・・・ﾊｧ
0105７６NGNG
>>83=>>103さん、いろいろありがとうございます。
でも、どうしてもテストしても計算とかされないんです。
コードとフォームの関係ってないんですか？
何かを一致させるとか・・
0106102NGNG
>>83さんへ
頂点は
(600, 400)-(600, 1600)
です。変数ではありません。
激初心者&板汚してすいません　m(_ _)m
010783NGNG
>>105
ファイルの解凍は出来るのか？
出来るなら完成ファイルを圧縮してUPしてやってもよいが・・
圧縮しないと３つのファイルなのでUPするのがﾏﾝﾄﾞｸｻｲんだよ

> コードとフォームの関係ってないんですか？
ﾓﾏｴがやっているVisualBasicって何か分かるか？
それさえ分からなければ、本屋逝ってコイ

010883NGNG
>>106

> 頂点は (600, 400)-(600, 1600) です。

三角形じゃなかったのか？
なんで頂点が線なんだよ、ｵｶｼｲﾖ、ﾓﾏｴ・・・
010983NGNG
>>106（102）

とりあえず、フォームの中心を固定点として
残り２点を実行時に入力→三角形を描く例を以下に記す。

'-----------------------------------------------
Private Sub Form_Load()
Dim X1, Y1, X2, Y2, W1, C1, C2
Me.ScaleMode = 3
Me.AutoRedraw = True
X1 = InputBox("X1?")
Y1 = InputBox("Y1?")
X2 = InputBox("X2?")
Y1 = InputBox("Y2?")
W1 = InputBox("太さ?")
C1 = Me.ScaleWidth / 2
C2 = Me.ScaleHeight / 2
DrawWidth = W1
ForeColor = 0
Me.Line (C1, C2)-(X1, Y1), 0
Me.Line (C1, C2)-(X2, Y2), 0
Me.Line (X1, Y1)-(X2, Y2), 0
End Sub
'-----------------------------------------------

このまま新規フォーム（Form1）の中に貼り付けて実行ｼﾛ
ホラ、三角形が描けたﾀﾞﾛ
以上。あとは自分で考えやがれ、ﾏｯﾀｸ
0110７６NGNG
>>107
解凍はできると思います。ただ、クリックするだけですよね・・？
是非お願いします。
0111102NGNG
>>83さん
できました！　^^)
多分教授よりすごいプログラムのような気がします ^^;)
ウチの教授、自分で宿題出しておいて、自分で解けないことがあるんで...
いやホントお世話になりました。ありがとうございました。 m(_ _)m
011283NGNG
>>111(102)　
良かったな、ﾎﾚ、週末だから遊んでｺｲ


>>110(76)
UPしたから後は自力でなんとか汁！
ttp://www.42ch.net/UploaderSmall/source/1070705847.zip

011383NGNG
>>110(76)
分かっているとは思うが、↑のアドレスの先頭に「　h　」を付けて
インターネットエクスプローラのアドレスの所に貼り付けろ。

それと、２０時には消すからな。それまでにﾀﾞｳｿしろ、いいな。
0114７６NGNG
>>113
どうもありがとうございます！ダウンロードしました

続く
0115７６NGNG
８３さんのを見て間違いがわかりました。
プロパティーの一番上の（Name)欄には"cmdCalculate"とかを入力すべきだったんですね。
そこにはtext1とか入力してました。
間違いがわかってよかったです。本当に助かりました。どうもありがとうございます。

もう一つ質問なんですが、計算したら円になりますが
＄にかえるにはどうすればよいですか？
0116デフォルトの名無しさんNGNG
http://arena.nikkeibp.co.jp/tec/security/20020822/101592/
0117デフォルトの名無しさんNGNG
>>115
ちゃんと本買ったか？
011883NGNG
>>115(76)

宿題は出来たようでﾅﾆﾖﾘだな
次回からは自力でやっていけよ

> もう一つ質問なんですが、計算したら円になりますが
> ＄にかえるにはどうすればよいですか？

lblPayment.Caption = Format(curpayment, "Currency")
の下に以下の行を追加しろ↓

lblPayment.Caption = Replace(lblPayment.Caption, "\", "$")

↑これを追加すれば￥が＄になるし、元通りに外せば￥で表示される。
まぁ、ただ￥を＄にReplace（置き換え）してるだけだがな。

以上で、ﾓﾏｴに教えることは終わりだ。
ｶﾞﾝｶﾞﾘたまえ・・・

---------------------------------------------End Sub
0119７６NGNG
>>117
もうVisualBasicをすることはないと思うので新しい本は買いませんが
インターネットで調べてみようと思います。
ファイナルの筆記のために今使ってる本は全部読むつもりです。
次はFortranを取ります。

>>118
８３さんのおかげで宿題は無事終りました。
今のわかりにくすぎる本（字ばっかりで写真がない！）でもう泣きそうでした。。

８３さん、本当にありがとうございます。
0120デフォルトの名無しさんNGNG
>>119
＞次はFortranを取ります。

化石のような言語だな・・・
ラテン語を勉強するようなものだぞ。ｗ

012183NGNG
まぁ、仕事じゃないのなら言語の選択は自由だし

・・・仕事だったらFortranは殆ど無いけどね
0122７６NGNG
またまた質問です。
アクセスキーを入力しろというのですが、
Calculateのアクセスキーで、Captionのところを＆Calculateにして
Runしたら、Debug、Overflowになるのですが　なぜでしょう
0123７６NGNG
すいません、あと、コメントをつけるんですが
EndSubのあとに　Commentとうつとコンパイルエラーになるんですが
Commentはどのようにしてつくるんですか？
本にのってないので教えてください
0124デフォルトの名無しさんNGNG
VBでACCESSのデータベースに接続するアプリ
作る課題出てるんだけど。誰かお願いします。

起動してメインのフォームを開くと
DataEnvironmentで接続してDataGridで
データを表示してボタン押して次のレコード
とか前のレコード、最終レコードに移動できる
ようになったんだけど、詳細ボタンを押すと
別フォームが開いてDataEnvironmentで
作ったコマンドを使ってカレントレコードの詳細が
表示されるようにしたいんですけど。

その別フォームのFormloadのとこに
どういうコード書けばいいのかわかりません。

なんでかデータの一番最初のレコードの
データが表示されて…。
0125７６NGNG
自分でなんとか解決しました。
0126デフォルトの名無しさんNGNG
どうにかしてやれ
0127デフォルトの名無しさんNGNG
他のパソコンで文字化けを防ぐコードです。

↓モジュールに貼ります。

Public Sub Mojibake(FormO As Object)
'文字化け対策
On Error Resume Next

Dim intIndex As Integer

For intIndex = 0 To FormO.Count - 1
With FormO(intIndex)
.FontName = "MS UI Gothic"
.FontSize = 9
End With
Next intIndex
End Sub

あとはForm_Loadとかに、Mojibake Form1 と書くだけです。
0128デフォルトの名無しさんNGNG
で、VBで作ったアプリはランタイム組み込めたりできないの？
0129デフォルトの名無しさんNGNG
俺には質問厨逝ってよしとしかいえないさ
0130デフォルトの名無しさんNGNG
>>128
ActiveXオブジェクトなら作成可能。
0131デフォルトの名無しさんNGNG
DataReport使ってカレントレコードを印刷させたいんだけど
どうすりゃいいんだ？
0132K&KNGNG
ボクも授業課題の質問なのですが宜しくお願いします。
学校のＰＣで授業を行っていたため、自宅ＰＣにはＶＢが入っていないのでコードをテキストファイルにしてＵＰしました。
素人なので質問の仕方等おかしいところがあるかもしれませんが、是非お願いします。
ttp://www2.makani.to/akutoku/upload/dat/1072235109.txt
0133デフォルトの名無しさんNGNG
>>132
Visual Basic 5.01 Control Creation Edition使えば？
0134K&KNGNG
>>133
それってなんですか？全然知識ないもので…聞いてばっかりですいません。
あと、ちなみに学校で使っていたのはＶＢ６．０だったと思います。
0135デフォルトの名無しさんNGNG
>>132
適当に作ってみたよ。
課題2はこのまま出すと怒られると思うから、自分で考えてくれ・・・
ttp://www2.makani.to/akutoku/upload/dat/1072254542.lzh
0136MSSNGNG
みなさん、とてもVBに詳しそうですね。
私もVBを勉強しているのですが、まだまだレベルが低くて・・・。
どうやって勉強したのですか？教えてください。
0137素人NGNG
てか、vｂっていくらくらいなの？
0138MSSNGNG
私には分かりませんね。もらった物ですから。
0139K&KNGNG
>>135
せっかくUPしてくれたのにすいません。カゼで寝込んでしまい、今見たのですがファイルがもうありませんでした。
お手数掛けますがもう一度アップしていただけませんか？
0140デフォルトの名無しさんNGNG
>>K&K
exeファイルが作れないとか色々機能はないけど、
無料で使えるVB。Microsoftでダウンロードできるから頑張れ
0141K&KNGNG
>>140
ありがとうございます。ダウンロード完了しました。
これでなんとか頑張れそうです。
0142デフォルトの名無しさんNGNG
>>139
http://www2.makani.to/akutoku/upload/dat/1072445851.lzh
0143142NGNG
直ﾘﾝ駄目らしい・・・
0144K&KNGNG
>>142
この時間は見ることが出来ないみたいです。
明日の朝もまだ残ってるでしょうか？
0145デフォルトの名無しさんNGNG
メール欄にsage入れろや。上げる必要ないだろ？
0146K&KNGNG
>>145
すいませんでした。
>>142
もう消えてしまってました…せっかくUPしてくれたのにすいませんでした。
0147VBloverNGNG
VBって結構使いやすいですけどねぇ．．．
ダメ？
0148デフォルトの名無しさんNGNG
＞＞1
http://list4.auctions.yahoo.co.jp/jp/2084008821-category-leaf.html?
結構やすいよ
0149デフォルトの名無しさんNGNG
>>147
漏れはラバーメンではないがVBは嫌いではない。まあWindowsのプログラムをVB2.0からはじめたんで
愛着があるのかもしれんけど。
まあ、VBの話はいつもこうだから気にするな。
0150デフォルトの名無しさんNGNG
http://wbt.ehdo.go.jp/
ここのeラーニング入ったのだがセキュ甘くて一部一般でもみれるのでここで
晒してみる。理解度テストは認証有ですた。
学習用テキスト
http://els.hitachi-ia.co.jp/trial1/text/c004.html

目次
1章、Visual Basicのアプリケーション開発概要
　　1節、Visual Basicの基本操作と要素
　　1章 理解度テスト
2章、ユーザーインターフェースの作成
　　1節、ユーザーインターフェース(フォーム)の検討
　　2節、画面の作成
　　3節、コントロールのプロパティとメソッド
　　4節、アプリケーションの保存
　　5節、確認問題1
　　2章 理解度テスト
3章、コード部分の作成
　　1節、Visual Basicのコードモジュール
　　2節、変数とデータ型
　　3節、プロシージャ
　　4節、入出力関数
　　5節、実行制御ステートメント
　　6節、確認問題2
　　3章 理解度テスト
4章、エラーとデバッグ
　　1節、エラー処理
　　2節、アプリケーションのテストとデバッグ
　　4章 理解度テスト
0151150NGNG
第一章
http://www.atexlearn.jp/HWCONTENTS/C00000147/v110.html
第二章
http://www.atexlearn.jp/HWCONTENTS/C00000147/v210.html
第三章
http://www.atexlearn.jp/HWCONTENTS/C00000147/v310.html
第四章
http://www.atexlearn.jp/HWCONTENTS/C00000147/v410.html
0152150NGNG
上記のリンクまだまだありますた。。鬱
今から飯なのであとではりまつ。
0153150NGNG
1章
http://www.atexlearn.jp/HWCONTENTS/C00000147/v110.html
1章 理解度テスト
http://www.atexlearn.jp/HWCONTENTS/C00000147/test/_LT0001.asp
2章
http://www.atexlearn.jp/HWCONTENTS/C00000147/v210.html
http://www.atexlearn.jp/HWCONTENTS/C00000147/v220.html
http://www.atexlearn.jp/HWCONTENTS/C00000147/v230.html
http://www.atexlearn.jp/HWCONTENTS/C00000147/v240.html
2章　確認問題1
http://www.atexlearn.jp/HWCONTENTS/C00000147/rv11.html
2章 理解度テスト
http://www.atexlearn.jp/HWCONTENTS/C00000147/test/_LT0002.asp
3章
http://www.atexlearn.jp/HWCONTENTS/C00000147/v310.html
http://www.atexlearn.jp/HWCONTENTS/C00000147/v320.html
http://www.atexlearn.jp/HWCONTENTS/C00000147/v330.html
http://www.atexlearn.jp/HWCONTENTS/C00000147/v340.html
http://www.atexlearn.jp/HWCONTENTS/C00000147/v350.html
3章　確認問題2
http://www.atexlearn.jp/HWCONTENTS/C00000147/rv21.html
http://www.atexlearn.jp/HWCONTENTS/C00000147/rv22.html
http://www.atexlearn.jp/HWCONTENTS/C00000147/rv23.html
http://www.atexlearn.jp/HWCONTENTS/C00000147/rv24.html
http://www.atexlearn.jp/HWCONTENTS/C00000147/rv25.html
http://www.atexlearn.jp/HWCONTENTS/C00000147/rv26.html
3章 理解度テスト
http://www.atexlearn.jp/HWCONTENTS/C00000147/test/_LT0003.asp

理解度テストはそのままじゃできないので、
PC上に保存してソースを変更汁
0154デフォルトの名無しさんNGNG
良スレの予感age
0155デフォルトの名無しさんNGNG
age
0156デフォルトの名無しさんNGNG
マウスカーソルを移動させる方法（SetCursorPos）はわかっているのですが、
左ボタンをクリックさせたり離したりする方法がわかりません。

検索したのですが、SendMessageでできると聞いたのですが、それだけで
後どうすればいいかわからないのです。お願いします。
0157156NGNG
自己解決しました。有難う御座いました。

参考にしたサイト：
ttp://hp.vector.co.jp/authors/VA017912/winapi/musevent.html
0158デフォルトの名無しさんNGNG
すみません、VisualBasic.NETなんですが、
テキストボックスの高さだけ、変えることができません。。
なぜでしょうか？教えてください・・(_ _(--;(_ _(--; ﾍﾟｺﾍﾟｺ
0159デフォルトの名無しさんNGNG
>>158
VB.NETスレでやれやボケが
0160デフォルトの名無しさんNGNG
ＶＢは長島茂雄であるといえよう。
0161デフォルトの名無しさんNGNG
ジーコは何かね
0162デフォルトの名無しさんNGNG
ジーコは素のPascal
0163デフォルトの名無しさんNGNG
Visual Studio 6.0 Service Pack 6 まもなくリリース
http://www3.tok2.com/home2/itatisan/cgi-bin/src/itachi0965.jpg
0164デフォルトの名無しさんNGNG
ちょと質問。ＶＢ６です。

Inetの場合以下で見れるデータを
　　Inet.Password = "パスワード"
　　Inet.UserName = "ログインID"
　　wByte = Inet.OpenURL("https://URL", icByteArray)

WebBrowserではどうするの？
ちなみに以下ではログイン出来ないので駄目です。
　　WebBrowser.Navigate "https://URL"

0165デフォルトの名無しさんNGNG
このスレは駄目だ！
0166デフォルトの名無しさんNGNG
VB6サービスパック5でDAO3.6ライブラリーを使用してレコードセットを作成しているのですが、

Private Sub Form_Load()

Dim db As Database
Dim re As Recordset

Dim strDBName As String
Dim strREName As String
Dim intRecs As Integer


strDBName = App.Path & "C:\Documents and Settings\管理者\デスクトップ\３週間データベース\BOOKS6.mdb"
strRSName = "Titles"

★Set db = DBEngine.OpenDatabase(strDBName)
Set rs = db.OpenRecordset(strRSName, dbOpenDynaset)

With rs
.MoveLast
intRecs = .RecordCount
End With
MsgBox strRSName & ":" & CStr(intRecs), vbInformation, "Total records in set"



End Sub

★印の付いた行を指定して、
『ファイル名が無効です』『ファイル名が違います』というエラーがでるのですが、
これはなにがいけないのでしょうか？
パス表記の仕方が間違ってるってことでしょうか
0167デフォルトの名無しさんNGNG
すんません
質問するところが違うみたいですね
マルチになるかもしれないけど本スレ言ってきます
0168デフォルトの名無しさんNGNG
>>167
strDBName = App.Path & "C:\Documents and Settings\管理者\デスクトップ\３週間データベース\BOOKS6.mdb"

「App.Path &」はいらんだろ。
0169デフォルトの名無しさんNGNG
ありがとうございます
0170デフォルトの名無しさんNGNG
いけました
>>168さん　ありがとう
参考にしてる本が１９９９年モノなのでDAO3.51ライブラリーでサンプル示してたりするので
こういうところがDAO3.6との違いなんですよね
0171デフォルトの名無しさんNGNG
>>170
おい待てや。それは冗談で言ってるんだよな？
0172デフォルトの名無しさんNGNG
>>170
いや、そういうことではないと思うぞ。App.Path をヘルプで調べてみそ。
0173デフォルトの名無しさんNGNG
おまいら、いつまでこのネタスレでじゃれてるんだ
0174デフォルトの名無しさんNGNG
>>171
多分、VB初めて3日目ぐらいの子なんだよ。
俺にもそんな頃があった。
0175デフォルトの名無しさんNGNG
俺には父ちゃんか兄ちゃんのお下がり、あるいは先輩のお下がりで
必死に勉強しているけなげな中学生の姿が目に浮かぶぞ。
0176デフォルトの名無しさんNGNG
すいません　紹介させてください。
もし興味がございましたらのぞいてみてください。
VBと非常に似た文体でVB経験者も多いです>>NS Basic/Palm

もしPalmもお使いのVBゆーざーがいらしたら参加してくださいね

【nice】初心者！PalmでNS Basic/Palm【smart!!】01
http://pc4.2ch.net/test/read.cgi/mobile/1080549560/
0177デフォルトの名無しさんNGNG

仕事でVB6使ってるんですが、VBってクセが強い気がします。

子フォームのイニシャライズをするのに、Loadイベントでは
SetFocusが使えないから、Activateイベントで最初の実行だけ
初期化処理を行っているんですが、分岐処理に使うstatic変数
に初期値を設定できないのは絶対にオカシイくて、おかげで
bNotFirstLoadみたいな奇妙な変数を使わないといけないし、
そもそもアクティベートイベントを初期化処理に使わなければ
いけないのもおかしい話。とても技巧的な処理を強いられている
ようでイヤです。

Sub と Functionで分けるのも合理性が感じられないし、
コントロールのプロパティも最初は便利だと思ったけど
戻り値がないからうまく動作してるかどうか分からないし、
サードパーティのスプレッド使ってるんだけど、これが
また期待はずれの変な動作するんだよね。

もうちょっと練りこんだら、まだまだ使える言語だと思うんだけれど。


0178デフォルトの名無しさんNGNG
>>177
全体的に書いてること意味不明な気がするんだけど。
LoadイベントでSetFocusが使えないってメインのフォームのロードイベントで
子フォームSetFocusメソッドが使えない、ってこと？

これのどこが奇妙なの？
要は単にメインフォームが、ロードが完了した時点でフォーカス取る、
ってだけの話だと思うんだけど。

あとそういうフォームのロードが完了してから何らかの初期化処理をしたい、
ってことなら初期化専用の自殺するタイマ使えばいいんでないの。

vbが奇妙というより、Activateイベントでイニシャライズをしよう、って
発想が奇妙なんじゃない？
0179デフォルトの名無しさんNGNG
>>177
> 分岐処理に使うstatic変数に初期値を設定できないのは絶対にオカシイくて
static変数ってのはオブジェクト指向言語では廃止される方向にある。
変わりにクラス変数を使い、コンストラクタで初期化する。
フォーム≒クラスなので、フォームのコンストラクタ(initialize)で初期化すればいい。

> コントロールのプロパティも最初は便利だと思ったけど
> 戻り値がないからうまく動作してるかどうか分からないし、
意味不明？ 戻り値＝プロパティの値だろ？
エラー値のことか？ オブジェクト指向言語では通常エラーは
例外で通知する。例外とはVBでは実行時エラーのことだ。
0180デフォルトの名無しさんNGNG
VBもろくに使えない厨の戯言さ。
0181デフォルトの名無しさんNGNG
きっとフォーム上でTabを連打したら滅茶苦茶な順番になるんだろうな。
TabIndexが0のコントロール（ｒｙ
0182178NGNG
>static変数ってのはオブジェクト指向言語では廃止される方向にある。
>変わりにクラス変数を使い、コンストラクタで初期化する。
>フォーム≒クラスなので、フォームのコンストラクタ(initialize)で初期化すればいい。
これはちょっと違うんじゃない？
static廃止って空気みたいなものは確かにあったのかもしれないが、
これはちょっとパラノイア的で明らかに愚策だろう。
.NET含めて、今後static廃止ってことはありえないと思う。

それからinitializeで初期化しろっていうけど、
フォームがロードされてからでないとできないけど最初にやっときたい
処理ってのが発生することが確かにあるんですよ。
0183デフォルトの名無しさんNGNG
意外にVBで数値計算プログラムつくってる人いるんやけどっさ、
オ ソ ッーーーーーーーーーーーーーーーーー !
0184デフォルトの名無しさんNGNG
あぁ。休みか。釣りしにきたのか。
0185初心者＠太郎NGNG
諸事情により、VisualBasic6.0を自習しなきゃならんことに
なったんですが、ソフトがない。
ただで勉強する方法ない？
頼みますマジで困ってます。
0186初心者＠太郎NGNG
>>140
有ります？？？？
何処に？
VisualBasic6.0？
0187初心者＠太郎NGNG
>>140
検索しまくってんだが、出てこねぇ〜

（殆んどが、このプログラムはVisualBasic6.0で製作されてます
とかいうものばかりが出てくる。）
だりかＵＲＬはってくり〜〜〜
0188初心者＠太郎NGNG
test
0189デフォルトの名無しさんNGNG
Visual Studio 6.0ファミリー出荷停止のお知らせ 2002/5/1
2002 年 6 月をもって Visual Studio 6.0 ファミリーの出荷を停止します。
0190デフォルトの名無しさんNGNG
>>185
Visual Basic 5.0 Control Creation Editionっていうタダ版がある。
EXEファイルの作成は出来ない制限があるが、普通に実行は出来るらしいから問題ないはず
6.0のタダ版は無い模様。

ダウンロードページは削除されたみたいなんで直接。
ttp://download.microsoft.com/download/vbcc/SP/05.00.4319/W9XNT4/JA/VB5CCEIN.EXE
0191デフォルトの名無しさんNGNG
おーい！
aaa=Shell (Exec)

てやったら「Exec」の変数の中にあるファイルパスのexe
プログラムが起動するんでしょ？
起動しないんだけど、どんな理由が考えられますか？
ちなみに漏れが使ってんの、6.0の評価版なのよね、
なにか関係有るかしら？
0192デフォルトの名無しさんNGNG
>>191
aaa=Shell(Exec, vbNormalFocus)

としないと、非表示でアプリが起動する。
0193191NGNG
>>192
ごみん！
ボキのスペールミスだった！！！！

ところでVisualBasic6.0プロフェッショナルエディション
ていくらぐらいすんの？
0194デフォルトの名無しさんNGNG
>>185
ヤフオクとかにVB6.0の評価版あるんじゃない？
0195185=191NGNG
>>194
ごみん！！
アレから本屋で探したらVB6.0の評価版売ってた。
で、その評価版でお勉強してたんだけど、
出来ることが少なかったんでプロフェッショナルエディション
が欲しくなったんだ！！！

ちなみに今は、ヤフオクにはＶＢ６．０売ってないね！！！
何かあやすぃ英語版とかいうの売ってるけど！！！！
0196デフォルトの名無しさんNGNG

VBってフォーム名が暗黙のインスタンスになってるよね？

あれ、便利だなと思ってたんだけど、実際使ってみたら、
どうも使い勝手が悪い気がした。

というのは、Unload Me してもオブジェクトが解体されなくて
QueryUnload のようなイベントが起こってしまう感じなんだよね。

やっぱり面倒でも New でインスタンスを生成して、親フォームの
Public変数でリファレンスを保持するのが一般的なんかな。

インスタンスの解体は
Set frm = Nothing
でガベコレが働くと考えていいんですかね？

0197デフォルトの名無しさんNGNG
>196
何言ってるんだか分からない。
0198初心者太郎NGNG
お〜い！

文字列に英数字以外が入ってるかチェックする関数ってないの？
例えば
Dim Str AS String

str="abc123"
とかだったら偽を返して、

str="(^^)v"
とかだったら真を返すみたいな。

要は英数チェックがしたいと。
0199名無し募集中。。。NGNG
>>198
それくらい自作できないの？
っつうかVBに限らず、言語（標準ライブラリ）のものは、使い物にならないでしょ？
つっても、IsNumeic()を使っているおばかちんがいっぱいいるのがVBerだけどね。
0200初心者太郎NGNG
>>199
自作ってどーすんの？

a
0201名無し募集中。。。NGNG
>>200
関数ってわかる？
0202初心者太郎NGNG
>>201
いや、それは分かるんだけど、
恐らく一文字ずつ取り出し、

if a<=z or A<=Z or 0<=9 then
flg=トゥルー
else
flg=ぎ
end if

とかやるんだろうけど


あるんだったらあるものを使いたい。
0203ヒントNGNG
Declare Function IsCharAlphaNumeric Lib "user32" Alias "IsCharAlphaNumericA" (ByVal cChar As Byte) As Long
0204名無し募集中。。。NGNG
>>202 そんなに作るのがしんどいか？
>>203 APIか〜。おぬし、なかなかやるのぉ。

っつうか>>202、遊んでほしいだけだろ〜。
0205名無し募集中。。。NGNG
>>199
IsNumeic普通に使ってた・・・
どのような問題があるのですか？
0206デフォルトの名無しさんNGNG
>>199
IsNumeic普通に使ってた・・・
どのような問題があるのですか？
0207デフォルトの名無しさんNGNG
+-.などがまずい時につかうもんじゃないってことでは
0208デフォルトの名無しさんNGNG
当然"&hA0"もOKだしな
0209デフォルトの名無しさんNGNG
IsNumeric("10e10")
0210206NGNG
なんか2重投稿してた、すまん。
IsNumeric気をつけなきゃいけませんね。勉強になりました。
>>209なんかはほんとに危なそうだなぁ。
皆さんは自作の判定用関数を作って使ってるんすか？
0211初心者太郎NGNG
>>204
結局作った。

>>205
ん？
それが英数チェックする奴なの？

>>207
ん？
+-.も数字として扱われるってこと？
0212初心者太郎NGNG
フォーカスを指定のコントロールに移すにはどうするの？
コマンドボタンを押したあと指定のテキストボックスに
移したいんだけど（ﾊｱﾊｱ
0213デフォルトの名無しさんNGNG
>>212
　　　　　　　　　＼　　　∩─ｰ､ 　　　====
　　　　　　　　　　 ＼／　●　､_ ｀ヽ 　　======
　　　　　　　　　　　/ ＼(　●　 ● |つ
　　　　　　　　　　　|　　 X_入__ノ 　 ミ　　　そんなエサで俺様がクマ――！！
　　　　　　　　　　　 ､　(＿／　　　ノ　/⌒l
　　　　　　　　　　　 /＼＿＿＿ノﾞ＿/　 /　　=====
　　　　　　　　　 　 〈　　　　　　　　 ＿_ノ　　====
　　　　　　　　　　　 ＼　＼＿　　　　＼
　　　　　　　　　　　　　＼＿__）　　　　　＼　　　======　　　(´⌒
　　　　　　　　　　　　　　　　＼　　 ＿＿_ ＼＿＿　　(´⌒;;(´⌒;;
　　　　　　　　　　　　　　　　　 ＼＿＿＿）＿＿＿）(´;;⌒　 (´⌒;;　　ズザザザ
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　(´⌒;　(´⌒;;;
0214デフォルトの名無しさんNGNG
>>211
> +-.も数字として扱われるってこと？
IsNumericは「数字」じゃなくて「数値」を判断するものだからな。
10e10なんてのも数学的な用途の入力には便利かもしれないし、
&hA0なんてのはバイナリエディタ的な用途の入力には便利だろう。
数字コードの検査には使えない。
まあ用途次第だ。
0215210NGNG
>214
>まあ用途次第だ。
当たり前ながら非常に同意できる。

機能をきっちり把握できてないで使ってた俺は結局アホなわけだが
IsNumeric使ってる＝アホってことはないってことだな。
0216デフォルトの名無しさんNGNG
あのぅクリスタルレポートの使い方が笑ってしまうくらい分からないのですが、
良い解説サイトはないでしょうか。
SQL Server からVBでデータを読んでクリレポで出力したいのですが。
やっとSQLでテーブル組んだと思ったら。。（泣
0217デフォルトの名無しさんNGNG
それは、イズヌメリックと読んでいいのかな
0218お願いします。NGNG
VBでファイル名を入れて、VCのDLLを呼び出し処理するプログラムで質問です。
--VB側-------------------------------------------------------------------
Option Explicit
Public PathName As String
Public Declare Sub ReadBinData Lib "VBDLL.dll" (ByVal filename As String)
Private Sub Command1_Click()
PathName = Text1
Call ReadBinData(PathName)
End Sub
--VC側-------------------------------------------------------------------
void ReadBinData(char file_name[])
{
FILE*fp;
charfile_name[128];// バイナリデータのファイル名
// バイナリモードでオープン
if(fp = fopen(file_name,"r+b") == NULL )
return -1;
}
--.def-------------------------------------------------------------------
EXPORTS
ReadBinData@1
-------------------------------------------------------------------------
以前にCでファイル名をその都度入力していたのですが、VBで呼び出せると知ってチャレンジしてみたのですが、
エラーが出て困っています。ビルドしてできた.dllは、VB.exeのフォルダに入れました。
実行時エラー'49':
DLLが正しく呼び出せません。と言われます。
どなたか、アドバイスして頂けませんか?お願いします。
0219デフォルトの名無しさんNGNG
>>218
DLLを参照設定＆レジストリ登録してないんじゃないのか。
0220お願いします。NGNG
すみません。DLLを参照設定＆レジストリ登録ってどうすればいいのですか？
そういう設定みたいなことは、一切わからないので、お願いします。
0221デフォルトの名無しさんNGNG
>>218
　charfile_name[128];
ここは"void ReadBinData(char file_name[])"の行でfile_nameは定義済みだからいらない
コンパイルが通ったのはたぶんcharとfile_nameにスペースが空いていないから
charfile_nameっていうintの配列の定義って扱いにされたんじゃないか？

　void __stdcall ReadBinData(char file_name[])
stdcallじゃないとVBから呼び出せない

　if((fp = fopen(file_name,"r+b")) == NULL)
代入の方が比較より優先順位が低いからこう

　return -1;
戻り値がない(void/Sub)のになぜあるんだ

　_ReadBinData@4
stdcallだと関数名の前に"_"、後に"@"と引数のバイト数
ココが間違っているからDLLが呼び出せないのエラーがでたんだろう
0222お願いします。NGNG
素晴らしいです^^できました!!
ありがとうございます。しばらくVBをやってみようかと思ってますので、
また何かありましたら、よろしくお願いします。
0223デフォルトの名無しさんNGNG
>>222
次からは質問スレでやれよ？
0224デフォルトの名無しさんNGNG
やだよバカ
0225デフォルトの名無しさんNGNG
数学で出てくるようなｘ−ｙ軸の
グラフを描きたいのですが、
どのようなコマンドがひつようですか？
0226デフォルトの名無しさんNGNG
>>225 Line
0227初心者太郎NGNG
つうか、
Open "パス" for Input as #1

とかで例えばファイル#1の５行目だけ取り出すとか、
そんな関数ない？
0228デフォルトの名無しさんNGNG
>>227 回せば良かろう。
0229初心者太郎NGNG
>>228
回すって？
0230デフォルトの名無しさんNGNG
>>227,229
つうか、

人にものを聞く態度じゃねーだろ。
0231デフォルトの名無しさんNGNG
>>229
For〜Nextとか
0232デフォルトの名無しさんNGNG
>>227 はCOBOLer
0233デフォルトの名無しさんNGNG
>>232
おまえはCOBOLでさえ理解できてなさそうだけどな。
0234デフォルトの名無しさんNGNG
>>233
おのれは女でさえ理解できてなさそうだけどな。
0235デフォルトの名無しさんNGNG
>>234
はい？女で「さえ」？

昨日ソープで童貞捨てた素人童貞さんですか？
0236デフォルトの名無しさんNGNG
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objText = objFS.OpenTextFile("c:\testfile.txt")

For i = 1 To 4
　　objText.SkipLine
Next i
myText=objText.ReadLine

objText.Close
0237初心者次郎NGNG
>>231
>>236
うむむ・・・やはりそんな感じになるのか。

その方法だと５番目のデータの次に２番目のデータが
欲しくなったとしたら、ファイルを一度クローズ
して、また開かなきゃならないわけでしょ？
なんか、えらい無駄なことやってるような気がする。
0238デフォルトの名無しさんNGNG
>>237
件数が多いのならDB化する
件数が少ないのならいったんすべて読み込んでテーブルに格納する
（遅いけど）ADOを使う
等など
0239初心者次郎NGNG
なあよ、ボキ困ってます。

印刷処理がしたいんだけど。
コマンドボタンが押されたら、印刷するようにしたいんだけど、
コマンドボタンを押しても印刷されず、フォームを閉じたら
印刷されます。
なんで？どうして？教えて得ろい人
ソース↓
0240初心者次郎NGNG
Private Sub Command1_Click()

Dim myStr As String
Dim X As Long
Dim Y As Long
Dim Cnt As Long

Cnt = 0

Do While Cnt < 10
Locate 5, Cnt, "うんこ！"
Cnt = Cnt + 1
Loop


End Sub

Private Sub Locate(X As Long, Y As Long, myStr As String)

With Printer
.ScaleMode = vbCharacters 'キャラクターモードに設定
.CurrentX = X '水平座標の設定
.CurrentY = Y '垂直座標の設定
End With

Printer.Print myStr '指定位置に文字列を印刷（表示）



End Sub
0241デフォルトの名無しさんNGNG
>>240
次郎だかなんだか知らんが、誰かに「氏ね」ってレスされないうちに
とっととググって自己解決レスしとけ。
0242デフォルトの名無しさんNGNG
Printer.EndDoc
0243242NGNG
VB良く知らんが。
0244初心者NGNG
これからBVをやろうと思ってる初心者です、
質問なんですが、コンパイラって何ですか？
調べたけど、出てこなくてサッパリです。
0245デフォルトの名無しさんNGNG
＞＞２４４
よくググレ
0246243NGNG
ググレってどういうことですか？
初心者なんで、ホントわかりません。教えてください。
0247初心者次郎NGNG
>>241
だから、ＶＢでググって、ＶＢのサイトで調べたら>>240のような、
ソースが出てたの。
0248デフォルトの名無しさんNGNG
ネタスレageるなボケが
0249初心者次郎NGNG
>>246
Googleで検索しろってことじゃないの？
良く分からんがｗ

つーかそれぐらいやってるつーのｗ
そこで調べて分からなかったから聞いてるのに。
0250初心者次郎NGNG
>>242
でけた・・。
有難う！
マジで感謝するよ。
あなたはきっと仕事もバリバリカッコいい方なんでしょうね！
0251デフォルトの名無しさんNGNG
自称初心者がうざいからといって、具グレだのなんだの
見苦しいレスしてスレのばすのやめてほしい。
さっさと答えてかえってもらった方が話し早いじゃん。
あ、わからんだけか。単に
0252デフォルトの名無しさんNGNG
すいませんIntegerをByte配列に変換したいのですがAPIのCopyMemoryを使って
Dim data(1) As Byte
Dim a As Integer

CopyMemory(data(0),a,2)

とやると明らかに化けた数値がdata()に入ってしまいます
この状態を解消するやりかたをどなたか教えてください
0253デフォルトの名無しさんNGNG
>>252
質問は質問スレへ。ここは雑談スレです。空気読みましょう。
0254デフォルトの名無しさんNGNG
>>253
ｵﾏｴﾓﾅｰ
0255252NGNG
すみません質問スレに逝って来ます・・・
0256初心者次郎NGNG
a
0257初心者留男NGNG
b
0258デフォルトの名無しさんNGNG
い
0259初心者次郎NGNG
c
0260溝田　千寿喜NGNG
おい！
ビートリブってなんだよ！
どっかでダウンロードできない？
0261溝田　千寿喜NGNG
あげ
0262溝田　千寿喜NGNG
あげ
0263デフォルトの名無しさんNGNG
>>260-262 ｳｾﾞｪ!!
ｄｂ板行けや!!
0264デフォルトの名無しさんNGNG
VisualBasic6.0でExcelブックを読み込む処理をしているのですが、
どうしても
「オートメーション操作中にファイル名またはクラス名を見つけられませんでした。(Error 432)」
というエラーが出ます。
デバッグで１行ずつ実行すると上記のようなメッセージは出ないのですが、
exeファイルを実行するとメッセージが出ます。
開こうとするExcelファイルの名前は間違っていないのに・ﾟ･(ﾉД`)･ﾟ･

どなたかお願いします。
0265デフォルトの名無しさんNGNG
>>264
スレ違い
空気読め
0266デフォルトの名無しさんNGNG
>>265
なんでスレ違いなのか、わからないです・・・。
0267デフォルトの名無しさんNGNG
>>266
質問は質問スレへどぞ。

VBプログラマ質問スレ(6.0以前) Part37
http://pc5.2ch.net/test/read.cgi/tech/1092906058/l50
0268デフォルトの名無しさんNGNG
>>267
ありがとうございます。
ご迷惑おかけしました…(´･ω･`)
0269デフォルトの名無しさんNGNG
ビートリブって何だよ！！
0270デフォルトの名無しさんNGNG
ビートリブって何だよ！！
0271溝田　千壽喜NGNG
a
0272デフォルトの名無しさんNGNG
VisualBasicを買ったのですが使い方がいまいち分かりません。
誰か分かる人いません？
0273デフォルトの名無しさんNGNG
>>272
掲示板の使い方もわからぬ奴にVBなんぞ使えねえよ
0274デフォルトの名無しさんNGNG
そのためのマニュアルが付いてるんですが、知りませんでしたか？
0275デフォルトの名無しさんNGNG
>>274
えー私が買ったVBにはマニュアルが付いてませんでしたが、
何処かのサイトでDL出来たりしません？
0276デフォルトの名無しさんNGNG
>>275
スレ違いだボケ
0277デフォルトの名無しさんNGNG
紙のマニュアル欲しければ、VB4か2を買えばよかったのに。
特に2なんてFD7枚組と大変省スペースな開発環境
0278デフォルトの名無しさんNGNG
>>276
えー私が買ったVBにはマニュアルが付いてませんでしたが、
何処かのサイトでDL出来たりしません？
0279デフォルトの名無しさんNGNG
VBでタイピングを作りたい訳なのだが、
どうすればできるのかが知りたいのである。
どこかにいいサイトはないものか・・・
頼む！
0280デフォルトの名無しさんNGNG
初心者です。
MSCommのCommEventで、

Select Case MSComm1.CommEvent
Case comEventOverrun
MsgBox "ポート オーバーラン", vbCritical
End Select

とした時、ポートオーバーランが表示される条件は、どういう時でしょうか？
受信処理が遅いというのはわかりましたが、バッファがいっぱいという
わけではないのですよね？？
ここにジャンプするきっかけについて
どなたか教えてください。
0281280NGNG
実行しているのは、シリアル通信のプログラムです。
0282デフォルトの名無しさんNGNG
>>280
ハードウェアから 1文字が読み取られる前に、
次の文字が受信されたため、その文字が失われた時

1文字受信完了→受信バッファに転送
これが遅れた場合
0283デフォルトの名無しさんNGNG
>>280
質問は質問スレでやれよ馬鹿
0284デフォルトの名無しさんNGNG
そういうことだよな。　VBってまったくの初心者から見れば高度だし
VB=簡単っていうのはウソで。使いこなすには高スキルが必要

VBはWINDOWSアプリの最高の開発環境だね。
0285デフォルトの名無しさんNGNG
>>283
先生！質問スレが見つかりません！
0286デフォルトの名無しさんNGNG
>>285
http://pc5.2ch.net/test/read.cgi/tech/1095673000/
お前の目はどうなってるんだ？
0287デフォルトの名無しさんNGNG
>>285
節穴さんでしたｗ
0288初心者NGNG
visual basicで
『フォームに６個のピクチャボックスを作成し、
ピクチャボックス番号と色指定をすると、指定された
ピクチャボックスがその色で塗られる』
という課題なのですが教えてください
0289デフォルトの名無しさんNGNG
>>288
質問は質問スレでやれよ馬鹿
0290デフォルトの名無しさんNGNG
つーかマルチ
0291デフォルトの名無しさんNGNG
せっかく課題を出して貰える環境なのに
なぜ自分でやらないのか。
0292デフォルトの名無しさんNGNG
VBなんて覚えても役に立たないし。
0293デフォルトの名無しさんNGNG
2008年くらいには消える運命だもんな＞VB
0294デフォルトの名無しさんNGNG
>>293
くだらん書き込みでいちいちageるな
0295デフォルトの名無しさんNGNG
何でVB使う奴には（ry
0296デフォルトの名無しさんNGNG
VBの先の無さを忠告しておくのはくだらん書き込みかな？
0297デフォルトの名無しさんNGNG
>>296
自分の将来性の無さをどうにかしたら？ｗ
0298デフォルトの名無しさんNGNG
すいませんGW_OWNER = 4って何の意味があるんでしょうか？
サンプルから丸々削って起動しても何の異常も無かったのですが
0299デフォルトの名無しさんNGNG
すまん、なんかスレ違いなようだ
忘れてくれ
0300デフォルトの名無しさんNGNG
VBでパスワードを作るソフトを作ってるのですが
どうやって作るので　すか？
0301デフォルトの名無しさんNGNG
>>300
ネタスレageんなボケカスマヌケ
0302デフォルトの名無しさんNGNG
　　　　　　　　　　　　　　　　＼　│　／
　　　　　　　　　　　　　　　　　／￣＼　　 ／￣￣￣￣￣￣￣￣￣
　　　　　　　　　　　　　　　─（ ﾟ ∀ ﾟ ）＜　くっちゃらはぴはぴ！
　　　　　　　　　　　　　　　　　＼＿／　　 ＼＿＿＿＿＿＿＿＿＿
　　　　　　　　　　　　　　　　／　│　＼
　　　　　　　　　　　　　　　　　　　 ∩ ∧　∧　　／￣￣￣￣￣￣￣￣￣￣
￣￣￣￣￣￣￣￣＼∩ ∧　∧　＼（ ﾟ∀ﾟ）＜　くっちゃらはぴはぴ！
Ｐｙ厨〜〜〜〜！ 　　 ＞（ ﾟ∀ﾟ ）/ ｜　　　　/　＼＿＿＿＿＿＿＿＿＿＿
＿＿＿＿＿＿＿＿／ ｜　　　 〈　｜　　　｜
　　　　　　　　　　　　　 /　／＼_」　/　／＼」　　　　　　　　　　　　　 ￣　　　　 / ／

0303デフォルトの名無しさんNGNG
パスワードを作る、というのは安全なパスワードを生成する、という意味ですか？
ならrnd関数を使うのではないでしょうか。。
rnd関数を使うときには、Form_Load()にrandomize(timer)を
入れておく必要があります。。
0304デフォルトの名無しさんNGNG
>>303
その程度の知識の方は人に教えるのはご遠慮下さい
0305デフォルトの名無しさんNGNG
し、失礼しました。。
0306いなむらきよしNGNG
謝って済む問題じゃないキケー！
とりあえず３回氏ねキケー！そしてもう一度氏ねキケー！
0307デフォルトの名無しさんNGNG
VB6のコードエディタにFontLinkが反映されません。
0308デフォルトの名無しさんNGNG
VBは誰もが認める最高の開発環境だね。
0309デフォルトの名無しさんNGNG
>>308
だまれタコ
0310デフォルトの名無しさんNGNG
右上のとじるボタン( [X] )の処理を変更するにはどうすればいいですか？
0311デフォルトの名無しさんNGNG
>>310
質問は質問スレで聞け
0312デフォルトの名無しさんNGNG
VB質問スレが見当たりません
0313デフォルトの名無しさんNGNG
http://pc5.2ch.net/test/read.cgi/tech/1099737063/l50
0314デフォルトの名無しさんNGNG
つぎをVB6でプログラムするとどうなりますか?

プログラムスタート
E:\Forder1\memo.txt がもしあれば削除する。
E:\Forder1\udedamesi.exe を実行する。
30分経過したら、「時間切れ」と表示してE:\Forder1\udedamesi.exe を強制終了する
続いて、「ギブアップするなら10秒以内にGのキーを押せ」と表示する
10秒以内にGのキーが押されなかったらプログラムスタートに戻る
10秒以内にGのキーが押されたらプログラムを修了する。
プログラムエンド
0315デフォルトの名無しさんNGNG
>>314
質問は質問スレで聞け
0316デフォルトの名無しさんNGNG
313の質問スレはもうありませんのです
0317デフォルトの名無しさんNGNG
探せよ馬鹿
0318デフォルトの名無しさんNGNG
http://pc5.2ch.net/test/read.cgi/tech/1103026199/l50
0319デフォルトの名無しさんNGNG
>>318
ありがと。やさしいね。むこうでおしえてね。ぺこり
0320デフォルトの名無しさん05/01/17 15:22:05
大学で、下記の課題が出たのですが…サッパリわかりません。
ヒントだけでも教えて頂けないでしょうか？
EXCELで作れ、と言われているのですが…もうサッパリです。

試験の採点データの表があったとして、そこの点数の欄を選択しておいて実行すると、
次の基準による評価値を右隣の列に表示するプログラムを作りなさい。
９５点以上→very good、８５点〜９４点→good、７５点〜８４点→OK、７４点以下→再
0321デフォルトの名無しさん05/01/17 19:05:02
=IF(アレ>=95, "very good", IF(アレ>=85, （ｒｙ
0322山田裕治05/01/21 11:33:37
山田裕治　６１歳

この度初めてエクセルのＶＢＡを使って見たいと思う事があり色々な本を見たのですが

分からないので、どなたか、助けてください。

エクセルでコマンドボタンを作成し　その　コマンドボタンを押すと　指定したワードの

シートが開く様な　ＶＢＡを作成したいのですが、　教えて下さい。

すみませんが、宜しく御願い致します。
0323ひんと05/02/01 19:35:44
Sub テスト採点()
Dim テスト点 As Integer
テスト点 = 2
Do Until Cells(テスト点, 1).Value = ""
If Cells(テスト点, 2).Value >= 95 Then
Cells(テスト点, 3).Value = "vary good"
ElseIf Cells(テスト点, 2).Value >= 85 Then
Cells(テスト点, 3).Value = "good"
ElseIf Cells(テスト点, 2).Value >= 75 Then
Cells(テスト点, 3).Value = "ok"
ElseIf Cells(テスト点, 2).Value >= 0 Then
Cells(テスト点, 3).Value = "再"
End If
テスト点 = テスト点 + 1
Loop
End Sub
0324デフォルトの名無しさん05/02/01 21:35:09
>>323
氏ねばいいのに。
0325デフォルトの名無しさん05/02/01 22:36:24
じゃあ俺も

Sub テスト採点()
int ;
テスト点 = 2;
while ( !( Cells ( テスト点 , 1 ) .Value == "" ) )
{
if ( Cells( テスト点 , 2 ).Value >= 95 ) ();
Cells( テスト点, 3 ) .Value = "vary good";
ElseIf Cells(テスト点, 2).Value >= 85 Then
Cells( テスト点, 3 ) .Value = "good";
ElseIf Cells(テスト点, 2).Value >= 75 Then
Cells( テスト点, 3 ) .Value = "ok";
ElseIf Cells(テスト点, 2).Value >= 0 Then
Cells( テスト点, 3 ) .Value = "再";
End If
テスト点 = テスト点 + 1;
Loop
End Sub
0326デフォルトの名無しさん05/03/05 16:37:15
この板でいいのかすらさっぱり分からんのですが、質問です。
ＥＸＣＥＬでファイルを開いたり閉じたりするときに勝手に
visualbasicが起動してコンパイルエラーですとか言われるんですけど
直りますか？
0327デフォルトの名無しさん05/03/05 16:48:30
>>326
腐れスレageんじゃねえよブタ
0328age2005/03/27(日) 22:44:57
VB6.0とVB.netの違い教えてください。
中間ファイルって、たとえばVBでつくったもんをVC++なんかで直せるんですか？
0329デフォルトの名無しさん2005/03/27(日) 22:52:03
ＶＢ５のラーニングエディション持ってる俺が来ましたよ
0330デフォルトの名無しさん2005/04/07(木) 22:50:06
懐かｽｨスレage
0331デフォルトの名無しさん2005/04/07(木) 23:39:14
Mastering Visual Basicを持ってない俺が来ました予
0332デフォルトの名無しさん2005/04/20(水) 22:32:19
Visual BasicとVisual Basic.NETって何が違うんですか？
0333デフォルトの名無しさん2005/04/22(金) 15:46:54
何もかも違う
0334デフォルトの名無しさん2005/05/04(水) 15:29:37
ファイル出力するときに、ダブルコーテーションをつけないような出力はできないんでしょうか？
今はこんな感じでやっているのですが･･･
open "out.txt" for append as #1
write #1,outptxt
close #1
お願いします。。
0335デフォルトの名無しさん2005/05/04(水) 18:04:45
>>334
write -> print
03363342005/05/05(木) 13:40:19
ありがとうございます、やってみます☆
0337デフォルトの名無しさん2005/05/13(金) 02:26:57
ＤｊＶｕのコンポーネントを使って、ＤＪＶＵで作られたファイルを連続印刷したいんですが、
ググってみても何も出てきません。
DJVUコントロールの「SRC」にファイルのフルパスを設定しましたが、そのファイルを表示さえしません。

どなたか教えていただけませんか？
また、良いページはありますか？

よろしくお願いします。
0338デフォルトの名無しさん2005/05/13(金) 02:59:35
http://eAc1Adt234.osk.mesh.ad.jp/
ｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗ
うはっｗｗｗｗｗｗっうぇｗｗｗｗｗｗ
っｗｗｗｗｗｗｗおｋｗｗｗうぇｗｗｗｗｗｗ
0339デフォルトの名無しさん2005/05/13(金) 03:41:09
>>337

自己解決しました。
0340デフォルトの名無しさん2005/05/24(火) 22:51:07
Visual C#.NET Standard（2002）持ってたのですが、数ヶ月前にジャンク屋で
VisualBASIC 6.0ラーニングエディションの未開封品が1,800円で売ってたので
1,800円なら良いかって事で、どんなもん？って感じで買ったのですが、参考
にする書籍として翔泳社の独習 VisualBASIC 6.0ってのが、.NET対応のが出た
せいか既に売ってないんですが、古本屋（東京地区）であったりするもんなん
でしょうか？
0341デフォルトの名無しさん2005/05/25(水) 18:33:48
ですがですがってお前はデスガ星人か。
0342デフォルトの名無しさん2005/05/27(金) 00:57:02
うん、そうですが。
0343デフォルトの名無しさん2005/05/31(火) 22:47:41
本ホスィー！
0344デフォルトの名無しさん2005/05/31(火) 22:55:51
>>340

www.amazon.co.jp
0345デフォルトの名無しさん2005/06/05(日) 17:14:41
VC#.NET 2002を持っている人間が、VB6.0のLerningEditionを買って
何をしようとしているのか、非常に興味深い。
0346デフォルトの名無しさん2005/06/08(水) 00:25:08
何しようかって、どんなもんかな？って感じだけですよ。
1,800円で試せる（本代別途）なら、別に痛い出費でもないと思いますが。
というか、本は3カメのポイントで買えれば良かったと思っていたのです。

まだ古本屋廻ってないので、進展無し。
0347デフォルトの名無しさん2005/06/24(金) 13:20:46
VB.NETでWEBブラウザを作りたいのですが、どのようにしたらよいのでしょうか。
色々検索してみましたがさっぱりHITしませんでした。
参考になるサイト等ありましたら教えていただきたく思います。
よろしくお願いします。
0348デフォルトの名無しさん2005/06/25(土) 20:27:32
ttp://www.gotdotnet.com/japan/student/column/firststep/firststep21.aspx
0349デフォルトの名無しさん2005/08/03(水) 06:05:50
スレ違いかもしれませんが、該当スレが見つからなかったので教えてください。
Excelのvisual basicで、画面を再描画するにはどうすれば良いのでしょうか。
PCのExcel2000やMacのExcel2000は、自動的に再描画されたのですが、
Mac Excel ver.Xにしてからマクロが終るまで画面が変化しなくなってしまいました。

Application.ScreenUpdating は試しました。
よろしくお願いします。
0350デフォルトの名無しさん2005/08/03(水) 06:11:06
DoEventsってないの？
0351デフォルトの名無しさん2005/08/03(水) 06:39:54
>350
DoEvents でできました！　本当にありがとうございます。
0352デフォルトの名無しさん2005/08/26(金) 12:00:27
VBって、何時から日本語名の関数が使えるようになったの？

Private Function 足し算(ByRef a As Integer, ByRef b As Integer) As Integer
　Dim x As Integer
　x = a + b
　Return x
End Function

こんな感じで使えるんですが・・・既出？
0353デフォルトの名無しさん2005/08/30(火) 01:24:40
あの〜質問なんですが、
あるボタンをクリックすると、
同じフォーム上にあるタブコントロールの目的のタブを表示するようにすることって、できます？

0354デフォルトの名無しさん2005/08/30(火) 01:25:40
ここは質問スレじゃねえ
氏ねボケ
0355デフォルトの名無しさん2005/08/30(火) 04:15:28
MSもとうとうVBやめるんだ・・
0356デフォルトの名無しさん2005/08/30(火) 18:53:38
どうしてこのスレは厨が次から次へと湧いてくるんだろう。
VBスレだから？
0357デフォルトの名無しさん2005/08/30(火) 22:16:50
VBスレ以前にネタスレだしな。
つーわけで、質問は本スレでどうぞ。
0358デフォルトの名無しさん2005/10/01(土) 12:36:07
AB＞HSP＞なでしこ＞VB
だな
0359デフォルトの名無しさん2005/10/03(月) 08:05:55
ABを持ち出さないでください。
ほっといてください。
触れないでください。
0360デフォルトの名無しさん 2005/10/06(木) 18:09:04
basicでアウトルックの様なメール機能を作りたいのですが
教えてもらえませんか？
0361デフォルトの名無しさん2005/10/07(金) 08:47:38
アウトルックの様なフォームをデザインして
winsockで地道にプログラムしてくれ。
0362デフォルトの名無しさん2005/10/11(火) 15:43:58
visual Basic 6.0で次のようにプログラム
したのですがエラーがでて動きません。
アドバイスもらえませんか？

'SMTPサーバーを指定する
System.Web.Mail.SmtpMail.SmtpServer = "（SMTPサーバーを指定する）"
'送信者が"[email protected]"、送信先が"[email protected]"、
'題名が"TEST"、メッセージが"This is a test mail."
System.Web.Mail.SmtpMail.Send( _
"[email protected]", _
"[email protected]", _
"TEST", _
"This is a test mail.")
0363デフォルトの名無しさん2005/10/11(火) 16:40:59
>>362
ここは初心者にわかりやすく書いているHPを語るスレだ
プログラムの質問をするな
0364デフォルトの名無しさん2005/10/16(日) 00:45:39
ＶＢなんて、てきとーに書いてればそのうち覚えるんじゃないの？
そもそもヘルプファイルがついてるでしょうが。
0365デフォルトの名無しさん2005/10/19(水) 07:59:01
そもそも>>362のコードは
VB6のコードには見えない
0366デフォルトの名無しさん2005/10/28(金) 01:07:59
.netに入れ替えたせいで5.0のラーニング版をいただいたのですが
これって２０００でも動きますか？
0367デフォルトの名無しさん2005/10/29(土) 00:25:07
スレ違いかもしれませんが、教えていただけますでしょうか？

タスクトレイに表示したプログラムのアイコンを、
キー入力を監視して、リアルタイムに変更したいのですが、
アイコンにマウスポインタを移さないと、変更されません。

バックグラウンドでも、アイコンを変更できるようにするには、
どうすればいいのでしょうか？

ちなみに作っているのは、キーボードのLEDをタスクトレイに表示するものです。
0368デフォルトの名無しさん2005/10/29(土) 00:56:09
>>367
VB質問スレが別にあるからそっちで今書いてるソース晒してみ
0369デフォルトの名無しさん2005/10/29(土) 00:57:22
>>368 さん
ありがとうございます。ためしてみます。
■ このスレッドは過去ログ倉庫に格納されています