keypressイベントで押されたキーがenterキーで
あるかどうか判断するにはどうすればよいですか?

if KeyAscii=vbenter

ではだめでした。

A 回答 (2件)

If KeyAscii = vbKeyReturn Then



End If

ちなみに、KeyAscii = 0 とすれば改行されません。
(押したキーは、入力されないという事です。)


以上、参考程度に。 m(_ _)m
    • good
    • 0
この回答へのお礼

さっそくありがとうございます。

無事なりました。
いそいでいたので助かりました。

お礼日時:2001/11/10 14:23

参考URLはキーダウンイベントのKeyCodeパラメータの定数ですが・・・


キープレスと共通する部分が多いので、参考までに載せておきます。

解決してるようなので、ポイント不要です。
ハイエナ根性は嫌いなので。。。

ここを締め切らないのには、理由があるのでしょうか?
何かまだ質問があるとか?

参考URL:http://www.microsoft.com/JAPAN/developer/library …
    • good
    • 0
この回答へのお礼

すみません。締め忘れてました・・・。

お礼日時:2001/11/11 15:32

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qプレス金型について

順走プレスの金型と一般的なプレス金型の違いは何ですか?
当方プレス金型と言えば押し型、抜き型、トリミング型くらいしか分かりません。
よろしくお願いします。

Aベストアンサー

順送です。
金型に数工程が作られていて、材料がコイル材です。
特定のピッチで送られて、1工程でトリム、2工程で曲げ、3工程で穴あけ、4工程で切り離しなどになっていて、プレス機の1ストロークで1個の製品が出来上がる仕組みになっています。
小さい部品で、かつ、大量に生産するのに適しています。
大きな部品では、その工程分、プレス機を並べて、大量生産することも、車の部品などでは行われていますが、ダイハイトをすべて揃える必要があるので、金型には金がかかります。
この順送には、材料を送り込むフィーダーが必要で、ストロークと同期させます。

Q【VBA】Worksheet_changeイベントで特定のキーが押されたときだけ無効にしたい

Excel2003です。
タイトルそのまんまなんですが、Deleteキーを押したときだけWorksheet_changeイベントが走らないようにできますか?

Aベストアンサー

Sheetには、Key_Downなどのキーを押されたときのイベントがありませんのでできません。

で、代案。
Deleteキーを押すということはセルの値を消すということですから
Changeイベントの最初で、該当セルの値をチェックしてはどうでしょうか。

'---------------------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)

  If Target.Value = "" Then Exit Sub

   ーー通常処理ーー

End Sub
'---------------------------------------------------
 
