起動時にすごいでかい音が出て五月蝿くてしょうがなかった。。。
ググッてみると、若干小さく出来るようなのでしてみた。
「Advanced → IPMI → Blow-out Feature を Disabled」
にすると静かになる！！ … はずだった。。。
実際に変更して起動すると、なんと！常に轟音…
どゆことなの・・・と轟音PCを横目に見ながら、初期設定に戻したりしたけど駄目だった…
んで、行き着いたのが、コンセントを抜く！
これで、若干静かに起動出来ました。 （やったね！
設定を変えても轟音の人はコンセントを抜いてみてください、
幸せになれるかも！？
追伸：全面のUSB使うとキーボード類が動かなくなる…
よくJSONなどで使われてる
「u5143u6c17u3067u3059u304buff1fuff01」
こんな奴。
ニコ動のAPIでエラーで帰ってる奴にこれが使われてたので、頑張って調べた結果…
分からなかった！(´・ω・`)
なので、5zjさんに教えてもらいましたｗ
コード
'u3042(あ)からuを抜いた文字列を入れる Dim hoge As String = "3042" Dim intData As Integer = Convert.ToInt32(hoge, 16) Dim mozi As String = ChrW(intData)
終わり。
次は長い文字列から直してみる
作り方は簡単！文字列をuで区切ればいいだけ！
で、こうなった
Dim mes As String = ""
Dim txt As String = "u5143u6c17u3067u3059u304buff1fuff01"
Dim stArrayData As String() = Split(txt, "u")
For Each stData As String In stArrayData
If stData.Length = 4 Then
Dim intData As Integer = Convert.ToInt32(stData, 16)
Dim mozi As String = ChrW(intData)
'Console.WriteLine(mozi)
mes = mes & mozi
End If
Next
Console.WriteLine(mes)
実行すると、「元気ですか？！」って出てきてくるはずです。
出てきたら、終わりです。ありがとうございました。
余談で、
Dim hoge As String() = txt.Split(CChar("u"))
と
Dim hoge As String() = Split(txt, "u")
で結果が違った…気づくのに結構時間が掛かった…orz