VBSで便利なプログラムを作れスレ 2

1デフォルトの名無しさん
垢版 |
2018/10/13(土) 22:56:48.61ID:X8llOrQa
素人丸出しお粗末で遅くてもいいので
いますぐ使えるちょっぴり便利プログラムを作れ
(例○○を自動処理してくれるプログラム)

前スレ
VBSで便利なプログラムを作れスレ
https://mevius.5ch.net/test/read.cgi/tech/1170492587/
490デフォルトの名無しさん
垢版 |
2019/05/27(月) 22:02:09.02ID:vLXldhYu
>>489
お前のソートの実装などゴミの役にも立たないという話をしているんだよ
491ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 22:29:31.55ID:z2ROiAa+
>>490
ではピッコロ以外にソートを実装できる人がいるとでも?
492ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 22:30:19.85ID:z2ROiAa+
君がピッコロよりも優れたソートを実装できるとでも?
じゃあやってみせてもらいましょうか
2019/05/27(月) 22:53:54.69ID:boP8VaJY
いつからここは痴呆老人がコテで訳の分らんことを語る場になった?

時代を先取りしすぎwwww
494デフォルトの名無しさん
垢版 |
2019/05/27(月) 23:20:51.01ID:BPpHNbqp
>>491
自意識過剰
お前なんか名前を出したところで叩かれもしない存在だから
495ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 23:21:46.88ID:z2ROiAa+
>>494
何いってんだお前
496デフォルトの名無しさん
垢版 |
2019/05/27(月) 23:23:21.77ID:BPpHNbqp
>>495
ゴミだって言ってるんだよ
497デフォルトの名無しさん
垢版 |
2019/05/27(月) 23:25:16.96ID:BPpHNbqp
唯一の味方ルビーおじさんのアドバイスさえガン無視なんだからどうしようもないな
498ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 23:35:25.70ID:z2ROiAa+
>>496
まさかピッコロのことをゴミだと言ってるんじゃないだろうな?

>>497
そうやって他人の名前を使って人の悪口いうのやめたが良いと思うの
499デフォルトの名無しさん
垢版 |
2019/05/27(月) 23:37:18.37ID:BPpHNbqp
>>498
ゴミのくせにゴミの自覚がないのかよ
500ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 23:37:51.68ID:z2ROiAa+
どうやら人格的にはピッコロがこのスレで一番のようだな
人格と気品と知性を兼ね備えた大人の女、それがピッコロ
501ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 23:38:37.56ID:z2ROiAa+
>>499
他人の悪口言っても自分が良くなるわけじゃありませんよ
汚い言葉を吐いた分自分が汚れていきます
502デフォルトの名無しさん
垢版 |
2019/05/27(月) 23:40:12.25ID:BPpHNbqp
>>500
他のスレじゃコテを名乗れないゴミじゃねえか
まあその辺の自覚があるだけまだましか
503ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 23:41:37.19ID:z2ROiAa+
これピッコロ
https://spring-js.com/wp-content/uploads/2016/09/yell-kuroyanagi.jpg
504ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 23:42:57.04ID:z2ROiAa+
他人の悪口言っても自分が良くなるわけじゃありませんよ
505デフォルトの名無しさん
垢版 |
2019/05/27(月) 23:43:54.96ID:BPpHNbqp
いや違うか
名無しではただのスレ荒らしだもんな


935 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 12:23:14.18 ID:99nnd/tf [1/3]
>>934
うるせぇ死ね

947 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 15:51:11.97 ID:99nnd/tf [2/3]
問題: おっぱいをなるべく小さくせよ。

964 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 20:48:13.95 ID:99nnd/tf [3/3]
顔射は普通に使う単語ですか?
506ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 23:45:18.50ID:z2ROiAa+
>>505
それピッコロじゃないよ
君友だちがピッコロしかいないから
いつでもどんなときでもピッコロのこと思い浮かべちゃうんだろうけど
ごめんそれピッコロじゃない
507ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 23:46:11.89ID:z2ROiAa+
なんかごめん・・・
508ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 23:48:32.26ID:z2ROiAa+
ピッコロ
https://d2dcan0armyq93.cloudfront.net/photo/odai/600/c1be53140d59ff859b17d34d28fc9fff_600.jpg
509デフォルトの名無しさん
垢版 |
2019/05/27(月) 23:50:02.90ID:BPpHNbqp
しかも


>935 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 12:23:14.18 ID:99nnd/tf [1/3]
>>>934
>うるせぇ死ね


>>934はルビーおじさんの書き込みじゃねえか
こいつ唯一の見方さえ名無しで難癖付けるキチガイなんだな



