[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 901- 2chのread.cgiへ]
Update time : 02/01 06:17 / Filesize : 260 KB / Number-of Response : 964
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

VBプログラマ質問スレ(Ver.6.0 まで) part57



1 名前:デフォルトの名無しさん mailto:sage [2011/04/30(土) 01:50:27.76 ]
ここは Visual Basic 〜6.0 の質問スレです。
質問者は使用しているOS、VBのバージョン、サービスパックのバージョン、
「何がしたくて、どうしたけど、どう困っているのか」を明確に書きましょう。

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

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

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

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

※「まず自分で調べる」クセを身につけよう。

75 名前:デフォルトの名無しさん mailto:sage [2011/05/18(水) 07:15:17.07 ]
>>74
自作クラスでやるなら、簡単だよな?

76 名前:デフォルトの名無しさん mailto:sage [2011/05/18(水) 17:14:53.76 ]
おせーてくらさい

77 名前:デフォルトの名無しさん mailto:sage [2011/05/18(水) 19:38:30.99 ]
>>76
terminateイベントプロシージャにDebug,Print "hoge"とでも書けば

78 名前:デフォルトの名無しさん mailto:sage [2011/05/19(木) 01:03:58.16 ]
dd
なるほど

79 名前:デフォルトの名無しさん mailto:sage [2011/05/19(木) 01:08:41.62 ]
'Class1
Public Sub Hoge()
Debug.Print "hoge"
End Sub
Private Sub Class_Initialize()
Debug.Print "initialize"
End Sub
Private Sub Class_Terminate()
Debug.Print "terminate"
End Sub

'Form1
Private Sub Command1_Click()
Debug.Print "click"
With New Class1
Debug.Print "call hoge"
.Hoge
Debug.Print "aftre call hoge"
End With
Debug.Print "end sub"
End Sub

'Result
click
initialize
call hoge
hoge
aftre call hoge
terminate
end sub

80 名前:デフォルトの名無しさん mailto:sage [2011/05/20(金) 15:31:26.12 ]
VBを今のところ、ただ勉強目的で始めたいのですが、VBの何をまずダウンロードすればいいのか、わかりません。教えてください。

自宅でWindows7を使っています。インターネット接続環境はありません。そのため、ネットカフェでダウンロードして、自宅でそれをインストールしたいのですが、オフラインの自宅でインストールは可能でしょうか?

また何というものをダウンロードすればいいのですか?

いろいろ調べたら、単なる勉学者は、Express Editionとかいうのをダウンロードすればいいみたいですが、詳しくはわかりません。

以上を踏まえ、どなたか何とぞ、お教えねがいます。

81 名前:デフォルトの名無しさん mailto:sage [2011/05/20(金) 16:06:07.83 ]
>>80
スレ違い

ダウンロード出来るのは、VBではなくVB.NET

VB.NET質問スレ(Part36)
hibari.2ch.net/test/read.cgi/tech/1301828549/

82 名前:デフォルトの名無しさん mailto:sage [2011/05/20(金) 16:15:50.20 ]
ftp://ftp.microsoft.com/softlib/
このサイトのMSLFILESにあるVB6用のサンプルプログラムってVB6やるからには見ておいたほうがいいの?

83 名前:デフォルトの名無しさん mailto:sage [2011/05/20(金) 17:55:11.04 ]
ftp://ftp.microsoft.com/のdeveloprフォルダ



84 名前:デフォルトの名無しさん mailto:sage [2011/05/20(金) 17:58:13.02 ]
ftp://ftp.microsoft.com/deskapps/games/public/でゲームでも探して炉

85 名前:デフォルトの名無しさん mailto:sage [2011/05/20(金) 18:06:50.49 ]
なにがしたいんだよ

86 名前:デフォルトの名無しさん mailto:sage [2011/05/21(土) 23:03:28.32 ]
フォーム上のコマンドボタンを押すと1行目に『ビート』、2行目に『たけし』とリストボックスに追加されるプログラムがある。【@】、【A】を埋めて完成させよ。リストボックスのオブジェクト名は『List1』とする。

Private Sub Command1_Clic()

