トップページ⇒tech
62コメント16KB

VB

■ このスレッドは過去ログ倉庫に格納されています
0001生真面目一直線 NGNG
センター試験のためにVBをやることは実りがあるでしょうか？
また、ＶＢ（もしくはベシ）をやって自分はこんな得をした　という話も大募集です
ここだけで
0002>１ NGNG
悪いけど君の性格が判る迄恐くてレス出来ん
自分の思う所とか色々書いてみ。とりあえず３レスくらい
0003生真面目一直線 NGNG
何故怖いですか？
自分が思うに、ＶＢはベシと重なるところがあるので。マーク模試なんかで
ベシをとると結構簡単で複素数やベクトルよりはとれたりしますよね。だからＶＢをやっておくと得するかも知れないと思いました。
センターの得点にもなるし今後のプログラムの勉強にもなるし。
00042>3 NGNG
恐い理由はね
http://piza.2ch.net/test/read.cgi?bbs=tech&key=970400968
ここにあるように、煽り屋さんてのがいてさ、もし君がそうで相手
してると突然ダークサイドに引き込まれちゃんだ。チョッとそれで
引っ掛かったばっかりでね。　引っ掛かると後ひいて辛いからさ。

で、どんな問題が出そうなの？ もうちょっと色々書いてみ
0005名無しさん＠お腹いっぱい NGNG
数ＡとＢで若干違うんですが
ＩＮＰＵＴで２回数を読み込んで（片方は２以上
10 INPUT　"W= ";W
20 INPUT "V= ";V
30 T=1：U=V
40 IF V>W then goto 80
50 T=T+1
60 U=U*V
70 goto 40
80 Print T＠｀U
90 End
でW、Vそれぞれに724＠｀10（問題に与えられた数）を入力すると
「ア」　「イウエオ」
が表示される
みたいな問題です。
そのあとにこのプログラムを少しいじりFor〜next文などを付け加えた若干複雑なプログラムが出題されます。
これも、与えられた２数を打ち込むと何が表示されるかです。

他にも問題の種類は沢山あります。
0006名無しさん＠お腹いっぱい NGNG
なんと、そうですか。

数ＡとＢで若干違うんですが
ＩＮＰＵＴで２回数を読み込んで（片方は２以上
10 INPUT　"W= ";W
20 INPUT "V= ";V
30 T=1：U=V
40 IF V>W then goto 80
50 T=T+1
60 U=U*V
70 goto 40
80 Print T＠｀U
90 End
でW、Vそれぞれに724＠｀10（問題に与えられた数）を入力すると
「ア」　「イウエオ」
が表示される
みたいな問題です。
そのあとにこのプログラムを少しいじりFor〜next文などを付け加えた若干複雑なプログラムが出題されます。
これも、与えられた２数を打ち込むと何が表示されるかです。

他にも問題の種類は沢山あります。
00072 NGNG
なるほどね。そういうBASICとVBは殆ど無縁になったね。
いくつかWindows用N88BASICエミュレータみたいなのがあるから
それの方がより近いと思うな
それが目的ならVBは意味ないと思うよ
0008名無しさん＠お腹いっぱい。 NGNG
OSのCD-ROMにQBASIC.*って入ってなかった？
ファイル検索で調べてみて。(95だと\OTHER\OLDMSDOS)
無ければExcelのVBAでも十分だと思う。

