josyo_m の回答履歴

全64件中1~20件表示
  • 金沢へ行きます!

    お盆に金沢へ旅行します。 駅付近で一泊するのですが、お勧めの食べ物を教えてください。和、洋、中、値段などは問いませんので、ここ!!という所を是非、お願いします!! あとお勧めのお土産も教えていただけたらと思います。

  • デートコースin金沢

    京都の学生♂です。 来週、遠距離で片思い(かなり脈ありだと思う)の人に7ヶ月ぶりに再会します。その子は石川県在住の高校生です。努力の結果、初めて二人きりでデートに行くことになりました。 しかし、ここで問題が発生しました。僕はもちろん京都に住んでいますし、彼女も金沢市ではなく他の市に住んでいるため、二人とも金沢市内の観光地やデートスポット、遊び場が分からなくて困っています。 デートの最後には告白しようか・・・と思っているのですが。 段々いい感じにもっていけるようなデートコース、もしくは、2人で楽しめるデートコースを誰か(特に金沢に詳しい人)教えてくださいm(__)m ちなみに時間は僕の電車の都合で、午前10~午後6時くらいです。

  • 全国各地の恋愛・復縁にゆかりの神社を教えてください。

    サイトのリンクでも構いません。 というのも、今度、バイクでの日本1周を計画しています。 目的は何か?と自問したところ、別れた恋人への想いでした。 日本全国そう47都道府県全ての恋愛・復縁にゆかりの神社を巡ってみたいと考えています。 馬鹿げているようですが、自分自身でもまじめに、いろいろ調べています。 どうか、協力というか、知っている地方だけでもおしえていただけれ幸いです。 宜しくお願いします。

    • fainday
    • 回答数9
  • フォームの表示位置

    いつも拝見させていただき勉強しています。 VB初心者です。 親フォームから子フォームを、 loadメソッドとshowメソッドで、 よびだして表示させようとしているのですが、 フォームの位置をコントロールすることは できるのでしょうか? 画面中央に表示させたいのですが、 左上のほうに表示されてしまいます。

  • フォームの表示位置

    いつも拝見させていただき勉強しています。 VB初心者です。 親フォームから子フォームを、 loadメソッドとshowメソッドで、 よびだして表示させようとしているのですが、 フォームの位置をコントロールすることは できるのでしょうか? 画面中央に表示させたいのですが、 左上のほうに表示されてしまいます。

  • visible

    いつもお世話になってます。 a1というチェックboxによって、表示を変えたいのですが、上手くいきません。ご教授ください。 Private Sub a1_Change() Dim z As Integer For z = 23 To 38 az .Visible = a1.Value Next Dim x As Integer For x = 42 To 57 az .Visible = a1.Value Next Frame181.Visible = a1.Value End Sub

    • noname#40795
    • 回答数3
  • visible

    いつもお世話になってます。 a1というチェックboxによって、表示を変えたいのですが、上手くいきません。ご教授ください。 Private Sub a1_Change() Dim z As Integer For z = 23 To 38 az .Visible = a1.Value Next Dim x As Integer For x = 42 To 57 az .Visible = a1.Value Next Frame181.Visible = a1.Value End Sub

    • noname#40795
    • 回答数3
  • 時間の計算

    下記にあります、 「時間を入力するテキストボックス作成」の 続きです。 テキストボックスA、Bと ラベルCがあるとします。 テキストボックスAとBには時間(形式はh:mm)が 入っていて、そのテキストボックスAとBの差を ラベルCに出したいのですが、下記の例の ようにするには、どのようにすれば良いでしょうか? 例: テキストボックスAに「9:00」、 テキストボックスBに「11:45」と 入ったら、ラベルCには「2:75」と出力される

    • su-ta
    • 回答数4
  • 時間の計算

    下記にあります、 「時間を入力するテキストボックス作成」の 続きです。 テキストボックスA、Bと ラベルCがあるとします。 テキストボックスAとBには時間(形式はh:mm)が 入っていて、そのテキストボックスAとBの差を ラベルCに出したいのですが、下記の例の ようにするには、どのようにすれば良いでしょうか? 例: テキストボックスAに「9:00」、 テキストボックスBに「11:45」と 入ったら、ラベルCには「2:75」と出力される

    • su-ta
    • 回答数4
  • 時間の計算

    下記にあります、 「時間を入力するテキストボックス作成」の 続きです。 テキストボックスA、Bと ラベルCがあるとします。 テキストボックスAとBには時間(形式はh:mm)が 入っていて、そのテキストボックスAとBの差を ラベルCに出したいのですが、下記の例の ようにするには、どのようにすれば良いでしょうか? 例: テキストボックスAに「9:00」、 テキストボックスBに「11:45」と 入ったら、ラベルCには「2:75」と出力される

    • su-ta
    • 回答数4
  • 自分のいるディレクトリへのパスを知りたい。

    VBで開発したアプリが実行されているディレクトリへのパスを求めたいのですが、 簡単な方法をご存知でしたら教えてください。 例:C:\TEST\TEST.EXE のような感じで...

    • noname#5252
    • 回答数2
  • TextBoxの最下行を表示しておきたい

    VisualBasicのTextBoxにログを表示するためMultiLine=Trueにして使用しているのですが、TextBoxのサイズを超えるログがたまると最新のログ(=最下行)が隠れて見えなくなります。 もちろん、スクロールバーでスライドさせてやれば見ることはできるのですが、自動的に最下行が表示されるようにはできないでしょうか。 よろしくお願いします。

  • SQL詳しい方、助けてください。

    こんにちは。 UPDATE テーブルA SET フィールドA1 = '1' WHERE フィールドA2 =(SELECT フィールドB1 FROM テーブルB WHERE フィールドB2 = 'C0' OR フィールドB2 = 'C2' AND フィールドB3='') AND フィールドA3 = '' AND フィールドA4 <> '' というSQLを作成して、動作していたので安心していたら、 テーブルBのレコード数は1件のみだと思っていたら、複数存在する場合があるとのことで、 テーブルBのレコードを追加してみたところ、、 【サブクエリは複数の値を返しました。サブクエリが = 、!= 、<、<= 、>、>= のあとに続く場合や、 サブクエリが 1 つの式として使われる場合に複数の値は許可されません。】 というエラーで終了するようになってしまいました。 そこで、 UPDATE テーブルA AS A INNER JOIN テーブルB AS B ON A.フィールドA2 = B.フィールドB1 SET A.フィールドA1 ='1' WHERE B.フィールドB2 = 'C0' OR B.フィールドB2 = 'C2' AND B.フィールドB3='' AND A.フィールドA3='' AND A.フィールドA4 <> '' としてみました。 なんだか混乱してきて、結合条件があっているかが 自分でもよくわかんなくなっていますが。 しかも、 上記のSQLをSQL SERVER 2000のクエリアナライザで 実行すると、 【キーワード 'inner' 付近に正しくない構文があります。】 というエラーが・・・。 INNER 以下はいろいろおかしいんだろうな・・・と 思っていたのですが、まさか、そんなしょっぱなで引っかかるとは思いませんでした。 いろいろ、記述方法を変更してみたり、考えたんり したんですけど、情けないことにさっぱり解りません。 どなたかお力をお貸しください。 お願いします。

    • TTU006
    • 回答数1
  • 文字列を配列に…。

    VBはまだ始めたばかりで本当に初歩的なことかもしれませんが分かる方がおられたら是非教えて下さい。 text1.textから取り込んだ文字列を”一文字ずつ”(Dim a(100) as stringで宣言した)配列に格納したいのですがどうしたらいいのでしょうか?? <例>text1.textに"abc"と入力しcommandbuttonを押すとa(0)に"a"がa(1)に"b"がa(2)に"c"が格納されるといったかんじです。 ちなみに今私がしたいのはtext1.textに、ある文字列を入れその文字列を文字コードに変換しそれを一文字分ずつ+1してまたそのコードを文字に直しtext2.textに出力するというものです(ようは簡単な暗号化ですね)。 私はAscとChrコマンドを利用して1文字ずつコードをずらしていこうと思っているのですが、他に良い方法などあるのでしょうか?? 本当に初心者でどのようにしらたよいのか分かりません…。 どなたか分かりやすく教えていただけませんでしょうか?? お願いします。

  • 文字列にある特定文字の数

    こんにちは。 文字列「C:\MYDOCU~1\THINKB~1\THINKB~1\TEMP」に"¥"がいくつ含まれているかを算出したく悩んでいます。どのような方法があるのか、是非アドバイスをください。よろしくお願いします。 ** 環境 ** VB6.0(sp5)

    • adachi
    • 回答数6
  • 配列について

    配列の要素数をinteger型にいれたいのですがどうしたらいいですか? 例   Dim A() As String   Dim B AS Integer       A = "あ","い","う" Aの要素数3をBに入れたいのです。 この配列の作りかたもあっているか分かりませんがよろしくお願いします。

  • テキストボックスに改行を含む値を表示する場合

    テキストファイルより1行ずつ値を改行「chr(13)」でつなげて取得し、それを テキストボックスに表示させたいのですが、そのまま値をテキストボックスの textプロパティに設定すると、改行が「・」で表示され改行されていません。 テキストボックスのプロパティでMultiLineもTrueにしてあるのですが、これは 無理なことなのでしょうか? 一行ずつ取得してテキストボックスに表示する際に改行を設定していくしかない のでしょうか? 詳しい方いらっしゃいましたらご教示ください。 よろしくお願いいたします。

    • tariran
    • 回答数3
  • テキストボックスに改行を含む値を表示する場合

    テキストファイルより1行ずつ値を改行「chr(13)」でつなげて取得し、それを テキストボックスに表示させたいのですが、そのまま値をテキストボックスの textプロパティに設定すると、改行が「・」で表示され改行されていません。 テキストボックスのプロパティでMultiLineもTrueにしてあるのですが、これは 無理なことなのでしょうか? 一行ずつ取得してテキストボックスに表示する際に改行を設定していくしかない のでしょうか? 詳しい方いらっしゃいましたらご教示ください。 よろしくお願いいたします。

    • tariran
    • 回答数3
  • コンボボックスについて

    コンボボックスを2-ドロップダウンリストにすると「combo1.Text = ""」の命令が使えなくなるので2-ドロップダウンリストのままで「combo1.Text = ""」の命令が使えるようになる方法を教えてください。この命令がどうしても使用できない場合は、これと同じ動きをする命令を教えてください。

    • nagiha
    • 回答数5
  • コンボボックスについて

    コンボボックスを2-ドロップダウンリストにすると「combo1.Text = ""」の命令が使えなくなるので2-ドロップダウンリストのままで「combo1.Text = ""」の命令が使えるようになる方法を教えてください。この命令がどうしても使用できない場合は、これと同じ動きをする命令を教えてください。

    • nagiha
    • 回答数5