List1.【 @ 】
List1.【 A 】

End Sub


87 名前:デフォルトの名無しさん mailto:sage [2011/05/21(土) 23:11:50.42 ]
動的配列を使い、コマンドボックスを押すたびに配列の数が増えるプログラムを【】を埋めて完成させよ。

Private Max As Long 'データ数を保存する変数
Private Hairetu() As Long '配列


Private Sub Form_Load()
Max = 0 'データ数初期化
End Sub

Private Sub Command1_Click()

Max = Max + 1 'データ数を1つ増やす
【 】'実際に配列の範囲を変更

End Sub

88 名前:デフォルトの名無しさん mailto:sage [2011/05/21(土) 23:24:53.29 ]
先生、コマンドボックスってなんですか?

89 名前:デフォルトの名無しさん mailto:sage [2011/05/21(土) 23:46:50.70 ]
Redim Preserveだが…なんでこんな問題作ってんの?

90 名前:デフォルトの名無しさん mailto:sage [2011/05/22(日) 00:57:54.89 ]
学校の宿題なんだろ

91 名前:デフォルトの名無しさん mailto:sage [2011/05/22(日) 01:13:59.00 ]
「値を保持したまま」とは書いてないから、ReDimだけで良いのでは?
値の保持が必要ないなら、ReDim Preserveは遅いだけだし

92 名前:デフォルトの名無しさん mailto:sage [2011/05/22(日) 03:21:05.03 ]
Hairetu()(笑)

93 名前:デフォルトの名無しさん mailto:sage [2011/05/22(日) 16:34:01.94 ]
Haiyoru(笑)



94 名前:デフォルトの名無しさん mailto:sage [2011/05/22(日) 17:11:34.88 ]
ググればすぐわかるような基本構文問題には答えんなよw

95 名前:デフォルトの名無しさん mailto:sage [2011/05/22(日) 20:22:20.71 ]
>>86
先生!なに入れてもコマンドボタンが反応しません!

96 名前:デフォルトの名無しさん mailto:sage [2011/05/22(日) 21:00:12.41 ]
確かにあれじゃ反応しないなw
なんてマのヌケた出題なんだろう…

97 名前:デフォルトの名無しさん mailto:sage [2011/05/24(火) 23:15:18.09 ]
1つの配列の中に重複するデータが多数ある
重複するデータを抜き出したい
A,B,A,B,A,A,C,F,C....
欲しいデータは重複データなので上記の場合
A,B,Cとなります
unique以外を取得したいのです

98 名前:デフォルトの名無しさん mailto:sage [2011/05/25(水) 01:01:19.38 ]
>>97
ソートしてから、2つ以上同一の値が連続しているものを抜粋する
Filter掛けて、戻り値のUBoundが1以上のものを列挙する
連想配列を利用する

いろいろ方法はあるので、お好きな物をどうぞ

99 名前:デフォルトの名無しさん mailto:sage [2011/05/25(水) 01:02:11.41 ]
便利なコマンドがVB6以前に存在するのかを尋ねているのか
最速アルゴリズムを尋ねているのか

100 名前:デフォルトの名無しさん mailto:sage [2011/05/25(水) 01:30:36.51 ]
じゃあ両方で

101 名前:デフォルトの名無しさん mailto:sage [2011/05/25(水) 01:34:08.95 ]
99に期待

102 名前:97 mailto:sage [2011/05/25(水) 07:51:55.31 ]
>>98
連想配列でぐぐってきた!
連想配列が何か分かったけど、どうアルゴリズム化していいかわかんねw

>>99
uniqueの逆の関数があれば1番良かったんですけど、なさそうなのでアルゴリズムです

103 名前:97 mailto:sage [2011/05/25(水) 12:53:49.58 ]
自己解決

l = Ubound(hogeArray)
For i=0 TO l
For j=i+1 TO l
If hogeArray(i) = hogeArray(j) Then
'同値の場合の処理
end if
next
next

msgbox hoge




104 名前:97 mailto:sage [2011/05/25(水) 12:59:17.07 ]
>>103
最後のmsgboxはゴミです


