■ 現在のこのページの役立ち度:
表示されない場合こちらのリンクからもご覧になれます。
■ このページの役立ち度を評価する:
役立ち度を評価してください。
(1(左):あまり役立たない - 5(右):大変役立った):
■ ページの共有:
[ サイト内検索 ]
カスタム検索
#2492-0ビットシフトは出来ますか?EDO1999-08-02(月) 23:10
     #2494-1RE#2492:ビットシフトは出来ますか?魔界の仮面弁士1999-08-02(月) 23:27
     #2497-1RE#2492:ビットシフトは出来ますか?EDO1999-08-03(火) 00:22
     #2502-1RE#2494:Appendモードでの改行nabe1999-08-03(火) 09:18
     #2553-1RE#2502:Appendモードでの改行(お礼)Takuma1999-08-03(火) 23:54
#2492-0
ビットシフトは出来ますか?
どうもEDOと申します。
VBで、8を3ビットシフトさせて1と言うような処理を
したいのですが、VBでビットシフトは出来ますか?
#2494-1
RE#2492:ビットシフトは出来ますか?
> VBで、8を3ビットシフトさせて1と言うような処理を
> したいのですが、VBでビットシフトは出来ますか?
VBにビットシフト演算子はありませんので、
かわりに、以下のような方法を使ってください。

左へ2回シフトする場合
    0X010000 << 2   →  &H10000 * 2^2
右へ2回シフトする場合
    0X010000 >> 2   →  &H10000 \ 2^2
ですね。

要は、Xビットシフトするには、
    左シフトの場合は、2^Xを掛けて、
    右シフトの場合は、2^Xで割れば
いいわけです。

つまり質問の内容の場合は、 8 \ 2^3 となりますね。
#2497-1
RE#2492:ビットシフトは出来ますか?
魔界の仮面弁士さんレスありがとうございます。
おかげでシフトさせることが出来ました。
#2502-1
RE#2494:Appendモードでの改行
> テキストファイルを一定の間隔でファイルに保存するのですが、Appendで追加分だけ
> 書き込もうとすると、そのたびに改行が入って余分な1行が出来てしまいます。
> 
> この改行をなくすにはどうしたらいいでしょうか?
> それともこれはAppendで書き込む時の宿命なのでしょうか?
> よろしくおねがいします

それはCR+LFが挿入されて余分な1行が出来るという意味でしょうか。
恐らくPrint#でファイルに書いていると思いますが、Print#ではセミコロンがあるかないかでCR+LF
が付いたり付かなかったりします。
例えば

  Open "Test.Dat" for Append as #1
   :
  Print #1, "お尻にCR+LFを付ける"
  Close #1

  Open "Test.Dat" for Append as #1
   :
  Print #1, "お尻にCR+LFを付けない";
  Close #1

と、こんな感じです。
ひょっとすると、最後にPrint#しているデータがヌルで、空の行が挿入されていると勘違いしているかも
知れませんよ。
#2553-1
RE#2502:Appendモードでの改行(お礼)
お尻にセミコロンを付けることで解決しました。どうもありがとうございました。
説明不足な点があり、すみませんでした。

> > テキストファイルを一定の間隔でファイルに保存するのですが、Appendで追加分だけ
> > 書き込もうとすると、そのたびに改行が入って余分な1行が出来てしまいます。
> > 
> > この改行をなくすにはどうしたらいいでしょうか?
> > それともこれはAppendで書き込む時の宿命なのでしょうか?
> > よろしくおねがいします
> 
> それはCR+LFが挿入されて余分な1行が出来るという意味でしょうか。
> 恐らくPrint#でファイルに書いていると思いますが、Print#ではセミコロンがあるかないかでCR+LF
> が付いたり付かなかったりします。
> 例えば
> 
>   Open "Test.Dat" for Append as #1
>    :
>   Print #1, "お尻にCR+LFを付ける"
>   Close #1
> 
>   Open "Test.Dat" for Append as #1
>    :
>   Print #1, "お尻にCR+LFを付けない";
>   Close #1
> 
> と、こんな感じです。
> ひょっとすると、最後にPrint#しているデータがヌルで、空の行が挿入されていると勘違いしているかも
> 知れませんよ。

ヌルはもしやと思って書き込むデータの最後の部分を切ってみたのですが変わらなかったので。
CR & LFの様でした。
このページと関連する記事:
#2494-2Appendモードでの改行1999-08-02(月) 23:28
#6799-0ビット計算2000-03-21(火) 06:00
#6899-0テキストファイルの入出力2000-03-25(土) 07:24
#5198-0テキストファイルの操作2002-02-19(火) 10:15
#19367-0固定長のファイルの読み込み、書込み2001-03-06(火) 10:47
#42318-0データを1列にテキスト形式で出力するにはどうすればいいの?2001-04-26(木) 11:26
#2801-1論理・算術シフト2002-09-06(金) 09:24
#17424-0ファイル保存時の最後の改行2000-12-27(水) 09:41
#28116-0書き込み中のプログレスバー2002-04-09(火) 02:40
#41846-0テキストの暗号化について。2001-04-18(水) 07:04
お探しの情報は見つかりましたか?お困りの問題は解決しましたか?
サイト内検索, 似た記事検索で見つからなくてもあきらめずに掲示板で質問してみましょう。
VB初心者友の会があなたのお役に立てれば幸いです。また、本ページの投稿者の方々にこの場を借りて感謝致します。
本ページは過去ログを集めて自動構成しています。よろしければこのページに関するフィードバックをお願いします。
(※ 構成の誤り、広告等の不適切な記事、リンク切れ、読めないページの報告など)