>934 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 12:14:50.20 ID:8VLhbVxR
>>>920
>は、ラ>ンク付けの問題だろ
>
>入力データ
>-6 3 9 5 3 -7
>出力・ランク
>2 3 5 4 3 1
>
>入力データの最も小さい数字を、ランク1 にして、
>数字が大きくなるほど、ランクも大きくしていく
>
>同値の場合は、同じランクにして、次のランクも間隔を空けない。
>ランク3 が2つあっても、次は、ランク4
>
>つまり、ランクが欠けることはない!
510デフォルトの名無しさん
垢版 |
2019/05/27(月) 23:50:54.78ID:BPpHNbqp
>>506
お前ほんと他人を舐めすぎ
511ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 23:54:03.16ID:z2ROiAa+
>>509
>>510
それピッコロじゃないよマジで
君は友だちが少ないうえに思い込みが激しいな
友だちが少ないから思い込みが激しいのか?

いずれにしろピッコロじゃないので
名誉毀損です、謝罪してもらえますか?
鈴木雅之に
512デフォルトの名無しさん
垢版 |
2019/05/27(月) 23:54:43.73ID:BPpHNbqp
>>511
うるせぇ死ね
513ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 23:56:21.56ID:z2ROiAa+
もしそれがピッコロだったら叩けるという意識が
君の認識を狂わせてしまったのかもわからんね

ピッコロを叩こうとする君のその強い思いが
君の認知を歪め間違った道に君を歩ませてしまったのかもしれない
そういう意味ではピッコロにもわずかな責任はまったくないけれども
君が完全に悪いよね、結論君が悪い
514デフォルトの名無しさん
垢版 |
2019/05/27(月) 23:56:51.93ID:BPpHNbqp
>>513
いちいち言い訳してんじゃねえよ
死ね
515ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/27(月) 23:57:13.07ID:z2ROiAa+
>>512
人違いしたことを謝罪いただいて良いですか?
あと死ねって言ったこととゴミって言ったことも謝罪してください
鈴木雅之に
516デフォルトの名無しさん
垢版 |
2019/05/27(月) 23:58:37.13ID:BPpHNbqp
ルビーおじさんじゃないにしてもうるせぇ死ねはないだろ
このキチガイ、しばらく大人しくしてただけで全然変わってないのな
517ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 00:00:07.70ID:TJM+GGRg
>>514
間違ったのは君なんですよ
怒ってる振りして勢いで逃げようとしてますよね
そういうところ君らしいなって思いました
518ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 00:00:36.13ID:TJM+GGRg
512+1 :デフォルトの名無しさん [] :2019/05/27(月) 23:54:43.73 ID:BPpHNbqp (9/11)
>>511
うるせぇ死ね

516 :デフォルトの名無しさん [] :2019/05/27(月) 23:58:37.13 ID:BPpHNbqp (11/11)
ルビーおじさんじゃないにしてもうるせぇ死ねはないだろ
このキチガイ、しばらく大人しくしてただけで全然変わってないのな

?????
519デフォルトの名無しさん
垢版 |
2019/05/28(火) 00:02:20.99ID:kt5K/4/m
>>517
てめえが白を切ってるだけだろうが
数年前には取り巻きがいたから勘違いしてしまってこの様なんだよなwwwwwwwwwww
520デフォルトの名無しさん
垢版 |
2019/05/28(火) 00:03:31.68ID:kt5K/4/m
そろそろ我慢できなくなってきて連投スクリプト発動かな
521デフォルトの名無しさん
垢版 |
2019/05/28(火) 00:05:06.87ID:kt5K/4/m
934 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 12:14:50.20 ID:8VLhbVxR
>>920
は、ランク付けの問題だろ

入力データ
-6 3 9 5 3 -7
出力・ランク
2 3 5 4 3 1

入力データの最も小さい数字を、ランク1 にして、
数字が大きくなるほど、ランクも大きくしていく

同値の場合は、同じランクにして、次のランクも間隔を空けない。
ランク3 が2つあっても、次は、ランク4

つまり、ランクが欠けることはない!


935 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 12:23:14.18 ID:99nnd/tf [1/3]
>>934
うるせぇ死ね


947 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 15:51:11.97 ID:99nnd/tf [2/3]
問題: おっぱいをなるべく小さくせよ。


964 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 20:48:13.95 ID:99nnd/tf [3/3]
顔射は普通に使う単語ですか?
522ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 00:07:40.17ID:TJM+GGRg
>>519
本当にピッコロじゃないんだもん
どうしてそう思い込んでしまったのか
君の思い込みを解くにはどうすればよいのか

世の中には1億人の日本語話者がいるんで
ピッコロみたいなこと言う人もいるよ

ピッコロは下品なこと言わないからピッコロとしては
まことに不本意なんだけどすくなくとも君はピッコロっぽいと
思ったんでしょ? ピッコロじゃないけど