105 名前:デフォルトの名無しさん mailto:sage [2011/05/25(水) 18:19:25.53 ]
それだけだと、A,B,A,B,A,A,C,F,Cの場合
BやCみたいに2つの場合はいいけど、Aみたいに4つの場合は6回(3+2+1回)実行されちゃうよ
3つの場合は3回(2+1回)、5つの場合は10回(4+3+2+1回)だ

つまり、「A,B,A,B,A,A,C,F,C」が「A,A,A, B, A,A, A, C」になってしまうので、
それで問題ないなら構わないけど、「A,B,C」にしたいという最初の条件とは違うよね

106 名前:デフォルトの名無しさん mailto:sage [2011/05/25(水) 19:45:31.84 ]
perlだと1行で簡単にできる式があったような気がしたw

107 名前:デフォルトの名無しさん mailto:sage [2011/05/25(水) 19:53:16.45 ]
で?

108 名前:デフォルトの名無しさん mailto:sage [2011/05/25(水) 19:54:26.43 ]
そういや7年くらい前にperlの連想配列と同じことができるVBのクラスを作った記憶があるw

109 名前:デフォルトの名無しさん mailto:sage [2011/05/25(水) 20:05:42.48 ]
>>107 で?じゃないだろ?

Private data As Object
Set data = CreateObject("Scripting.Dictionary")

For i = 0 To l
 data(hogearray(i)) = data(hogearray(i)) + 1
 If data(hogearray(i)) = 1 Then
  '新しい配列に追加
 End If
Next i

110 名前:デフォルトの名無しさん mailto:sage [2011/05/25(水) 20:42:36.81 ]
何、この子?

111 名前:デフォルトの名無しさん mailto:sage [2011/05/25(水) 23:23:18.20 ]
ほうほう。それでそれで?

112 名前:デフォルトの名無しさん mailto:sage [2011/05/26(木) 01:59:56.98 ]
Private data As Object
Set data = CreateObject("Scripting.Dictionary")

For i = 0 To l
 data(hogearray(i)) = data(hogearray(i)) + 1
Next i

For Each k In data.Keys
 if k>1 then
  '処理
 end if
Next k

113 名前:デフォルトの名無しさん mailto:sage [2011/05/26(木) 02:06:32.87 ]
>>97
>>103を見るかぎりhogeArrayの中身は



114 名前:97 mailto:sage [2011/05/26(木) 08:41:35.84 ]
>>105
重複処理でuniqueします

115 名前:デフォルトの名無しさん mailto:sage [2011/05/26(木) 13:00:44.16 ]
VBで動的連想配列ってできるんですか?
ググっても見付かりません

116 名前:デフォルトの名無しさん mailto:sage [2011/05/26(木) 13:12:22.09 ]
ttp://7ujm.net/VB/VB6MAP.html

117 名前:デフォルトの名無しさん mailto:sage [2011/05/26(木) 15:41:14.52 ]
x^3-7*x+1の式でニュートンラフソン法を用い、初期解と繰り返しの回数を入力したら
近似解が求められるプログラミングを作りたいんですが、どう作ればよいですか?

もしスレチでしたらすみません

118 名前:デフォルトの名無しさん mailto:sage [2011/05/26(木) 20:51:24.73 ]
>>117
hibari.2ch.net/test/read.cgi/tech/1276873238/

119 名前:デフォルトの名無しさん mailto:sage [2011/05/28(土) 15:26:54.34 ]
VB6でマルチスレッド作るの無理だよね・・?

120 名前:デフォルトの名無しさん mailto:sage [2011/05/28(土) 15:47:14.47 ]
複数プロセス起動すれば良い

121 名前:デフォルトの名無しさん mailto:sage [2011/05/28(土) 18:11:35.77 ]
>>119
実用的じゃないけど、可能だよ。

122 名前:デフォルトの名無しさん mailto:sage [2011/05/28(土) 18:50:02.37 ]
訂正

可能だけど、実用的じゃないよ。

123 名前:デフォルトの名無しさん mailto:sage [2011/05/28(土) 19:11:31.96 ]
>>122
ちょwww
訂正って、それじゃ意味変わってないだろ。

