to_suzuのプロフィール

Sub macro() x = Application.InputBox("数値を入力！　１＝東京、２＝大阪", Type:=1) Select Case x Case 1 指定フォルダにある別ブック「東京」を開き、そのブック内の 　　シート名「東京」に関しての処理 　　Case 2　 指定フォルダにある別ブック「大阪を開き」、そのブック内の　 　　シート名「大阪」に関しての処理 End select 　「そのあとの作業」がつづきます End sub　 このようなマクロを組んでいます インプットボックスで　１または２を入れると それに応じた作業をしてくれますが それ以外の数字を入力すると エラーが起きます （指定フォルダ内に「東京、「大阪」以外のブックが存在しないので） これを避けるため「1」「2」以外の数字を入力した場合に 再度インプットボックスに戻って入力を促すように 組みたいのですが どうしたらよろしいでしょう？

2年前にメガネを作りました。 見える方が良いと一番視力が出てる状態で作ってしまったのですが、やはり度数が強く、長い時間は付けていられません。 それで度数を抑えたレンズで作り直したいと思うのですが、フレームはこのままでレンズだけの交換って出来るでしょうか？ 近視が強く圧縮レンズです。

今月、新築の２Ｋの賃貸物件の契約を致します。 契約前に、疑問があるので、ご回答いただけるとありがたいです。入居人数は二人で、幼児がいます。 入居物件の説明ですが、 ・新築で何の汚れも無い状態での入居です。 ・タバコは吸いません。 ・床は畳ではなく、人工的なフローリングのような洋間です。絨毯を敷いて使います。 ・もともとエアコンが付いています。 ・最低５年はそこで暮らします。 ・不動産会社との間に、仲介業者がおり契約自体は仲介業者との契約です。 仲介業者のかたが、淡々としてあまり詳しく質問に答えてくれないので、契約時に注意しなければならない事を アドバイスいただきたいのですが・・・ (1)’新築だが、経年による汚れなら敷金の返還に影響はない’との説明を受けてますが、経年による汚れと認められない物とは、一般的にはどんなものでしょうか？ (2)どの程度なら敷金の何割程度が返還可能、という内容の文章は契約書にあるのでしょうか。無い場合、それを盛り込んでもらう事はできますか。 (3)退去時に、経年による汚れであるという事をこちらが説明しても納得されずに敷金返還とならない場合があると聞きましたが、それにはどのような要因がありますか。 (4)もともと付いているエアコンが故障した場合や、修理してほしい場合、その経費について契約書に何も記載がない場合、不動産会社へ請求依頼をできる可能性はあるものですか。 (5)賃貸契約が生まれて初めてなので、契約時に、はっきりと確認して説明してもらっておかなければならない事が、よくわからずに後になって「こんなことがあった！！」と後悔してしまう気がするので、どういう事をきちんと 説明してもらうべきかを教えて下さいますと助かります・・・。 (6)最後に、入居以降注意していくべき事がありましたらアドバイスをお願い致します。 どうぞよろしくお願い致します。

OS:windows2000pro VB:VB6.0sp5 テキストボックス(オブジェクト名:text1)に下記文字以外は 入力不可にする方法(プログラム)を教えてください 初歩的なご質問かと存じますがよろしくお願いいたします 英字：A～Z(大文字) 英字：a～z(小文字) 数字：0,1,2,3,4,5,6,7,8,9 記号：-(ハイフン),_(アンダーバー)

現在、私と父は別居しており、父は1人でアパートに住んでいます。今度、賃貸更新をしなくてはいけないので、保証人になってほしいと言われました。（今までは別の人になってもらっていたようです。）父からは手続きに保証人の実印と印鑑証明がいると言われましたが、同居してる母の経験では保証人に対して印鑑証明まで必要だったことはないそうです。実は父は家族に内緒でサラ金から借金をしていたことがあり、印鑑証明が勝手に変なことに使われないか心配です。最近では保証人に対して印鑑証明の提出を求めることがあるのでしょうか。 また、保証人についてですが、賃貸契約の場合、保証人は保証人でも連帯保証人ということなのでしょうか。それとも不動産によって普通の保証人のときもあれば連帯保証人のときもあるのでしょうか。もし両方あるとすれば、どのような違いがあるのでしょうか。どなたかご存知の方、以上の２点について教えて下さい。お願いします。