VB 全角文字有無のチェック

Function NoMultiByte(value As string) As Boolean Dim LetterCount As Long Dim ByteCount As Long LetterCount = Len(value) ByteCount = LenB(StrConv(value,vbFromUnicode)) If LetterCount <> ByteCount Then NoMultiByte = False Else NoMultiByte = True End If End Function

Powershell 何行目からファイル内容取得

Get-Contentコマンドレットでファイル内容を取得することはできるが、
1行目はヘッダー行として捨てて、２行目からの内容を取得する場合はどうする？
Select-ObjectのSkipオプションを使って指定した数の項目をスキップすれば解決。
#1行目をスキップする
Get-Content $file | Select-Object -Skip 1

POWERSHELL 文字列エスケープ＆置換

置換文字列にドル記号（$）が入ると、-replace を普通に使ってうまく置換できなかった。

PS C:\doc\test> $STR1="My name is $[NAME]"
PS C:\doc\test> $STR2=$STR1 -replace "`$[NAME]","TOM"
PS C:\doc\test> $STR2
My name is $[NAME]

POWRSHELLのエスケープ符号(`)は効かない.か。。
  いろいろ検索してみると、[regex]::Escape　メッソドを使う方法を見つかった

PS C:\doc\test> $STR2=$STR1 -replace [regex]::Escape("$[NAME]"),"TOM" PS C:\doc\test> $STR2 My name is TOM

で[regex]::Escapeメッソドは何をしたのかを見てみると、

PS C:\doc\test> [regex]::Escape("$[NAME]")
\$\[NAME]