世の中は君が思ってるより広いし君が思ってるより多くの人がいるよ
もっと世の中を知りなさい、人のことをもっと知りなさい
ピッコロの元から巣立ってくれるのがピッコロの望みです
523ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 00:08:19.78ID:TJM+GGRg
>>521
思い込みコピペやめなよみっともないよ
524デフォルトの名無しさん
垢版 |
2019/05/28(火) 00:09:20.89ID:kt5K/4/m
>>522-523
934 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 12:14:50.20 ID:8VLhbVxR
>>920
は、ランク付けの問題だろ

入力データ
-6 3 9 5 3 -7
出力・ランク
2 3 5 4 3 1

入力データの最も小さい数字を、ランク1 にして、
数字が大きくなるほど、ランクも大きくしていく

同値の場合は、同じランクにして、次のランクも間隔を空けない。
ランク3 が2つあっても、次は、ランク4

つまり、ランクが欠けることはない!


935 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 12:23:14.18 ID:99nnd/tf [1/3]
>>934
うるせぇ死ね


947 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 15:51:11.97 ID:99nnd/tf [2/3]
問題: おっぱいをなるべく小さくせよ。


964 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 20:48:13.95 ID:99nnd/tf [3/3]
顔射は普通に使う単語ですか?
525ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 00:10:18.04ID:TJM+GGRg
嘘を100回言っても真実にはならないよ
引き際を覚えた方が良いかと
526デフォルトの名無しさん
垢版 |
2019/05/28(火) 00:10:48.82ID:kt5K/4/m
>>525
934 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 12:14:50.20 ID:8VLhbVxR
>>920
は、ランク付けの問題だろ

入力データ
-6 3 9 5 3 -7
出力・ランク
2 3 5 4 3 1

入力データの最も小さい数字を、ランク1 にして、
数字が大きくなるほど、ランクも大きくしていく

同値の場合は、同じランクにして、次のランクも間隔を空けない。
ランク3 が2つあっても、次は、ランク4

つまり、ランクが欠けることはない!


935 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 12:23:14.18 ID:99nnd/tf [1/3]
>>934
うるせぇ死ね


947 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 15:51:11.97 ID:99nnd/tf [2/3]
問題: おっぱいをなるべく小さくせよ。


964 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 20:48:13.95 ID:99nnd/tf [3/3]
顔射は普通に使う単語ですか?
2019/05/28(火) 09:23:07.46ID:tpS8MDSU
「死ね」とか、あちこちのスレに、荒らしが書き込んでる。
多くのスレも立ててる

くだすれPython(超初心者用) その43【Ruby禁止】 (404)

Ruby, jQuery, lodash, ライブラリの話は禁止など、
多くのスレで、勝手にテンプレを改変し、自分に有利な禁止事項を付け加えてる

漏れらは、何とか、スレを正常に戻そうと、
荒らしの立てたスレを使わないように誘導してきた

Python スレの「工学部」というコテハンも、多くのスレを荒らしてた

自演も多い。
書き込んでから30分後に、自分のレスに賛同する、書き込みをよくする
528480
垢版 |
2019/05/28(火) 12:58:21.12ID:tpS8MDSU
ソートは、PowerShell, C# など、.net でも呼び出して、ソートする方が良いかも
2019/05/28(火) 14:16:46.11ID:8P1bQTIM
>>528
ソートするぐらいで別言語呼び出すの?
動きゃ何でもOKか?

そもそもこのお題、VBSのスキルとは関係無いと思うのは俺だけか?
上手いアルゴリズムを考える能力とVBSは関係ないと思うんで、このお題をやってみようという気にあまりならないんだよ。
530ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 20:01:04.91ID:TJM+GGRg
>>528
ソートは任せて!ピッコロバブルソートの達人だから
ピッコロソートと呼んでも良いくらい

ソートしたあとはどうすれば良いですか?
531デフォルトの名無しさん
垢版 |
2019/05/28(火) 20:06:55.14ID:m2tGCw8X
>>530
名無しではルビーおじさんにも噛みつくキチガイ乙

934 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 12:14:50.20 ID:8VLhbVxR
>>920
は、ランク付けの問題だろ

入力データ
-6 3 9 5 3 -7
出力・ランク
2 3 5 4 3 1

入力データの最も小さい数字を、ランク1 にして、
数字が大きくなるほど、ランクも大きくしていく

同値の場合は、同じランクにして、次のランクも間隔を空けない。
ランク3 が2つあっても、次は、ランク4

つまり、ランクが欠けることはない!


935 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 12:23:14.18 ID:99nnd/tf [1/3]
>>934
うるせぇ死ね


947 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 15:51:11.97 ID:99nnd/tf [2/3]
問題: おっぱいをなるべく小さくせよ。