使い方はコマンドプロンプトで、
>US
>QBASIC
0009名無しさん＠お腹いっぱい。 NGNG
行番号萌え〜。
0010名無しさん＠お腹いっぱい。 NGNG
ギコBASICを待て。待てなければ自分で行番号付きに改造しろ。
0011名無しさん＠お腹いっぱい。 NGNG
俺の高校の時と全然変わってないね。ン十年前から。
さすが日本のITはすごい。韓国やインドに負ける訳さ。
0012生真面目一直線 (6も同じです NGNG
みなさんありがとうございました。
＞OSのCD-ROMにQBASIC.*って入ってなかった？

そんなのがあるとは知らなかったです。やってみます。

＞いくつかWindows用N88BASICエミュレータみたいなのがあるから
＞それの方がより近いと思うな
＞それが目的ならVBは意味ないと思うよ

意味無いですか。じゃあQBASICというものでやってみます。エミュレータも探してやってみたいなあ。
00132 NGNG
良かった。ほんとマトモなスレで良かったよ。がんばってね。
0014ＶＢ初心者 NGNG
いまファイル操作のプログラムを組んでいるのですが、
ＩＮＰＵＴ＃関数は文字列を読み込んでくるのですが　空白などは
読み込んでくれません、ソースファイルをそのまま読み込んできたいの
ですが、良いステートメントか関数ありますか？
00152 NGNG
スレ違いだけど、まあタイトルがVBだからいいか。
Line Input 使ったらどう？　駄目？
0016電化製品 NGNG
＞１４
MSDNのCDをみてぃ

do while(1)　←ファイルの最後まで読み取るような記号使う、忘れた
input line#＠｀nanntara　←たしかインプットラインだと、行ごとに読み込める
j=j+1　←カウンタ
txt(j)=nanntara　←Dim　ｔｘｔ（）　as string ＠｀Redim txt(j) as string
loop
0017ＶＢ初心者 NGNG
＞１５，１６

ありがとうございます、一度やってみます。
それと、読み込みたいファイルはバイナリファイルですけど
それでも読めますか？
0018>１７ NGNG
それ先にイワンとキミィ　ソースファイルはテキストの事だろ？
まあいい、今後気をツケタマエ
ヘルプでGetを調べなさい
0019ＶＢ初心者 NGNG
＞１８
うまくいきました
ありがとう。
0020名無しさん＠お腹いっぱい。 NGNG
VVVVVVVVVVVVVVVVVVVVVVVVVVVVBBBBBBBBBBBBBBBBBBBBBBBBBBB
0021プロＶＢ NGNG
馬鹿野郎バイナリファイルはこうやって読み込むのが基本中の基本だ
unko as byte
Do
on error goto 10
Get #f＠｀＠｀unko
unkotext.text=unkotext.text+unko
loop
10 msgbox "完了"
close #f

数字がズラッと並ぶぜ　すごいだろ
0022名無しさん＠お腹いっぱい。 NGNG
＞２１
さすがプロ
プロはｏｐｅｎ文使わないんだ（ヒヒヒ
0023名無お呼びでない？ NGNG
@lines = <>;


0024プロＶＢ NGNG
＞22
馬鹿目。ファイル名が不明だからＯＰＥＮ文は書かないのが業界標準だ。
τ白が口を出すなよ
0025名無しさん＠お腹いっぱい。 NGNG
＞プロVB氏
＞unko as byte
この行は、頭にDim はつけなくてもいいの？
Option Explicitを宣言してもダメだよね。
いかんせん初心者なもので、暇があったら教えてくだされ。
0026代理 NGNG
sub main
Dim _

とその上の行に書いているんだよ。
0027プロＶＢ NGNG
面倒くさいから省略したまでだ　かかなくてもわかるだろツッコミいれるくらいだか
＞２６
ごめん　めんどくさかったんだ

Option Explicitはだめだ自由に変数が使えねえ不便だ
いちいち宣言なんてしてられねえからな
使うやつはよほどの暇人か臆病者だな
自分のソースに自信を持てねえやつだ
ちなみに
DO loop のかわりに下のが業界標準になりつつあるな
unko as byte
1 on error goto 10
Get #f＠｀＠｀unko
unkotext.text=unkotext.text+unko
goto 1
10 msgbox "完了"
close #f

どうだこれならモジュール使わなくてもDoのなかでのForが実現するぜ
プロは良く使うテクニックだ覚えとけ
0028名無しさん＠お腹いっぱい。 NGNG
せっかくＶＢスレにしては出だしよかったのに腐らすなよ。
0029名無しさん＠お腹いっぱい。 NGNG
27がプロとか言うからVB使いは逝ってよしになるんだよ、、、
初心者はoption explicitして下さい、dimでプロシージャの先頭に変数宣言して下さい、グローバル変数は出来るだけ使わないでください。
0030名無しさん＠お腹いっぱい。 NGNG
>29
んなことにいつまでもこだわってるからいかんのよ
若いな…
0031名無しさんi486 NGNG
VB、VBAには専用のエディタがありますが、VBSに専用のエディタってあるのですか？
0032名無しさん＠お腹いっぱい。 NGNG
メモ帳
0033名無しさん＠お腹いっぱい。 NGNG
メモ帳のエイリアスをですくとっぷにおいて、”ＶＢＳ専用エディタ”に名前をかえておけ。
プロはよくつかうてくにっくだ、おぼえとけ
0034名無しさん＠お腹いっぱい。 NGNG
定数を大量に使われるのもいや〜んな感じです。
なにか別の手はないでしょうか
0035ＶＢ NGNG
＞２７

プロならプロらしく、初心者に分かるようにやれ
多分理解出来てないだろうな
0036名無しさん＠お腹いっぱい。 NGNG
このスレッドであらためてVBはうんこということを再確認できた
0037名無しさん＠お腹いっぱい。 NGNG
確かにＢＡＳＩＣはもう終わっている。
次のＶＢはＢＡＳＩＣの名前を捨ててＢ＃とでもした方が
いいんじゃないのか？
0038名無しさん＠お腹いっぱい。 NGNG
>21＠｀27

↓のようなやり方ではマズイのでしょうか？

Do　Until　EOF(1)
　　Get　#1＠｀＠｀bData
　　txtMain.Text　=　txtMain.Text　+　Str(bData)
Loop

また、なぜあえてLoop文を使用しないやり方があるのでしょうか。
よくわかりませんが処理速度等が関係するのですか？
0039名無しさん＠お腹いっぱい。 NGNG
プロの言う事はあんまりアテにせんほうがいい。
0040名無しさん＠お腹いっぱい。 NGNG
他人の言う事はあんまりアテにせんほうがいい。
0041名無しさん＠お腹いっぱい。 NGNG
つーか、2ちゃんねるの段階で話半分
0042名無しさん＠お腹いっぱい。 NGNG
VBってなんですか？
0043名無しさん＠お腹いっぱい。 NGNG
>>42 Very Baka
0044>42 NGNG
VisualBasicの略です。
日本語訳すると「目に見える基本」。
これすらできなきゃどーしようもないって感じかな‥
0045(ﾟ∀ﾟ)y―┛~~ NGNG
>>Sunのマクネリは「見た目が普通」って言ってたぜ。
0046名無しさん＠お腹いっぱい。 NGNG
「VisualBASIC：目に見える初心者を援助する単純な符号」です（とか）
0047ちなみにBASICは、以下のように展開されます NGNG
B=バカで
A=アホで
S=死んで
I=逝って欲しい
C=子
0048>47 NGNG
おもしろくないね。
0049名無しさん＠お腹いっぱい。 NGNG
Beginner's All-purpose Symbolic Instruction Code
0050sage NGNG
せめて

B=バカでも
A=アホでも
S=ソフト作れる
I=逝ってよ
C=し

にしてほしかった
0051名無しさん＠お腹いっぱい。 NGNG
>>45を見て思い出して探してみた。おれ、この手のジョークって大好きなんだ。。。

●今年のMSジョークは「ベガス買収」！
スコット・マクニーリ会長を迎える豪華なステージと
手品師のショーラスベガスのきらびやかな街並みを描いた
豪華なステージと手品師のショーに迎えられて登場した
マクニーリ会長は、開口一番、恒例のMicrosoftジョークを飛ばした。
同氏は「Microsoftが、ラスベガスを買ったらどうなる？」と問いかけ、
「スロットマシンを4回プレイするたびに再起動しなければならなくなる」、
「トレジャーアイランドホテルの海賊は本当にお金を巻き上げる」、
「ありとあらゆる新たな開発プロジェクトは中止される」、
「ショーガールは、ビジュアル的に普通（Visual Basic）になる」
などと語り、会場を笑わせた。
http://www.watch.impress.co.jp/pc/docs/article/991118/comdex14.htm
0052ド素人 NGNG
VBでゲームコントローラーを認識させるにはどうしたら良いんでしょう？
結構急な用事で…
0053名無しさん＠お腹いっぱい。 NGNG
それはVBでデバイスドライバを作りたいと言うことか？
0054ド素人 NGNG
いえ、ただ単純にゲームコントローラーをスイッチにする方法です。
デバイスドライバは入ってるものとして。
（低レベルですみません。）
0055ド素人（工房） NGNG
ゲームコントローラーを押すとWAVファイルがなるようにしたいんです。
ちなみに文化祭で必要なんです。
005638 NGNG
>プロの言う事はあんまりアテにせんほうがいい
>他人の言う事はあんまりアテにせんほうがいい。
そ、そうですか。了解

>つーか、2ちゃんねるの段階で話半分
うーんでもよい腕の技術者も多いように思えますね。

>52
GetAsyncKeyState　　キーの状態を非同期的に取得するAPI
joyGetNumDevs　　　ジョイスティック数（ポート数）を取得するAPI
joyGetPos　　　　　ジョイスティックの状態を取得するAPI
joyGetDevCaps ジョイスティックの情報を取得するAPI
0057名無しさん＠お腹いっぱい。 NGNG
>>56
匿名ベースなので色んな人がくるんだよね。
0058ド素人 NGNG
>>56
よくわかんないけど、とりあえずやってみます。
ありがとうございます。
005956 NGNG
>58
その関数でよかったんだろうか、、どうなりました？
0060名無しさん＠お腹いっぱい。 NGNG
JOBSTICK(0)ダヨ
上８
左４
右６
下２
ガ復帰値ダ！
0061名無しさん＠お腹いっぱい。 NGNG
復帰値…
0062名無しさん＠お腹いっぱい。 NGNG
＞60
それって関数ですか？どう使うのかわからん。。
じょぶすちっく
■ このスレッドは過去ログ倉庫に格納されています