VBSで便利なプログラムを作れスレ 2 (853レス)
VBSで便利なプログラムを作れスレ 2 http://mevius.5ch.net/test/read.cgi/tech/1539439008/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
レス栞
リロード規制
です。10分ほどで解除するので、
他のブラウザ
へ避難してください。
705: デフォルトの名無しさん [sage] 2019/08/07(水) 04:58:54.16 ID:+RwF1EPD Dim Tst(1) Tst(0) = ”a1,””b11,””””b12””””,””””b13””””””,””c1””” Tst(1) = ”a2,””b21,””””b22””””,””””b23””””””,””c2””” Dim Src, Var, Qot, Val, Cols(), Col For Each Src In Tst Qot = False ReDim Cols(0) Col = 0 For Each Var In Split(Src, ”,”) If Qot Then Val = Val & ”,” & Var Else Val = Var End If If (Len(Var) − Len(Replace(Var, ””””, ””))) Mod 2 Then Qot = Not Qot If Not Qot Then If Col > 0 Then ReDim Preserve Cols(Col) Cols(Col) = Replace(Replace(Replace(Replace(Chr(0) & Val & Chr(0), Chr(0) & ””””, ””), ”””” & Chr(0), ””), Chr(0), ””), ””””””, ””””) Col = Col + 1 End If Next MsgBox Join(Cols, Chr(9)) Next http://mevius.5ch.net/test/read.cgi/tech/1539439008/705
708: デフォルトの名無しさん [] 2019/08/07(水) 07:50:33.62 ID:VdbhIGNf >>703-707 全角半角切り替えなんてエディタの一操作でできる事なのに スペースはインデントのみ全角とかありえないことやってんな IDと時間帯を変えたピッコロ ◆YAZTByPXwc6=山中俊次の自演乙 http://mevius.5ch.net/test/read.cgi/tech/1539439008/708
714: ピッコロ ◆YAZTByPXwc6o [] 2019/08/08(木) 02:00:46.99 ID:m7RL5FrQ >>705 ありがとうございます! xmlは難しいって聞きます、解析してるのすごいです http://mevius.5ch.net/test/read.cgi/tech/1539439008/714
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.029s