VBSで便利なプログラムを作れスレ 2 (853レス)
前次1-
抽出解除 レス栞

リロード規制です。10分ほどで解除するので、他のブラウザへ避難してください。
30
(9): 2018/10/15(月)15:31 ID:PMSd/DPm(1)調 AAS
>>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
(2): 2018/10/15(月)22:06 ID:PZUnDWuI(2/3)調 AAS
>>30
ありがとうございます
オーバーフローしますが基本的な考えは良いと言って良いでしょう!
34
(2): 2018/10/15(月)22:12 ID:eoT6x2TR(1)調 AAS
>>30>>32
                      ______
______________∧______ ∧_______________| ̄|‖α‖|
回■回■回■回■回■回■回 《α〕大小耳飯店〔α》 回■回■回■回■回■回■回■| ̄|  ̄ ̄ |
 ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄∨ ̄ ̄ ̄ ̄ ̄ ̄ ∨ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄|    ̄ ̄ ̄
.                ┌───┐  ̄ ̄ ̄ ̄ ̄ ̄                        .|
 ┏━┳━━┓      │は  ピ│ .| ̄ ̄ ̄| ̄ ̄ ̄|     ┏┳━━━┓┏━━━┳┓  |
 ┃┏┻┓  ┃      │じ  ラ │ .|      |      |    ┃┣━┓┏┫┃  ┏━┫┃  |
 ┃┃α┃┏┫      │め フ │ .|      |      |    ┃┃  ┣┛┃┣━┫α┃┃  |
 ┃┣━┻┻┫      │ま が.│ .|回回回|回回回|.   .┃┗┳┻━┫┃  ┗━╋┫  |
 ┗┻━━━┛      │し  自│ .|    []|[]    |    ┗━┻━━┛┗━━━┻┛  |
                   │た 演.│ .|回回回|回回回|                              |
                   └───'  .|      |      |                       |
                       |      |      |                      _|
 ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄           ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
39
(1): 2018/10/18(木)22:55 ID:O/mKNN53(2/2)調 AAS
見よ>>38の恥ずかしい自演>>30>>32
66
(1): 2018/10/19(金)20:34 ID:qnu/MyV1(8/31)調 AAS
>>62>>63>>64>>65
意味もなくID変えて自演もまともにできないのな
自演といえば↓

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
ありがとうございます
オーバーフローしますが基本的な考えは良いと言って良いでしょう!
76
(1): 2018/10/19(金)21:09 ID:qnu/MyV1(13/31)調 AAS
>>74

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
ありがとうございます
オーバーフローしますが基本的な考えは良いと言って良いでしょう!
159: 2018/10/28(日)21:23 ID:W0ffeEpC(4/11)調 AAS
>>157
なんだよこれww

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
ありがとうございます
オーバーフローしますが基本的な考えは良いと言って良いでしょう!
585
(1): 2019/07/27(土)11:55 ID:kDH14mzr(1)調 AAS
>>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
ありがとうございます
オーバーフローしますが基本的な考えは良いと言って良いでしょう!
702: 2019/08/05(月)23:50 ID:lSamHiWf(1)調 AAS
>>699-701
白々しいな、知ってて出てきてんだろ?ちゃんと宣伝してやるからそう急くな

135 名前:名無しさん@お腹いっぱい。[] 投稿日:2019/08/05(月) 23:13:09.88 ID:IFpy1Duu [2/2]
>>134
自演で出題、自演で回答、自演で評価と
クイズスレと同じ自演をやってのける山中俊次wwwww
しかも動かないゴミコードwwwww

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
ありがとうございます
オーバーフローしますが基本的な考えは良いと言って良いでしょう!
801: 2019/08/20(火)00:53 ID:U/FgYG/8(1/2)調 AAS
>>799-800
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
ありがとうございます
オーバーフローしますが基本的な考えは良いと言って良いでしょう!
前次1-
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル

ぬこの手 ぬこTOP 0.041s