118コメント26KB

俺にプログラムを教えてみろ！！

■ このスレッドは過去ログ倉庫に格納されています

0001１

NGNG

Visual Basic とかなんとかの本を買って、プログラムを勉強しようかと思ったが、

馬鹿な俺にはさっぱりわからん。

俺にプログラムを教えてみろ！！

0002デフォルトの名無しさん

NGNG

馬鹿

0003.

NGNG

馬鹿はVBでもやってろ

0004デフォルトの名無しさん

NGNG

0005デフォルトの名無しさん

NGNG

++++++++++++++自作自演なので終了+++++++++++++++

0006デフォルトの名無しさん

NGNG

１におすすめだよ～。

同時に覚えるC++、Java、C言語
http://www.ai-pub.co.jp/contents/book/prog/cpra-java-c.html

0007１

NGNG

>>5
ハァ？

0008（´ー`）

NGNG

>>6　中途半端な本だなぁ。

0009１

NGNG

まじめに教えてくれ・・・マジで。

0010１

NGNG

理解不能だ。

0011デフォルトの名無しさん

NGNG

よし、教えてやる。
(+ 1 2)
で、1+2が計算出来る。
カッコの最初が関数、という特別な意味をもつ。
(/ 1 2)で1/2が計算出来る。
で、これらの構造は、
/と1と2がつながれたリストとして内部では保持される。
また、このリストはネスト可能。
(+ 1 2 (+ 3 4))とあると、
+ と1 と 2と (+ 3 4)という4つの要素のリストになってて、
4番目が+と3と4というリストになる。
で、
(define (a x) (+ x 2))
で、aという関数を定義出来る。
これはxという変数を取り、x+2という意味の操作を自分が先頭の
リストの時に行なう(評価、という)

(a 3)とやると5になる訳だ。
(+ 7 8 (a 3))で、20になる。
これで完璧。

0012デフォルトの名無しさん

NGNG

>>6
やばげ。
ヒッポファミリークラブみたいだな。

0013１

NGNG

>>11
わけわからん

0014１

NGNG

>>11
６行目からわからん。

0015１

NGNG

やっぱり俺は馬鹿なのか・・・

0016（´ー`）

NGNG

始めたばかりのやつに"ネスト"とかの用語が分かるわけがない。
最初はわからなくても、本に載ってるプログラムを打ってればそのうち分かるよ。
理論を考えるより実践しな。

0017１

NGNG

>>16
うむ。　そうするわ。

0018１

NGNG

>>16
アドバイスどうも。

0019デフォルトの名無しさん

NGNG

今>>12がいいこと言った！

0020デフォルトの名無しさん

NGNG

＼|／
/⌒ヽ　　　／￣￣￣￣￣￣￣￣￣￣￣
| ゜Θ゜）＜　そうでもないよ。
|　∵　つ　＼＿＿＿＿＿＿＿＿＿＿＿
|　∵　|
＼＿／

0021デフォルトの名無しさん

NGNG

プログラム打ってたら、なんかカーソルが｜←から■←こんなのになった。どうやったら直るんでしょうか・・・

002221

NGNG

やりにくいんだよ・・・

002321

NGNG

つうかスレ違いか。　逝ってきます。

002421

NGNG

何処に質問すりゃいいんだ？

002521

NGNG

ま、いっか。