訂正するなら「不可能だけど、実用的だよ」か
「可能だし、実用的だよ」のどちらかだろwww



124 名前:デフォルトの名無しさん mailto:sage [2011/05/28(土) 22:00:55.94 ]
A = 実用的
B = 可能


元の文章は

not A and B


訂正するなら

not A and not B

A and B

A and not B


もっとも日本語として強調したい部分というのは後にもってくるという
のもあるので、

not A and B



B and not A

と言い換えるのも無い事は無いか。

125 名前:デフォルトの名無しさん mailto:sage [2011/05/28(土) 22:17:24.05 ]
>>123
「表現」を「訂正」してるだけだろ。

まあ、いちいち訂正するほどのコトとは思えないけど。

126 名前:デフォルトの名無しさん mailto:sage [2011/05/29(日) 01:46:44.64 ]
もっと賢いやりかたったらおせーて

Public Function ToStringB__v2(v As Variant) As String
Const PREFIX$ = " KMGTPEZY"
Dim s$, p#, n&, i&: p = CDbl(v): n = 1
For i = 2 To Len(PREFIX)
If p >= 1000 Then p = p / 1000: n = n + 1 Else Exit For
Next i
s = Format(p, IIf(p >= 100, "0", IIf(p >= 10, "0.0", "0.00")))
ToStringB__v2 = s & " " & IIf(n > 1, Mid(PREFIX, n, 1), "") & "B"
End Function

Public Function ToStringIB__v2(v As Variant) As String
Const PREFIX$ = " KMGTPEZY"
Dim s$, p#, n&, i&: p = CDbl(v): n = 1
For i = 2 To Len(PREFIX)
If p >= 1024 Then p = p / 1024: n = n + 1 Else Exit For
Next i
s = Format(p, IIf(p >= 100, "0", IIf(p >= 10, "0.0", "0.00")))
ToStringIB__v2 = s & " " & IIf(n > 1, Mid(PREFIX, n, 1), "") & "iB"
End Function

127 名前:デフォルトの名無しさん mailto:sage [2011/05/29(日) 01:53:17.35 ]
簡単なエラートラップなら
Cdbl(v)する前に
If Not IsNumeric(v) Then Exit Function
を入れる

128 名前:デフォルトの名無しさん mailto:sage [2011/05/29(日) 01:59:09.34 ]
On Error Goto ErrorLabel
とかして
End Functionの手前にErrorLabel:って入れればOK

