VBSで便利なプログラムを作れスレ 2 (853レス)
上下前次1-新
抽出解除 レス栞
リロード規制です。10分ほどで解除するので、他のブラウザへ避難してください。
65(1): 2018/10/19(金)19:47:28.35 ID:oP8cFEj6(4/26)調 AAS
ほらね
68(1): 2018/10/19(金)20:58:01.35 ID:qnu/MyV1(9/31)調 AAS
>>67
自演しかできないのかゴミ
106(1): 2018/10/19(金)21:17:16.35 ID:qnu/MyV1(28/31)調 AAS
______
______________∧______ ∧_______________| ̄|‖α‖|
回■回■回■回■回■回■回 《α〕大小耳飯店〔α》 回■回■回■回■回■回■回■| ̄|  ̄ ̄ |
 ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄∨ ̄ ̄ ̄ ̄ ̄ ̄ ∨ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄|  ̄ ̄ ̄
. ┌───┐  ̄ ̄ ̄ ̄ ̄ ̄ .|
┏━┳━━┓ │は ピ│ .| ̄ ̄ ̄| ̄ ̄ ̄| ┏┳━━━┓┏━━━┳┓ |
┃┏┻┓ ┃ │じ ラ │ .| | | ┃┣━┓┏┫┃ ┏━┫┃ |
┃┃α┃┏┫ │め フ │ .| | | ┃┃ ┣┛┃┣━┫α┃┃ |
┃┣━┻┻┫ │ま が.│ .|回回回|回回回|. .┃┗┳┻━┫┃ ┗━╋┫ |
┗┻━━━┛ │し 発│ .| []|[] | ┗━┻━━┛┗━━━┻┛ |
│た 狂.│ .|回回回|回回回| |
└───' .| | | |
| | | _|
 ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
313(2): 2019/01/07(月)20:18:28.35 ID:oPovn05w(1)調 AAS
>>312
ない
失せろ
330(1): さまよえる蟻人間 ◆T6xkBnTXz7B0 2019/02/19(火)23:56:31.35 ID:HRSrDneK(1)調 AAS
人間ごときに人機類の理想と理念はわかるまい。
388: 2019/03/16(土)21:47:08.35 ID:vjeczwgh(12/12)調 AAS
>>387
反論がなくなるよう意味不明なレスを繰り返してるんだろ?
ごちゃごちゃうるせえよ
399(1): さまよえる蟻人間 ◆T6xkBnTXz7B0 2019/03/18(月)08:30:10.35 ID:4V0ezuGu(1)調 AAS
>>398
いちいち絡めなくていいから。
416(1): ピッコロ ◆YAZTByPXwc6o 2019/05/16(木)19:43:25.35 ID:2k8Wv/07(1)調 AAS
>>414
あざーす!!
PDFを買いました!!!読んでみます!!!
420(1): 2019/05/17(金)22:18:49.35 ID:5uXz4WgO(2/6)調 AAS
>>419
間接参照でソートしてゴニョゴニョしてみてね系の問題。ただそれだけ。
クレクレ君に答えはやらねーよ。
467(2): 2019/05/19(日)02:52:35.35 ID:OTlGjTy8(2/2)調 AAS
class Array
def sort_by
self.map {|i| [yield(i), i] }.
sort {|a, b| a[0] <=> b[0] }.
map {|i| i[1]}
end
end
Ruby のsort_by は、[ブロック評価結果, データ]の配列をmap で作ってから、
ソートして、オリジナルデータのみを抜き出して、mapで配列にする
これは、シュウォーツ変換と言って、比較回数を減らす
552(1): 2019/05/31(金)18:00:30.35 ID:9KbqWk0a(4/4)調 AAS
すいません >>551はなしにしてください
順位が飛ぶ場合
n=6
a=Array(-6,3,9,5,3,-7)
b=a
Set c=CreateObject("Scripting.Dictionary"
sort b
For i=1 To n
If Not c.Exists(v) Then c.add b(i),i
Next
For i=1 To n
b(i)=c(a(i))
Next
575(4): 2019/07/26(金)20:57:13.35 ID:54Ib42km(1)調 AAS
Ruby なら、これで、改行・ダブルクォーテーション(b・c の間)も含められる。
ファイルから読み込んで、1行ずつ処理するには、CSV.foreach がある
require 'csv'
str = <<"EOT"
id,first name
1,"ab""c"
2,"xy\nz"
EOT
options = { :headers => true }
CSV.parse( str, options ).each do | row |
p [ row[ 'id' ], row[ 'first name' ] ]
end
出力
["1", "ab\"c"]
["2", "xy\nz"]
595: ピッコロ ◆YAZTByPXwc6o 2019/07/27(土)14:42:13.35 ID:6Xw13KxI(10/51)調 AAS
>>594
それピッコロじゃありません
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.042s