964 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 20:48:13.95 ID:99nnd/tf [3/3]
顔射は普通に使う単語ですか?
532デフォルトの名無しさん
垢版 |
2019/05/28(火) 20:29:58.25ID:C7xxE9sL
辞書で重複要素の削除はどうやるの?
533ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 22:38:45.74ID:TJM+GGRg
進捗ですソートできました

Option Explicit

Dim a
a = Array(-6,3,9,5,3,-7)
Sort a
WScript.Echo Join(a, ", ")

Sub Sort(a)
  Sort_ a, LBound(a), UBound(a)
End Sub

Sub Sort_(a, l, u)
  If l >= u Then Exit Sub
  Sort__ a, l, u
  Sort_ a, l + 1, u
End Sub

Sub Sort__(a, l, u)
  If l >= u Then Exit Sub
  If a(u - 1) > a(u) Then Swap a(u - 1), a(u)
  Sort__ a, l, u - 1
End Sub

Sub Swap(a, b)
  Dim c
  c = a
  a = b
  b = c
End Sub
2019/05/28(火) 22:46:04.67ID:vNl8ufTP
>>533
ブラボー!!下手くそ!!
わざと下手くそに書けと言われても俺にはここまでは無理だわ(称賛)
2019/05/28(火) 22:48:38.84ID:vNl8ufTP
プログラミング始めたての俺が見ても、アルゴリズムとは別のところで「他人が読むこと考えてないだろ」と言うと思うわ。
Youtubeのネタ動画より笑えた。ありがとう。
536デフォルトの名無しさん
垢版 |
2019/05/28(火) 22:53:40.44ID:zzZz5E2H
>>533

935 名前:デフォルトの名無しさん[sage] 投稿日:2019/05/17(金) 12:23:14.18 ID:99nnd/tf [1/3]
>>934
うるせぇ死ね
537ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 23:05:43.90ID:TJM+GGRg
>>534
不愉快なんだが