勘違いしてましたらご容赦願います!(^^;;;


 
 

Q樹脂成型金型とプレス金型

現在、樹脂成型金型の仕上げ、修理の仕事をしています(6年目)。今後プレス金型メンテナンスの仕事に移動するかもしれないのですが、プレスに行った場合樹脂金型でやっていた経験は生きるのでしょうか?お互いの仕事は全く異なるものなのでしょうか?不安があります。回答お願いします。

Aベストアンサー

主に自動車関係の大型の樹脂成形金型、プレス金型、特殊成形金型などを扱っている技術者です。

質問者さんのたずさわっている分野が分かりませんので、一般的な概念だけを書きます。
金型と一口に言っても様々な分野があることをご承知だと思います。
樹脂成形金型もプレス金型も分野によってかなり異なります。

射出成形金型では、金型が閉じられた最後の形を一番に考慮します。
プレス金型では、材料板を成形し始めて終了するまでの金型と材料板の運動を一番に考慮します。
金型の最初の成形試験も異なります。
射出成形型では、ミガキは後回しにしても金型構造の完成度を上げないと試験が行えません。
プレス金型では、金型構造の主要部分以外を後回しにして成形性のためにミガキを先行します。(樹脂成形型のミガキとはかなり異なります)
射出成形金型は製品取出しだけを考えれば良いですが、プレス金型では材料の投入と製品取出しとスクラップの排出を考えます。タンデム、トランスファ、プログレッシブでも考え方が異なってきます。
金型のガイド構造と公差も異なります。

鉄を加工するという基本的部分は共通ですが、構造や機能が異なるために、大雑把に悪く言えば、手抜き箇所がかなり異なるということです。
段取りもずいぶん異なり、勘の押さえどころが違います。

一見するとプレス金型のほうが乱暴でイイカゲンな作りに見えます。
なのにガイド機構公差はずっと厳しいです。したがって簡易にするために現合することも多いです。
射出成形金型をやっていた職人さんがプレス金型に転向して上手くいかない場合がありました。樹脂成形金型で経験した高級?な作業に自負を持ちすぎたからだと思います。
頭を柔軟にしてプレス金型を勉強してください。

質問者さんは鉄を扱う基本的部分を習熟されているわけですから、プレス金型の構造と機能を理解できれば不安に思わなくても大丈夫です。

主に自動車関係の大型の樹脂成形金型、プレス金型、特殊成形金型などを扱っている技術者です。

質問者さんのたずさわっている分野が分かりませんので、一般的な概念だけを書きます。
金型と一口に言っても様々な分野があることをご承知だと思います。
樹脂成形金型もプレス金型も分野によってかなり異なります。

射出成形金型では、金型が閉じられた最後の形を一番に考慮します。
プレス金型では、材料板を成形し始めて終了するまでの金型と材料板の運動を一番に考慮します。
金型の最初の成形試験も異...続きを読む

QIf myCityBUNRUINO = 2 Then Cells(myPrefNO + 3 - 47 - myCityNu, 24) = myTantou こちらについて教えていただきたいです。

myTorikomibi = Range("A2").Value
If myCityBUNRUINO = 0 Then Cells(myPrefNO + 3, 4) = myTantou
If myCityBUNRUINO = 1 Then Cells(myPrefNO + 3 - 47, 14) = myTantou
If myCityBUNRUINO = 2 Then Cells(myPrefNO + 3 - 47 - myCityNu, 24) = myTantou
For i = 1 To 3
If myCityBUNRUINO = 0 Then Cells(myPrefNO + 3, i + 4) = myTorikomibi
If myCityBUNRUINO = 1 Then Cells(myPrefNO + 3 - 47, i + 14) = myTorikomibi
If myCityBUNRUINO = 2 Then Cells(myPrefNO + 3 - 47 - myCityNu, i + 24) = myTorikomibi
Next i
マクロを編集しようとしましたところこちらが解読できづに困っています。
こちらだけとりだして実行しながら解読していますが混乱してしまっています。ご存知の方いらっしゃいましたら教えてください。Then以降がわかりません。よろしくお願いいたします。

myTorikomibi = Range("A2").Value
If myCityBUNRUINO = 0 Then Cells(myPrefNO + 3, 4) = myTantou
If myCityBUNRUINO = 1 Then Cells(myPrefNO + 3 - 47, 14) = myTantou
If myCityBUNRUINO = 2 Then Cells(myPrefNO + 3 - 47 - myCityNu, 24) = myTantou
For i = 1 To 3
If myCityBUNRUINO = 0 Then Cells(myPrefNO + 3, i + 4) = myTorikomibi
If myCityBUNRUINO = 1 Then Cells(myPrefNO + 3 - 47, i + 14) = myTorikomibi
If myCityBUNRUINO = 2 Then Cells...続きを読む

Aベストアンサー

こんにちは。maruru01です。

ヘルプはご覧になりましたか?
特に、Cellsについて。
Cellsは、

Cells(行番号, 列番号)

で、セルを参照します。
なので、各条件の時に、変数「myTantou」や「myTorikomibi」に格納されている値をそれらのセルに代入しているだけですが。
ただし、行番号が、

「myPrefNO + 3 - 47」
「myPrefNO + 3 - 47 - myCityNu」

などとちょっとややこしくなっていますが。
これも、変数「myPrefNO」「myCityNu」に入っている値から行番号が決まるというだけです。
例えば、
myPrefNO=60
myCityNu=2
なら、下の例は、
60+3-47-2=14
で、14行目となるということです。

Q【物理学】1枚の円型鉄板にプレスを掛けて丸い灰皿を作るとします。 「金型が凸状の筒の上に鉄板を乗せて

【物理学】1枚の円型鉄板にプレスを掛けて丸い灰皿を作るとします。

「金型が凸状の筒の上に鉄板を乗せてプレスして灰皿を作る」のと

「金型が凹状の溝の上に鉄板を乗せてプレスして灰皿を作る」のでは、

どちらの方が出来上がりの灰皿は丈夫なのでしょうか?

同じですか?

円の丸みが出る底の周りのカーブはどちらの型でプレスした方が厚みが残るのか教えてください。

Aベストアンサー

プレスで潰す方法なら凸型と凹型の両方の金型を同時に使うので変わらないのでは?

QMultiLine=TrueのTextBoxでEnterキー

Visual Basic 6.0で、TextBoxでEnterが押されたら次のコントロールへ移動させているのですが、
MultiLine=Trueの場合、TextBox内で改行されてから次のコントロールへ移動してしまいます。
TextBox内で改行されたくはないのですが、何か回避方法はありますか?
(10文字分の幅のTextBoxに20文字入力するため、折り返しはされて欲しいのです。)

Aベストアンサー

KeyPressイベント内でKeyAscii=0とすれば入力をキャンセルできますよ。

Qプレス金型について

現在プレス金型の関係の仕事をしています。そこでよく耳にするのが「トランスファープレス」と「タンデムプレス」です。実際にプレス機械を操作する仕事ではないので気にはしてなかったのですが、最近ちょっと気になって書き込みました。あまり詳しくもなく簡単に教えてください。

Aベストアンサー

以前某自動車メーカーの圧造にいた者です。
トランスファープレス・・・一台のプレス機に複数の金型をセットして全工程を一挙に仕上げられます。
http://www.ihi.co.jp/yoko2/product.htm

タンデムプレス・・・プレス機一台に対して1金型必要です。いわゆる普通のプレスライン。
http://www.h-f.co.jp/handf_kyu/pre/cbpressta.html
説明下手ですみません。

QENTERキーでフォーカスを移動したい

VB6で、ENTERキーでフォーカスを移動できるようにしたいのですが、普通にコントロールのkey_Up、Down,Pressで処理した場合、日本語入力だと文字確定でENTERを押した時にフォーカスが飛んでしまい、使い勝手が良くありません。

解決策、または他に簡単に実現できる方法がありましたらアドバイスをお願いします。

Aベストアンサー

Key_Upでその処理を行うとそうなってしまいます。
Key_DownかKey_Pressのみで行えばなりません。

Qプレス金型の工場をつくりたいのですが。

金物関係は素人ですので、仕事の関係上、プレス金型を作ることをせまられています。
職人は募集するとして、工場の最小敷地面積や、備えなければいけない機械などを教えてもらえないでしょうか?よろしくお願いします。

Aベストアンサー

>金型は複雑な細工は必要なく、板状の鋼板にアーチをつけながら、裁断する程度ですが、無理でしょうか。
出来ると思うならやってみると良い
可能性だけ言えば手作業でも金型は作れます
他の方に意見に賛成
此処で質問する程度の知識ならかなりヤバいですよ旋盤とかフライスとか放電加工とか書き出したらきりがない
作る金型によって必要な機械も違うし
最終製品によって金型の作りも違うし

Qウィンドウにキー送信で ENTER を送りたい

指定されたキャプションのウィンドウに ENTERキーを送りたいのですが、ものによって送れるものと送れないものがあります。

キャプションが"印刷"のものにキー送信をしているのですが、ExelやWordなどのクラス名が取得できる("bosa_sdm_XL9"等)ものだと送信でき、IE、秀丸などのクラス名が取得できないもの("#32770"と表示される)だと送信できません。

お分かりになられる方がおりましたら、ぜひ教えてください。

Aベストアンサー

>指定されたキャプションのウィンドウに ENTERキーを送りたいのですが、
>ものによって送れるものと送れないものがあります。

どうやって送ってるんですか?それを書いていただかないとなにも判断できませんが。


人気Q&Aランキング

おすすめ情報