0026（´ー`）

NGNG

>>21 使ってるエディタが解らんので誰も答えられん。

0027.

NGNG

>>21
プログラム組む以前の問題。
ソフトの使い方から勉強しろ

0028デフォルトの名無しさん

NGNG

インサートキーを押せ

002921

NGNG

>>28
直りました。ｻﾝｸｽです。

0030デフォルトの名無しさん

NGNG

このスレあげる奴、何考えてるんだ？
別にいいけど。

0031デフォルトの名無しさん

NGNG

で、１は勉強中か？

0032デフォルトの名無しさん

NGNG

>>30
さぁ？　たしかにどうでもいいね。

0033１

NGNG

疲れた。飯食ってくる。

0034デフォルトの名無しさん

NGNG

>1は何がわからんのかサッパリわからん。

0035デフォルトの名無しさん

NGNG

>>34
全部わからんのだろ。

0036sage

NGNG

このスレ、昔も似たようなのがあったと思うんだけど、
育ててるんですか？　

0037デフォルトの名無しさん

NGNG

>>36
さぁ？１の性格による（ﾜﾗ

0038デフォルトの名無しさん

NGNG

>>1 は VB 自体を持ってなさげ

0039デフォルトの名無しさん

NGNG

こういうこういうスレは１の能力に激しく依存するな。
物理板のヴァカは立派だったが、このプログラム板の
ヴァカはどんなもんか？

0040デフォルトの名無しさん

NGNG

　　　　　　　　　　　　　　　　＼>>1を迎えにきました。　／
　　　　　　　　　　　　　　　　　￣￣￣∨￣￣￣￣￣￣￣
　　　　　　＿＿　　＿＿＿＿＿＿＿＿⊆二I
　　　　　く￣￣￣￣｀　 |￣|　 /　|￣|￣| [ ∧∧ヽ
　　　　　　　＼＿亙亙＿_|＿|　/　 |＿|＿| [（ﾟДﾟ).＼＿
　￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣　￣ ─ ─＿
　＿＿＿＿＿＿＿＿＿＿＿＿__ 　　　　　　　　　　　　　　　　　￣ ─ ＿
　　　 |￣￣￣￣￣￣￣|　|┌┐|ヽ　　　　　　JNR 　　　　　　　　　　　　　　￣）
　　　 |　　　　　　　　　　|　|││|　ヽ　　　　　　　　　　　　　　　　　　　　　/
　　　 |　　　　　　　　　　|　|││|　　ヽ_＿＿＿＿＿＿＿＿＿＿＿＿＿＿_＿__. /
　　　 |_＿＿_＿＿_＿＿|　|└┘|　　　ヽ＿＿＿＿＿＿＿＿＿＿＿＿＿＿____//
　.￣￣￣￣￣￣￣￣￣￣|￣￣|￣￣ヽ＿＿＿＿＿＿＿＿＿＿＿_＿＿____//
　. 　　　　　　　　　　| 　　|　　　ヽ＿＿＿＿＿＿＿＿＿＿＿_________//
　.＿＿＿＿＿＿＿＿＿＿|＿＿|＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿________/＿
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿______|＿|
　　　　　　　　|＿_　._＿　.＿＿＿＿＿＿_　＿_　._＿|＼　　　　　　　　ヽ
　　　　　　　　　（|__|□|__|）宝|=|璽|=|宝（|__|□|__|）　　＼＿_________________>
　　　　　　　　　｀＼____／　凸[凸凸]凸　＼____／

0041デフォルトの名無しさん

NGNG

>>39
言ってることが意味不明

0042デフォルトの名無しさん

NGNG

>>39 もヴァカってことで。

0043デフォルトの名無しさん

NGNG

>>42
激しく同意。

004444=バカ

NGNG

>>42
おれも仲間に入れてくれ！

0045デフォルトの名無しさん

NGNG

>>44
はぁ？　おまえ何者？

0046デフォルトの名無しさん

NGNG

あ、馬鹿者か。

0047デフォルトの名無しさん

NGNG

このスレにはアホが集まるのか？

0048デフォルトの名無しさん

NGNG

アホじゃねえよ、バカだよ！！

0049デフォルトの名無しさん

NGNG

MsgBox("とりあえず、ＶＢスクリプトでもどうかね？>>1")

0050１

NGNG

今日は勉強する気無し。　他の板逝って寝るよ。

0051デフォルトの名無しさん

NGNG

「プログラムの勉強がしたい」という奴はよくいるが、
君たち一体何がやりたいのかはっきりしろ。
何がやりたいのかわからなければ、何を教えれば
よいのかわからんっつーの。

オフィスの集計補助、RPG、ネット上の掲示板、etc.

0052デフォルトの名無しさん

NGNG

プログラムがやりたいからプログラム教えてください。

0053デフォルトの名無しさん

NGNG

ネタやめい

0054デフォルトの名無しさん

NGNG

なんでプログラムを勉強しようと思ったの？

0055デフォルトの名無しさん

NGNG

１じゃないけどちょいとした好奇心でVisualStudio6.0を買った。
んでVBの本も買って絵日記エディタ作った。
で、VB自体もワケワカランが、それより気になるのが勝手にインストール
されたツール群。
みんな何に使ってるの
SPY　++とかDataObject　Viewerとか立ち上げてイジクリ回したけど、さっ
ぱり分からん。
あと、新規プロジェクトを選んだ時にとりあえず標準EXEを選んでるけど、
他のActiveXとかウィザードマネージャって何？ヘルプ見てもさっぱり…
本にも書いてない。
どんなPG作る時に使うの？
だらだらと書きましたが、よかったら教えて下さい。
このままじゃVCとかいうの使うのは100年後になりそう。

0056デフォルトの名無しさん

NGNG

>>54
プログラマがかっこいいから

0057デフォルトの名無しさん

NGNG

>55

> このままじゃVCとかいうの使うのは100年後になりそう。

車は使えれば便利かもしれないけど、運転手がいるなら
免許を持つ必要はなく。

VCは使えれば便利かもしれないけど、他人のプログラムで事足りるなら
覚える必要も無く。

VCが便利かどうかは不明。

0058デフォルトの名無しさん

NGNG

>>56
プログラマですが、街中をお姉さんと二人で歩いてる男の方が
１００倍かっこいいです。

0059デフォルトの名無しさん

NGNG

>>56
http://pc.2ch.net/test/read.cgi/prog/1004500706/l50

0060デフォルトの名無しさん

NGNG

HSPを使えや、タダやで
容量も小さいし簡単やし
こでで満足かYO!１

006155

NGNG

終わられちった…
漏れの質問はよそに書いてもいいよね？

0062デフォルトの名無しさん

NGNG

プログラミングの間違いじゃないか？

0063デフォルトの名無しさん

NGNG

プログラマーって世間から見るとただのＰＣヲタ？

0064デフォルトの名無しさん

NGNG

そういう人もいるし、そうでない人もいる。

0065デフォルトの名無しさん

NGNG

>>41-43
http://cheese.2ch.net/test/read.cgi/sci/991658163/l50
彼のことを言ってるのだろ。
確かに、ここの>>1とは大違いだ。

0066１

NGNG

>>65
何を～！　頑張ってるもんね～

ところで、比較演算子、引数　　この二つはなんて読むの？

0067１

NGNG

>>65
ちなみにそこの１より俺のほうが遥かにｳﾞｧｶだ。

0068デフォルトの名無しさん

NGNG

>>66
辞書使え

0069１

NGNG

>>68
載ってない。

0070デフォルトの名無しさん

NGNG

いんかずだよ♪

0071デフォルトの名無しさん

NGNG

ちんかす

0072１

NGNG

>>70
その逆を取ってひきすうだろ。引数引数

0073１

NGNG

もう一つがわからん。

0074デフォルトの名無しさん

NGNG

ひかくえんざんし
ネタだとしても少しage過ぎ。
もうちょっと控え目にしてくれ。

0075１

NGNG

>>74
おーっ！　ｻﾝｸｽ！

0076１

NGNG

Sub hantei(ByVa1 Index As Integer, _
ByVa1 No As Integer, _
ByVa1 Fname As String)

本どうりに打ってたらなんかここでエラーが出る。本どうりのはずなのに。

なんでだ？

0077１

NGNG

Sub hantei(ByVa1 Index As Integer, _
　　　　　　ByVa1 No As Integer, _
　　　　　　ByVa1 Fname As String)

ん？

0078１

NGNG

半角スペースは省略されるのか？

0079デフォルトの名無しさん

NGNG

独り言やめい

0080デフォルトの名無しさん

NGNG

>>76　ネタ？
ValがVa1になってるぞ（エルがイチになってるぞ）

0081デフォルトの名無しさん

NGNG

ネタにしか見えん

0082１

NGNG

ネタじゃない・・・鬱だ氏のう・・・・・・

0083１

NGNG

とりあえずｻﾝｸｽ。

0084デフォルトの名無しさん

NGNG

なんとかミスってやつね。

0085デフォルトの名無しさん

NGNG

>>84
何で上げんの？

0086デフォルトの名無しさん

NGNG

「１０－２」は？「うーん。。。８！」
「正解！じゃあ１０ｃｍの紐から２ｃｍ切りとると残りの紐の長さは？」
「……。えっ！？ん？うーん…。５ｃｍ？」

0087デフォルトの名無しさん

NGNG

>>86
何で上げんの？

0088デフォルトの名無しさん

NGNG

次のネタに期待age

0089デフォルトの名無しさん

NGNG

>>85,>>87
なんでsageんの？

0090デフォルトの名無しさん

NGNG

VBよくしらんのだけど>>77みたいな関数プロトタイプだけで実行できんの？

0091仕様書無しさん

NGNG

VB厨発生の起源がここに！！

0092デフォルトの名無しさん

NGNG

>>86
1cm & 7cm
2ch & 6cm
3cm & 5cm
4cm & 4cm
....

009355

NGNG

ディレクトリに希望するファイルが保管されているかどうか調べたいんだけど
普通はどうするの？

Open file_path For Input As #file_id

って、やったらFileが存在しない場合エラーで処理終了…
いろいろ調べたんだけど、Fileが存在しない場合にエラーにしないで処理を続行
させる方法がわからない。
誰かヒントを下さい。

0094デフォルトの名無しさん

NGNG

ヒント：調べるだけならオープンしない

0095デフォルトの名無しさん

NGNG

♪日本を印度にし～てしまえっ！
俺にＶＢ教えろ～
俺にＶＢ教えろ～・・・

0096デフォルトの名無しさん

NGNG

>>92

>2ch & 6cm
ﾜﾗﾀ

0097デフォルトの名無しさん

NGNG

on error goto
(VBにあるのか？

0098デフォルトの名無しさん

NGNG

　　　　　　　　　　　　　　　　　　　　　　　　　　, ～～～～～～～～～～～～～､
　　　　　　　　　　　　　　　　　　　　　　　　　（　なんか事務的になったよなぁ…　）
　　　　　　　　　　　　　　　　　　　　　　　　　　` ～～～ｏ～～～～～～～～～'
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　ﾟ　（（（　）））
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 u （´Д｀）
　　／￣￣￣￣￣￣￣￣￣＼　　　　　　　　　　　　　　　　 ./　　　ヽ
　（　まって～１さんＬＯＶＥ。　）　　　　　　　　　　　　　　　　し　　Ｊ
　　＼＿＿＿　＿＿＿＿＿／　　　　　　　　　　　　　　　:::::（＿）（＿）::::
　　　　　　　 .|／
　　　　　　　　　　　　┌──┬┐　　／￣￣￣￣￣￣￣￣￣￣￣＼
　　　　　　　　　　　　　||￣￣| |　|　　（　また騙されましたね１さん。　）
　　　 ∧＿∧. 　　　　||＿＿| |　|　　＼＿＿＿　＿＿＿＿＿＿＿／
　　　（　　　　）　　　　..|∞∞0 ||~|　　　　　　　　.＼|
　　 /　愛　.＼　　　|￣￣￣￣|￣|
　　.|　　　　|＼＼　　 ||￣￣￣||￣|　　　　　　　　 .∧＿∧ ))
　　|　　　　|/　＼)..　 ||======||＿|　　　　　 ./⌒（ ´Д｀）　ｱﾊﾊﾊ
　　|　　　　ヽ /　|　　ﾞﾞﾞ￣￣ﾞ￣ﾞﾞ　/⌒＼　　 |　|　　　　 (~冫
　　（　（　　　ﾉ(　つ　　　　　　　　/ /ヽ　ヽ - |　|　　　/.| |
　　￣￣￣￣￣￣　　　　i⌒ヽ__/＿,,,--──＼＼　 /.| | .|
　　　　　　　　　　　　　　　＼＿＿＿＿,,,＿＿,,-（_)⌒Y⌒～

009955

NGNG

>>94

ヒントありがとうね。
調べてみる、また1日くらいかかると思う。
分からなかったらまたくる。

>>97

Privaste sub File_open_sub()
on error goto File_open_sub_ERR:
　なんたら感たら処理
File_open_sub_ERR:
エラー時の処理
end sub

という感じ使ってる。
でも、これではうまくいかない

0100100

NGNG

100

0101１

NGNG

さて、勉強するかな。

010255

NGNG

うっひゃーかっこわる～

> Privaste → Private

ださくてスマソ、只今ディレクトリ内情報を取得するコマンドを
調査中。なかなか検索エンジンにひっかかりません。

>1

ここ借りててイイ？勉強の邪魔なら出て行くけど

0103１

NGNG

>>102
いいよ。

0104デフォルトの名無しさん

NGNG

>>102-103
二人とも出ていけ。
もしくはsageでやれ。

0105デフォルトの名無しさん

NGNG

>>93=55
Dir

0106（´ー`）

NGNG

　あんたらMSDN見てないのかい？
サンプルプログラムとか載ってるだろ。

010755

NGNG

見てるよ、でもうまく引けないよ。
Dirでやっと情報にたどり着けたよ。
File　List　Openじゃ情報はでてこなかったよ

>>105

感謝感激雨あられ、これで前に進めそうです。

0108１

NGNG

なんとなく解ってきた。　ﾑﾌﾌ・・・

0109１

NGNG

なんか眠くなってきた。　昼寝するわ。　

011055

NGNG

MSDNの↓ヘルプとFileListBoxのListCountプロパティを使って、やっと出来たよ。

-----
' 指定した拡張子を持つファイル名を返します。複数の *.INI ファイル
' が存在すると、最初に見つかったファイル名を返します。
MyFile = Dir("C:\WINDOWS\*.INI")

' 引数を指定せずに再度 Dir 関数を呼び出すと、
' 同じフォルダにある次の *.INIファイルを返します。
MyFile = Dir
-----

作ったソース、おかしな点を指摘してもらえるとうれしいです。

-----
Dim All_file()
Dim i
Dim j

'/ FileListBoxコントロールを使ってファイル数を求めてます /

FileList.Path = "c:\japamedia\cel_img"
j = FileList.ListCount

'/ ファイル数分の配列を宣言します /
ReDim All_file(j)

'/ ファイル名を保管 /

'/ 1つめのファイルだけ先に処理 /
All_file(0) = Dir("c:\japamedia\cel_img\*.*", vbNormal)

'/ ファイル名保管繰り返し /
i = 1
Do Until i > j
All_file(i) = Dir
i = i + 1
Loop

Dirではファイル総数が分からないので、FileListBoxのListCountを使用しました。

全部>>105さんのおかげです。ありがとうございました。

0111１

NGNG

なんかやる気でない。

0112デフォルトの名無しさん

NGNG

>1
目的は何だ？
ツールか？ゲームか？
漠然と覚えてもすぐ忘れるだけだと思うが。
どうだ？

＃脅迫してるわけではない...。

0113デフォルトの名無しさん

NGNG

>>112
いいかなお嬢さん
世の中には手段の為ならば目的を選ばないという様な
どうしようもない連中も確実に存在するのだ

0114デフォルトの名無しさん

NGNG

>113

いいから上げるな

0115デフォルトの名無しさん

NGNG

なんかageることに、やけにウルサイ奴がｲﾊﾟｰｲ！

別にいいじゃん・・・

0116デフォルトの名無しさん

NGNG

何がいいんだ？

0117デフォルトの名無しさん

NGNG

>>115
駄スレをあげると他のスレが沈む。
お分かりか？

0118デフォルトの名無しさん

NGNG

　　　| ＼
　　　|◎`｝　>>434　ｺｺﾆｲﾙﾉﾆｷﾂﾞｲﾃﾅｲﾅﾝﾃｿﾗﾈｰﾖ
　　　|⊂
　　　|

　　　　　♪　　Å
　　　♪　　　／＼　　　ｿﾗｿﾗ
　　　　　　ヽ{´◎`;}ﾉ　　ｿﾗｿﾗ
　　　　　　 (　へ) 　　　ｿﾗﾈｰ
　　　　　　く　　　　　　ﾖ

　　　♪　　　　Å
　　　　　♪　／＼　　　ﾉﾎﾞﾘｶﾞ
　　　　　　ヽ{;´◎`}ﾉ　　ﾂｲﾃﾈｰﾖ
　　　　　　 (へ　 ) 　　　ﾃﾇｷｶ
　　　　　　　　 >　　　　ﾖ

■ このスレッドは過去ログ倉庫に格納されています