129 名前:デフォルトの名無しさん mailto:sage [2011/05/29(日) 09:10:26.34 ]
>>126
n = Int(Log(p)/Log(1000#)): p = p / (1000# ^ n)

# 元のプログラムと n の値が 1 違うので注意 (0 ベースになる)
# v = 0 の時に Log() がエラーになるので、そのケースがあるなら事前に場合分けが必要

130 名前:デフォルトの名無しさん mailto:sage [2011/05/30(月) 03:20:52.74 ]
なるほど
勉強になります
ありがとうございました

131 名前:デフォルトの名無しさん mailto:sage [2011/05/31(火) 15:32:01.70 ]
ActiveX DLLでCOM作ってるんだけど、ADOのRecordSetやFieldが持ってる
連想配列みたいにアクセスするインターフェースってどうやって作るん?

132 名前:131 mailto:sage [2011/05/31(火) 16:27:12.11 ]
プロシージャIDを0にすると既定になって、省略可能になったわ。

133 名前:デフォルトの名無しさん mailto:sage [2011/05/31(火) 17:00:57.81 ]
?



134 名前:デフォルトの名無しさん mailto:sage [2011/06/01(水) 12:34:59.02 ]
VB4なんですがWIN87EM.DLLで一般保護違反が出るのですが、
なかなか再現しません。このエラーを故意に起こすには、どのようにコーディングすればいいですか?
OSはNT4です。

135 名前:デフォルトの名無しさん mailto:sage [2011/06/02(木) 21:10:23.48 ]
すいません、質問させてください。

今下記のような感じでテキストファイルを読み込んで
excelに出力するものを作っています。
Array1と10に降順でソートを掛けたいと思っています。

ですが、どう記述するのかわかりませんでした・・・・
どなたかお力お貸しください。

136 名前:デフォルトの名無しさん mailto:sage [2011/06/02(木) 21:12:42.14 ]
こんな短期間にたくさん質問くるということは
どこかの大学バカ教授が授業でVB6で課題でも出したのか?

137 名前:135 mailto:sage [2011/06/02(木) 22:14:17.50 ]
すません、こんなの使ってます。

.Workbooks.OpenText _
FileName:=strFileNm, _
StartRow:=1, _
DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=False, _
Tab:=True, _
Semicolon:=False, _
Comma:=True, _
Space:=False, _
Other:=False, _
FieldInfo:=Array( _
Array(1, 2), Array(2, 2), Array(3, 2), Array(4, 2), Array(5, 2))〜

138 名前:デフォルトの名無しさん mailto:sage [2011/06/03(金) 00:35:50.94 ]
VB6.0で作ったソフトですがディスプレイをブラウン管(1024,768)から液晶(1920,1080)に替えたら
ソフトが動かなくなってしまいました。なぜ?
ブラウン管に戻すと動きます。

139 名前:デフォルトの名無しさん mailto:sage [2011/06/03(金) 01:10:39.61 ]
ソース出せや

140 名前:デフォルトの名無しさん [2011/06/03(金) 02:17:22.81 ]
VBで作ったアプリって
モニタのど真ん中に可視な属性を持ってるのに大きさがないという
ウインドウというかプロセスがあるね
キャプションで探したウインドウがGetWindowRectでサイズが0でずっと悩んじゃったよ
まるで民主党の朝鮮人たちに騙された気分だよ

141 名前:デフォルトの名無しさん [2011/06/03(金) 02:27:53.82 ]
>>138
あー、それ>>140と関係してるかもね
プロセス列挙してウンドウを探すときにLeftが512だったら弾く、とかやってると
モニタサイズが変わったら弾けなくなる
LeftじゃなくてWidthが0だったら弾くようにすればおk

142 名前:福盛俊明 [2011/06/03(金) 09:09:29.66 ]
23 名前:福盛俊明 :2011/06/02(木) 23:51:15.53
俺はDarkBASICの天才♪”
俺に答えられない質問はない

質問はこちらへ
www.geocities.jp/courant_de_console/main_street/index.html

アハアハ〜♪”

143 名前:デフォルトの名無しさん mailto:sage [2011/06/03(金) 18:43:25.43 ]
>>137
エクセルを開いてから、オートフィルタで手作業でソート



144 名前:デフォルトの名無しさん mailto:sage [2011/06/05(日) 20:08:58.70 ]
VBSで質問です
5分後にシャットダウンするプログラムを作ってます。

MsgBox "5分後にシャットダウンします。"
WScript.Sleep(300000)
'ここにシャットダウンの処理

これで一応シャットダウンできますが、終了一分前にメッセージを出そうとして下記のように変えると、
「1分後に(ry」のメッセージボックスのOKを押すまで処理が止まってしまうので、正確な5分になりません。

MsgBox "5分後にシャットダウンします。"
WScript.Sleep(240000)
MsgBox "1分後にシャットダウンします。"
WScript.Sleep(60000)
'ここにシャットダウンの処理

メッセージボックス出しつつ処理を止めない方法ってありますか?
同じことができれば代用法でもなんでも構いません

145 名前:デフォルトの名無しさん mailto:sage [2011/06/05(日) 20:24:31.18 ]
>>144
メッセージボックスやモーダルのフォームではなく、
モードレスのフォームを出せばいい。

146 名前:デフォルトの名無しさん mailto:sage [2011/06/05(日) 20:52:18.41 ]
>>145
レスどーも
でも色々調べてたら自己解決してしまった(・_・;)
コマンドラインで
shutdown -s -t 300
って書くと自動で2分前に警告だしてくれたらからこっち使います

147 名前:デフォルトの名無しさん mailto:sage [2011/06/06(月) 18:48:24.52 ]
>>146
2分前?

148 名前:デフォルトの名無しさん mailto:sage [2011/06/09(木) 22:01:47.41 ]
ここでいいんかな・・・?

imdate(inputManのやつ)で日付を取ってそれに+1日したいんだが
どうしたらいいんでしょうか。

Date + 1に出来たらいいかなと思ったんだが
imdate.Numberで数字で取得するからなんともいかんのかな?

149 名前:デフォルトの名無しさん mailto:sage [2011/06/09(木) 23:24:54.45 ]
VBのバージョンを言え

150 名前:デフォルトの名無しさん mailto:sage [2011/06/09(木) 23:25:57.17 ]
inputManだったらinputManのヘルプみればいいんじゃないか?

151 名前:デフォルトの名無しさん mailto:sage [2011/06/09(木) 23:27:30.00 ]
ジャンジャンバリバリ ジャンジャンバリバリ InputMan

152 名前:148 mailto:sage [2011/06/09(木) 23:35:56.07 ]
すいません6.0です。


153 名前:デフォルトの名無しさん [2011/06/11(土) 00:08:05.03 ]
偉そうにVBのバージョンを言え!
だって
VBのバージョンなんか関係ないのに
その1行しか言えないレベルの奴なんだ



154 名前:デフォルトの名無しさん mailto:sage [2011/06/11(土) 09:44:32.95 ]
4行も内容のないこと書いてるやつよりましじゃね?

155 名前:デフォルトの名無しさん mailto:sage [2011/06/11(土) 14:01:36.47 ]
で、バージョン聞いといてそれで終わり?
大抵関係ない情報聞くやつは
使いものにならないんだよねw

156 名前:デフォルトの名無しさん [2011/06/11(土) 17:48:24.37 ]
俺だったら「VBのバージョンは?」って優しく聞く
それを「VBのバージョンを言え」と字数多くしてまで乱暴に言うのは
まさに超初心者ならではの頭の悪さ
で、imdate.Numberが日付型ならDateAdd、文字ならCDateしてから

157 名前:デフォルトの名無しさん mailto:sage [2011/06/11(土) 19:38:30.77 ]
> 質問者は使用しているOS、VBのバージョン、サービスパックのバージョン、
> 「何がしたくて、どうしたけど、どう困っているのか」を明確に書きましょう。

というのがルールなんだから、質問内容がバージョン関係有る無しに関わらず
まずは郷に入っては郷に従えってだけのことだろ

158 名前:デフォルトの名無しさん mailto:sage [2011/06/11(土) 19:55:06.35 ]
もう黙れば?

159 名前:デフォルトの名無しさん mailto:sage [2011/06/11(土) 21:31:12.16 ]
.NETの質問の可能性もあるやろ

160 名前:デフォルトの名無しさん mailto:sage [2011/06/11(土) 23:13:06.76 ]
まあ、スレタイちゃんと読んでりゃ .NET はないはずだが、
バージョンも書かないような奴は >>1 もろくろく読んでな
いような奴だから、スレタイも読んでない可能性高いかもね。

て言うか、質問者は後出しながらバージョン答えてるし、
>>153 は一体なにと戦ってるんだ?

161 名前:デフォルトの名無しさん mailto:sage [2011/06/11(土) 23:17:29.22 ]
命令口調クン

162 名前:デフォルトの名無しさん mailto:sage [2011/06/11(土) 23:23:01.63 ]
ところで>>149は必要だったのかい?
いらないよね。赤っ恥かかされたからって、必死こいて戦うことないよね。

163 名前:デフォルトの名無しさん mailto:sage [2011/06/11(土) 23:31:29.55 ]
.NETの質問の可能性もあるやろ!(キリッ



164 名前:デフォルトの名無しさん mailto:sage [2011/06/12(日) 05:18:06.48 ]
>>162
顔真っ赤にして、そんなに悔しかったの?

165 名前:デフォルトの名無しさん mailto:sage [2011/06/12(日) 09:48:19.38 ]
>>164
敗北宣言乙

166 名前:デフォルトの名無しさん [2011/06/12(日) 09:49:17.07 ]
ウェブサイト作成協力して頂けませんか?
jpcity.lolipop.jp/phpBBq/viewtopic.php?f=29&t=957#p1595

167 名前:デフォルトの名無しさん mailto:sage [2011/06/12(日) 10:03:10.15 ]
>>165
一人相撲で勝利宣言?

168 名前:デフォルトの名無しさん mailto:sage [2011/06/12(日) 10:41:59.64 ]
 発 者 同         . 。_   ____           争
 生 同 .じ     .    /´ |  (ゝ___)          い
 .し 士 .レ      .__/'r-┴<ゝi,,ノ   ro、      は、
 .な で .ベ      ∠ゝ (ゝ.//`   ./`|  }⌒j     
 .い し .ル        } ⌒ /`ヽ、_∠l,ノ ・ヽ´
 .! ! か の       /  ´..:.} >、、___,  .r、 ソ、`\
             /   ..:.:.}   /   |∨ ` ̄
            /   ..:.:./    |   丶
           / _、 ..:.:.:.{    .{.:.:.   \
          {   ..:Y  .ゝ、   {.:.:.:.:.    ヽ
          |、  ..:/ 丿 .:〉   >.- ⌒  .  ヽ
          / {. ..:./ ソ ..:./  .(    ..:.:.:`  ..:}
         ./..:.:}.:.:./ ヘ、 ..:./   .\ ..:.:r_,ノ、.:.:}
        ./..:.:/|.:/   {.:./     X.:.:}.}   X X
        /..:.:/ .}.:|    }:/       .Y丶ヽ  Y.:Y
  . __/.:/ { }  《.〈、     _,,__>.:》丶   Y.:\
  /.:.:.:.:.::/   !.:.:ゝ  ゝ.:. ̄ヾ ´:.:.:.:.:.:.:.:.:ヾゝ   \.: ̄>

