VBSで便利なプログラムを作れスレ 2 (853ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞
8(8): 2018/10/14(日)01:39 ID:BqZmi47p(3/6)調 AAS
数値を文字列に変換するとき
CStrを使用すると
999999999999999より大きな値は
指数表現となり近似値になります
2の52乗 - 1まで精確に文字列に変換するメソッドを作ってください
9: 2018/10/14(日)01:40 ID:BqZmi47p(4/6)調 AAS
>>8
訂正
> 2の52乗 - 1
2の53乗 - 1
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
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
なんだよこれｗｗ
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
自演で出題、自演で回答、自演で評価と
クイズスレと同じ自演をやってのける山中俊次ｗｗｗｗｗ
しかも動かないゴミコードｗｗｗｗｗ
↓
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