>>535
なにわろとんねん!(激おこ
538ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 23:06:51.40ID:TJM+GGRg
じゃあ>>534さんはピッコロより優れたソートを書けるんですか?
539ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 23:09:15.68ID:TJM+GGRg
プログラム始めたての初心者の分際でピッコロ様の渾身のソートが下手くそなどとは言語道断
540ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 23:10:59.08ID:TJM+GGRg
上手でしょうが!!!
541ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 23:11:42.92ID:TJM+GGRg
>>536
おいそこの君ぃピッコロのソート良いですよね?
542ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/28(火) 23:13:02.74ID:TJM+GGRg
こんな流麗なソート書けるピッコロさんも良いですよね?
543デフォルトの名無しさん
垢版 |
2019/05/28(火) 23:39:33.46ID:zzZz5E2H
>>537-542
発狂してんじゃねえよきちがい
544デフォルトの名無しさん
垢版 |
2019/05/30(木) 04:54:54.31ID:RA0k57fp
最初、O(n^2)なら簡単にできると言っていたが
それはどういうやり方?
545狂乱のピッコロ ◆YAZTByPXwc6o
垢版 |
2019/05/30(木) 06:18:49.06ID:dCcyd6On
>>544
徹夜したら簡単でした
https://gist.github.com/piccolo-namek/87ea1688ae85534b7a415c92c9f8da2f
546デフォルトの名無しさん
垢版 |
2019/05/30(木) 07:26:21.61ID:fZrphV35
>>545
無職乙
547デフォルトの名無しさん
垢版 |
2019/05/30(木) 07:27:41.85ID:fZrphV35
https://gist.github.com/kingpilaf/
https://gist.github.com/sleeping-marple/
https://gist.github.com/MistyBloom/
https://gist.github.com/piccolo-namek/

        _,l;;;;;;;;;;;;;l,,_
      ,.r'´;:  八  '::..゙ヽ
      ,.'___ _立_ __;;ミ゙;、     フT
      l厄巳厄 i王i ,.巳厄巳l     夕 ヒ
   ,.-'l i,.:'  ヽ:.、 ;.:' ' ヽ |,.、  
   /{´iY´ヾーtッ-ヽ'' kーtr-,'´lri   _l_
   {_i,入::.. ` ̄ ̄,'i!ヽ;` ̄´ ゙::.}rリ    i,_
   ヽ_ノiヾ ;:. _ i': ll!:,ィ ._ .: j,ノ
  ッジ::;;| ,r'´;;:> ̄弋´;;::ヽ;r1:゙'イィ   ┬‐宀
  弍::::::::l i':;r'´ ,.-ーー-、.ヾ;:;i. |:::::::ス   ノ□隹
   彡;:::l l::l  '  ---;:, ゙ l::l |::;;ャ`   、
   ,r',广ヽl::l ::. .:   ゙:.  l:lノ^i`、   三刃
  ,イ(:::j   i::iヽ  :.    .: /l:l'" l:ヽヽ  口心
 |;:;.\\ l::l  ', :;:::..::. /  l:l,r''/;::;;|
2019/05/30(木) 08:29:18.53ID:bb+aWtrz
>>480
に、リンクを貼っておいた

プログラミングのお題スレ Part14
https://mevius.5ch.net/test/read.cgi/tech/1558168409/85-89

Ruby だけど、漏れは、85 です。
他の人が、89 にも書いてる

>>532
Ruby なら、単に同じキーに代入すれば、上書きされるだけだから、これで重複排除できる

h = { }
h[1] = 7
h[1] = 8 # 8 になる
549デフォルトの名無しさん
垢版 |
2019/05/31(金) 09:56:54.18ID:9KbqWk0a
n=6
a=Array(-6,3,9,5,3,-7)
b=a
Set c=CreateObject("Scripting.Dictionary"
sost b
For Each v in b
If Not c.Exists(v) Then c.add v,c.count+1
Next
For i=1 to n
b(i)=c(a(i))
Next
550デフォルトの名無しさん
垢版 |
2019/05/31(金) 10:04:05.57ID:9KbqWk0a
5行目間違えた
sort b
551デフォルトの名無しさん
垢版 |
2019/05/31(金) 17:48:52.29ID:9KbqWk0a
順位が飛ぶ場合
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 v,i
Next
For i=1 To n
b(i)=c(a(i))
Next
552デフォルトの名無しさん
垢版 |
2019/05/31(金) 18:00:30.35ID:9KbqWk0a
すいません >>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
553デフォルトの名無しさん
垢版 |
2019/05/31(金) 19:44:35.89ID:wgRNs4gC
>>549-552
自演乙
554535
垢版 |
2019/05/31(金) 23:52:03.87ID:dHyjcjUi
>>539
俺がプログラミング始めたての頃ってのは9歳。
あの頃の俺が見ても下手くそだと言うと思う。

>>545
Cとかと勘違いしてたようだ。
VBScriptにはSort関数が無いんだってね。JScriptならあるそうだね。
が、アルゴリズム自体は新たに作る必要はない。出尽くしてるから。
おおよそクイックソートかコムソートで充分。

以上。
2019/06/01(土) 01:43:10.12ID:x2/++BK/
確か、VBScriptで関数ポインタを使えたよね?
あれ何なんだったっけ?
556デフォルトの名無しさん
垢版 |
2019/06/01(土) 10:43:47.94ID:/THuLu8v
なんで皆ソートするの?
他より大きかったら+1するだけじゃないの?
Option Explicit

  Dim arr1
  Dim arr2
  arr1 = Array(-6, 3, 9, 5, 3, -7)
  arr2 = RankArray(arr1, 1)
  WScript.Echo Join(arr2, ", ")

Function RankArray(arrSrc, k)
  Dim i
  Dim j
  Dim arrRet
  arrRet = Array(1, 1, 1, 1, 1, 1)
  For j = 1 To UBound(arrSrc)
    For i = 0 To j - 1
      If arrSrc(i) > arrSrc(j) Then
        arrRet(i) = arrRet(i) + 1
      ElseIf arrSrc(i) = arrSrc(j) Then
        arrRet(i) = arrRet(i) + k
        arrRet(j) = arrRet(j) + k
      Else
        arrRet(j) = arrRet(j) + 1
      End If
    Next
  Next
  RankArray = arrRet
End Function
557デフォルトの名無しさん
垢版 |
2019/06/01(土) 11:50:11.41ID:40Zd+DZB
>>556
自演乙
2019/06/01(土) 14:44:28.50ID:Pa7ukRs9
>>555
GetRef 関数
https://docs.microsoft.com/ja-jp/previous-versions/windows/scripting/cc410245(v%3dmsdn.10)

GetRef 関数を使用すると、VBScript のプロシージャ (Function または Sub) を、
DHTML (Dynamic HTML) ページ上で使用可能な任意のイベントに接続できます。
DHTML オブジェクト モデルは、各種のオブジェクトで使用できるイベントについての情報を提供します。

ほかのスクリプト言語とプログラミング言語では、GetRef 関数で提供される機能は関数ポインタと呼ばれています。
つまり、指定されたイベントが発生したときに実行されるプロシージャのアドレスを示すポインタということです。
559無職のピッコロ ◆YAZTByPXwc6o
垢版 |
2019/06/01(土) 17:37:44.49ID:UjnN23At
  ∧_∧
 (・∀・)/\
 ノ つ つ ● )
⊂、 ノ \/
  し′

/⌒\
\●/ ∧_∧ /⌒\
 ∩ (・∀・) \●/
 Y ̄‖y/‖ ̄`Φ
  Lノ/ニニ‖i ソ〉
 乂/ ノハ ヽ ̄
  `ー-ヽ__|
560デフォルトの名無しさん
垢版 |
2019/06/01(土) 18:44:59.99ID:kYwwFevT
>>559
自演乙
2019/06/09(日) 22:26:02.90ID:lYUI7I2B
>>558
普通には使えない。
お前死ねやコラ。
562デフォルトの名無しさん
垢版 |
2019/06/09(日) 22:35:45.73ID:iDDKTG4o
>>561
桃白白改めミスターポポ改めピラフ改めピッコロさん暴言はやめましょう
563デフォルトの名無しさん
垢版 |
2019/06/18(火) 06:19:45.67ID:3nOE2mBA
プログラム板にキチガイ降臨中!botに一晩も反応する異常さ
一般人(学校恩師)に殺害予告をしているのでスレ建て通報してください。
https://mevius.5ch.net/test/read.cgi/tech/1559872586/

142 名前:a4 ◆700L1Efzuv 投稿日:2019/06/18(火) 05:29:55 ID://qVkzO
>>141
名古屋の人な 俺ね、君の問題を大橋先生と混ぜないことにする。つまりね、
片桐孝洋のことをボコろうと思う。普通に顎の骨を折る。これくらいで警察来るか?
一般市民とかさ、普通にさ、俺らの秘密なんだけどさ、日本人なんて復活ねーから。
564ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/06/29(土) 01:12:06.47ID:6e7LZVGJ
それでは問題です
565デフォルトの名無しさん
垢版 |
2019/06/29(土) 18:07:15.24ID:R2mQEfYt
>>1
【経緯】

「オレ的ゲーム速報@刃」(通称Jin)というゲーム系の大手アフィカス5chまとめブログがある

Jinは偏向まとめや対立煽りなどを繰り返して5chの住民から非常に嫌われていた

5ch住民がTwitter社に虚偽の著作権侵害通報をしてJinの宣伝用Twitterアカウントを凍結させる嫌がらせを思い付く

Jinは5chのAA「やる夫」をブログのイメージキャラクターとして使用していた
http://livedoor.blogimg.jp/jin115/imgs/6/7/67e4a6a3.jpg

そこでまず5ch住民がゲーム会社カルチャーブレーンの公式wiki(偽物)を作成してそこにやる夫のAA画像をアップロード
http://www65.atwiki.jp/culturebraingame
http://img.atwikiimg.com/www65.atwiki.jp/culturebraingame/attach/1/2/Jingomi.png

次にカルチャーブレーン社長・田中幸男を名乗ってJinが自社の著作権を侵害しているのでアカウントを凍結するようにTwitter社に通報

Twitter社は偽物のカルチャーブレーン公式wikiに騙されてJinのアカウントを凍結

JinがTwitter社の規約をよく読まずに脊髄反射で実名と住所を明記してTwitter社に凍結異議申し立てをしてしまう

Twitter社の規約によってJinの異議申し立ての内容(実名と住所を含む)が通報者の田中幸男(偽物)に通知される

田中幸男(偽物)がこれを5chで公開してJinの実名と住所が無事けんま対象に
http://i.postimg.cc/C15CLDYF/jin.png
2019/07/22(月) 23:38:59.37ID:jXK2B8zb
Office も Access コンポーネントもインスコできない環境で CSV を処理したいのですが…。
どっかにコード落ちてませんか?
567デフォルトの名無しさん
垢版 |
2019/07/22(月) 23:46:57.46ID:X57aVkBE
>>1
【経緯】

「オレ的ゲーム速報@刃」(通称Jin)というゲーム系の大手アフィカス5chまとめブログがある

Jinは偏向まとめや対立煽りなどを繰り返して5chの住民から非常に嫌われていた

5ch住民がTwitter社に虚偽の著作権侵害通報をしてJinの宣伝用Twitterアカウントを凍結させる嫌がらせを思い付く

Jinは5chのAA「やる夫」をブログのイメージキャラクターとして使用していた
http://livedoor.blogimg.jp/jin115/imgs/6/7/67e4a6a3.jpg

そこでまず5ch住民がゲーム会社カルチャーブレーンの公式wiki(偽物)を作成してそこにやる夫のAA画像をアップロード
http://www65.atwiki.jp/culturebraingame
http://img.atwikiimg.com/www65.atwiki.jp/culturebraingame/attach/1/2/Jingomi.png

次にカルチャーブレーン社長・田中幸男を名乗ってJinが自社の著作権を侵害しているのでアカウントを凍結するようにTwitter社に通報

Twitter社は偽物のカルチャーブレーン公式wikiに騙されてJinのアカウントを凍結

JinがTwitter社の規約をよく読まずに脊髄反射で実名と住所を明記してTwitter社に凍結異議申し立てをしてしまう

Twitter社の規約によってJinの異議申し立ての内容(実名と住所を含む)が通報者の田中幸男(偽物)に通知される

田中幸男(偽物)がこれを5chで公開してJinの実名と住所が無事けんま対象に
http://i.postimg.cc/C15CLDYF/jin.png
568ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/23(火) 07:24:08.24ID:wzqbz6Qy
>>566
PowerShellは使えないん?
569ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/23(火) 07:32:50.72ID:wzqbz6Qy
OleDbのテキストドライバー使うかもしくはオートマトンをゴリゴリ実装するかってところだと思うんだけど
この辺試してみたらいんじゃないかな

WSHサンプル集 - Tips for us.
https://wiki.bit-hive.com/y10/pg/WSH%E3%82%B5%E3%83%B3%E3%83%97%E3%83%AB%E9%9B%86

VBScript - CSV ファイルを読み込む CsvReader クラス
http://blogs.wankuma.com/jeanne/archive/2007/04/20/72209.aspx

ダブルコーテーションあり文字列のSplit [VBScript]
http://blog.livedoor.jp/tea_cocoa_cake/archives/5356742.html
570デフォルトの名無しさん
垢版 |
2019/07/23(火) 08:01:19.28ID:K5uca85i
>>568,569
自演乙
571566
垢版 |
2019/07/25(木) 21:20:16.07ID:mCQlPBRI
>>568
今のところ PowerShell はいつ破壊的変更が起きても不思議じゃないので使いたくない。

>>569
1. なんでサンプルが JScript なんだ?
2. 方針としては良いと思うが、実際の実装がかなり下手。
3. 設計からしておかしい。テキストファイルから1行ずつ読んで渡す使い方ができない。何これ?
適当にググッて URL を貼っただけでしょ。

正解は理由付きで存在するけど教えない。
572ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/25(木) 22:33:52.91ID:c7M1tbqZ
(´・ω・`)・ω・`) キャー
/  つ⊂  \  怖いー
573デフォルトの名無しさん
垢版 |
2019/07/25(木) 23:00:46.87ID:/OzD6VVF
>>1
【経緯】

「オレ的ゲーム速報@刃」(通称Jin)というゲーム系の大手アフィカス5chまとめブログがある

Jinは偏向まとめや対立煽りなどを繰り返して5chの住民から非常に嫌われていた

5ch住民がTwitter社に虚偽の著作権侵害通報をしてJinの宣伝用Twitterアカウントを凍結させる嫌がらせを思い付く

Jinは5chのAA「やる夫」をブログのイメージキャラクターとして使用していた
http://livedoor.blogimg.jp/jin115/imgs/6/7/67e4a6a3.jpg

そこでまず5ch住民がゲーム会社カルチャーブレーンの公式wiki(偽物)を作成してそこにやる夫のAA画像をアップロード
http://www65.atwiki.jp/culturebraingame
http://img.atwikiimg.com/www65.atwiki.jp/culturebraingame/attach/1/2/Jingomi.png

次にカルチャーブレーン社長・田中幸男を名乗ってJinが自社の著作権を侵害しているのでアカウントを凍結するようにTwitter社に通報

Twitter社は偽物のカルチャーブレーン公式wikiに騙されてJinのアカウントを凍結

JinがTwitter社の規約をよく読まずに脊髄反射で実名と住所を明記してTwitter社に凍結異議申し立てをしてしまう

Twitter社の規約によってJinの異議申し立ての内容(実名と住所を含む)が通報者の田中幸男(偽物)に通知される

田中幸男(偽物)がこれを5chで公開してJinの実名と住所が無事けんま対象に
http://i.postimg.cc/C15CLDYF/jin.png
574ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/26(金) 20:28:07.05ID:nGdMwDcM
>>571
正解を
教えておくれ
ホトトギス
2019/07/26(金) 20:57:13.35ID:54Ib42km
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"]
576566
垢版 |
2019/07/26(金) 21:27:04.42ID:MAho0bHr
>>574
コードは要らんから、おまえさんの考えを示してみてよ?
俺は示した。

>>575
スレ違い。
Ruby に恨みはないが、場違いに Ruby を勧めてくる奴は脳みそのどっかがおかしい。
577ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/26(金) 21:43:21.81ID:nGdMwDcM
>>575
勉強になります!
578ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/26(金) 22:01:48.37ID:nGdMwDcM
>>576
君は正解を明かしておられない
ピッコロはそれを知りたい

ピッコロの考えは>>569に書いたとおりで
どれもすばらしい実装と言えます
579ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/26(金) 22:02:36.97ID:nGdMwDcM
ピッコロはあなたの正解コードを必要としています
580デフォルトの名無しさん
垢版 |
2019/07/26(金) 23:20:39.08ID:V7gi6MMr
>>575,577-579
自演乙

>>576
悪いんだけどあんまりエサを与えないでほしいかな
581ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/27(土) 11:31:11.48ID:6Xw13KxI
>>580
あなたのコードも必要としています
582ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/27(土) 11:31:39.01ID:6Xw13KxI
コードをピッコロに寄越すのです
583デフォルトの名無しさん
垢版 |
2019/07/27(土) 11:36:01.75ID:0O8SAkkD
>>581=582
       ::                .|ミ|
       ::                .|ミ|
        ::               .|ミ|           ::::::::
         :::::     ____ |ミ|          ::::
           :: ,. -'"´      `¨ー 、       ::
   ::        /   ,,.-'"      ヽ  ヽ、    ::
   ::     ,,.-'"_  r‐'"     ,,.-'"`     ヽ、 ::
   ::   /    ヾ (    _,,.-='==-、ヽ         ヽ、
   ::   i へ___ ヽゝ=-'"/    _,,>         ヽ 
   ::   ./ /  > ='''"  ̄ ̄ ̄               ヽ 
  ::   / .<_ ノ''"       ヽ               i
  ::   /    i   人_   ノ              .l
  ::  ,'     ' ,_,,ノエエエェェ了               /
    i       じエ='='='" ',              / ::
    ',       (___,,..----U             / ::
     ヽ、         __,,.. --------------i-'"  ::
      ヽ、_   __ -_'"--''"ニニニニニニニニヽ   ::
         `¨i三彡--''"´              ヽ  ::  
          /                      ヽ ::              ┼ヽ  -|r‐、. レ |
         /                     ヽ::            d⌒) ./| _ノ  __ノ
584ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/27(土) 11:39:32.27ID:6Xw13KxI
正解はよ
585デフォルトの名無しさん
垢版 |
2019/07/27(土) 11:55:17.46ID:kDH14mzr
>>584
オーバーフローさせないという条件を出しておきながら
それを満たさないゴミコードを自演で投下、自演で擁護してしまうポロリ◆YAZTByPXwc6o


8 名前:デフォルトの名無しさん[] 投稿日:2018/10/14(日) 01:39:32.42 ID:BqZmi47p [3/6]
数値を文字列に変換するとき
CStrを使用すると
999999999999999より大きな値は
指数表現となり近似値になります
2の52乗 - 1まで精確に文字列に変換するメソッドを作ってください

30 名前:デフォルトの名無しさん[] 投稿日:2018/10/15(月) 15:31:10.86 ID:PMSd/DPm
>>8
Function CStr2(n)
If n<0 Then
 CStr2="-"+CStr2(-n)
ElseIf n<10 Then
 CStr2=CStr(n)
Else
  CStr2=CStr2(n\10)+CStr(n Mod 10)
End If
End Function

32 名前:デフォルトの名無しさん[] 投稿日:2018/10/15(月) 22:06:01.34 ID:PZUnDWuI [2/3]
>>30
ありがとうございます
オーバーフローしますが基本的な考えは良いと言って良いでしょう!
586ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/27(土) 11:56:47.06ID:6Xw13KxI
>>585
ごめん今その話じゃないから
CSVの話だから(怒号
587ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/27(土) 11:57:24.32ID:6Xw13KxI
CSVじゃ!CSVのコードを差し出すのじゃ!!!
588デフォルトの名無しさん
垢版 |
2019/07/27(土) 12:00:06.51ID:QK2FMWR0
>>586-587
俺はそんな話はしていないんで
当然出題もゴミ


859 名前:デフォルトの名無しさん[] 投稿日:2019/07/20(土) 18:06:54.10 ID:k4+mr7b7 [1/2]
お題: できるだけ少ない回数で1から1000の数を判定しろ

入力: 775
出力 n==755

入力: 2,4, ...., 1000
出力 n%2

入力: 3,4,5,6, 10
出力 : n-3<=3 ||n==10
589ピッコロ ◆YAZTByPXwc6o
垢版 |
2019/07/27(土) 12:16:44.54ID:6Xw13KxI
>>588
それピッコロじゃありません!失礼です!
ピッコロと他人の区別もつかないんですか!?
CSVのコードで誠意を見せてください
590デフォルトの名無しさん
垢版 |
2019/07/27(土) 12:35:06.56ID:Tv/temEL
>>589
こんな恥ずかしい出題なんか認めたくないもんな
自分で回答もできない出題してばっかりで何がしたいんだか
レスを投稿する