169 名前:デフォルトの名無しさん mailto:sage [2011/06/12(日) 10:46:29.27 ]
いや争ってる (と思ってる) のは、1人だから (w

170 名前:デフォルトの名無しさん mailto:sage [2011/06/12(日) 10:52:23.61 ]
争いにもなってないよな
まったく関係のないバージョンの話なんて聞くような馬鹿だしwww

171 名前:デフォルトの名無しさん mailto:sage [2011/06/12(日) 11:02:12.26 ]
ルールは守ろうねって言われたことが余程気に入らなかったようだな

反抗期なのかもしれないが、そんなんじゃ社会に出てから困ることになるぞ

172 名前:デフォルトの名無しさん mailto:sage [2011/06/12(日) 11:10:17.42 ]
なぜバージョンを聞いたんだい?ルールだからか?必要あったか?空気読まずに聞くほどに?
社会人としてのルールとして、そこの所を答えてくれないか?

173 名前:デフォルトの名無しさん mailto:sage [2011/06/12(日) 11:18:56.10 ]
       ____
     /⌒  ⌒\
   /( ●)  (●)\
  /::::::⌒(__人__)⌒::::: \
  |     |r┬-|     |
  \      `ー'´     / このスレ香ばしいNE!
   /` ‐- __ - ‐‐ ´ \
  / .l        _,,ヽ ___ 〉、
  | l       / ,' 3 `ヽーっ
  ヒト- _    l   ⊃ ⌒_つ
.   !__   ̄, ̄ `'ー-┬‐'''''"
   L  ̄7┘l-─┬┘
    ノ  ̄/  .! ̄ ヽ
  └‐ '´   ` -┘



174 名前:デフォルトの名無しさん mailto:sage [2011/06/12(日) 11:53:03.08 ]
>>172
なぜ理由を聞いてるんだい?ルールだからか?必要あったか?空気読まずに聞くほどに?

175 名前:デフォルトの名無しさん mailto:sage [2011/06/12(日) 12:06:46.28 ]
そこまで追い詰めるつもりはなかったんだが
鸚鵡返しするような状態になっちゃお終いですね
こんな人が社会に出てからとか言ってんだからお笑いです






[ 続きを読む ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<260KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef