Visual Basic

全22585件中19981~20000件表示
  • 入力文字の制限について

    入力文字の制限について質問があります。 あるTextボックスに入力した文字列のうち、JISX0208の第一水準、及び第二水準に該当しない文字がある場合、エラーメッセージを表示させるプログラムを作成したいのですが、どのようにすれば良いか頭を悩ませています。 1バイト目、2バイト目の範囲を調べて判断しようかと思いましたが、  Textボックス ・・・ S-JIS(仕様)  VB内部    ・・・ Unicode(仕様) となっており、Unicodeの並び順はJISとは全く異なる為、行き詰まっています。 良いアイデアがありましたら、ご教授願います。

  • Excelの数値の比較がうまくいきません???

    ExcelのVbaでアンケートの入力フォームを初めて作成しています。 フォームに,テキストボックスを配置して,それを指定したセルに代入するというものです。 このとき,テキストボックスの中身とセルの中身が一致しているかどうかを判断したいと考えて, If Range("A1").Value = Textbox1.Value then ・・・ などとやりました。 そしたら,文字列の時は,うまくいくのですが,数値を入力したら,明らかに同じ数値が入っているのに,上の条件式が"False"になってしまうのです。 IsNumeric関数で調べると,双方とも数値であるとの結果が出ています。どちらも数値であっても3=3が"False"になってしまうのです。 どういうことなんでしょう? どなたかよろしくお願いいたします。

  • シリアル入出力

    Visual BasicでRS232Cへのデータの書き込み、読み込み方法が解りません。 この関係のサンプルプログラムや解説が載っている参考書等を教えてください

    • ojiisan
    • 回答数1
  • カーソルの移動

    VBでLキーを押すとTABキーと同じ動きでカーソルの移動をしてしまいます。 何か設定しているからこのような動きをするのでしょうか?この動きを防ぐ方法を教えていただけないでしょうか?素人なので申し訳ないです。宜しくお願いします。

    • shin248
    • 回答数1
  • VB.NETで作成したフォームをXPスタイルで表示したい

    win2000 と VB.NET を利用して開発を行っていますが、 作成したアプリケーションを XP上で実行してもXPスタイルで表示できません。 ・対象のコントロールの「FlatStyle」を「system」にする ・exeと同じ場所に xxxx.exe.manifest を作成する。 の2点を行ったのですが、上手く動いてくれません。 なにかコツのようなものがあれば、ご教授お願いします。

    • uc078
    • 回答数1
  • 連続するセルの比較をしたいのですが、(型が一致しません)のエラーが出ます。

     下記のどの部分でエラーになるのか、お教えください よろしくお願いします。  Sub CellsSamp() Sheets("sheet3").Select If Range(Cells(5, 1), Cells(5, 6)) = Range(Cells(5, 8), Cells(5, 25)).Value Then Range(Cells(6, 1), Cells(6, 6)) = Range(Cells(5, 1), Cells(5, 6)).Value End If End Sub

    • takagon
    • 回答数8
  • VBからオラクルをへてEXCEL方式で印刷

    オラクルのデータベースをVB6でEXCELの印刷方式で印刷することは可能ですか?VBからオラクルのデータベースを読み込むのは出来ましたが、EXCEL方式で印刷する方法がわかりません。教えてください

  • SPLIT関数

    環境 VB6.0  CSVデータをカンマで区切ってデータを取得して  いるのですが、こういう処理はできるのでしょうか?  例えば データがダブルコーテーションでくるられて      いる場合はカンマ(,)を無視するといった      ことはできるのでしょうか? DIM CSVDATA AS STRING DIM XWDNDATA() AS STRING CSVDATA = "1,2,"あいう,おえお",25" XWDNData = Split(CSVDATA, ",") XWDNData(0) = "1" XWDNData(1) = "2" XWDNData(2) = ""あいう" XWDNData(3) = "おえお"" XWDNData(4) = "25" XWDNData(2)とXWDNData(3)を一つのデータとしたい こうしたいデータ XWDNData(0) = "1" XWDNData(1) = "2" XWDNData(2) = "あいうおえお" XWDNData(3) = "25"

    • GERRARD
    • 回答数6
  • TABキーで、カーソル移動したテキストの値を選択状態にしたい

    現在VBでプログラムを作っております。 TABキーにて、カーソルがテキストボックスに位置付く際、入力されている 値を選択状態にしたいのですけど、これって可能ですか? 現状、TABキーを押せば、テキストボックスにカーソルが移動しますが、 仮に(テキストボックスに)100と値が入っていた場合、カーソルは100の値 の先頭に位置付き、値の修正が必要となった場合、Deleteキー等で値を消し てから、再度入力となります。 これがわずらわしいので、カーソル移動したら、そのまま選択状態とし、 入力すれば、値が上書きされるようにしたいです。 よろしくお願いします。

    • mk100
    • 回答数1
  • あるタイミングでマウスボタンを離す。 離した時間差を計る。

    こんにちは、 反射神経のゲームもどきを作ろうと考えています。 マウスを押しておき、タイミングが与えられて(T1) マウスを離した時間(T2)との時間差(T2-T1)を計りたいと思っています。 この場合に使う、イベントってなんなんでしょうか? また、何かヒントがありましたら教えてください。 よろしくお願いします。

  • 教えてください

    簡単なことで済みません。 初心者なので分からずつまづいています。 教えてください。 下記のソースを実行するとエラーが出てきます。 「メモリーが不足しています」 「ファイルが見つかりません」 どう対処したらいいのでしょうか? Private Sub Command1_Click() On Error GoTo dbg: ' Excelのインスタンス作成 Set xlApp = CreateObject("Excel.Application") ' Excelを表示有無 xlApp.Visible = True ' マクロの警告やメッセージを表示しないように設定 xlApp.DisplayAlerts = False ' 指定したExcelファイルを開く Set xlBook = xlApp.Workbooks.open("D:\test.xls") ' Excelの終了 xlApp.Quit ' オブジェクトを解放 Set xlBook = Nothing Set xlApp = Nothing Exit Sub dbg: ' エラーメッセージを表示 MsgBox Err.Description End Sub

  • ランダムに絵を切り替えたい

    同じ位置にイメージを3枚置きます。 コマンドボタンを押すとそれがランダムに切り替えるようにしたいです。 image1 image2 image3 とイメージがあります。 int(rnd*3)と番号を作って、それを  image(番号).visible.trueに持っていくところが わかりません。 名前の結合? 説明不足ですが、何かお分かりの方がいましたら教えてください。 よろしくお願いします。

  • パッケージを作成したがインストールできない

    VB6.0でパッケージ(ディストリビュージョンで作成)を作成しましたが、 VBの入っていないPCでインストールできません。 作成したPCは98でインストールしたいのは2000です。 教えて下さい。

    • sobako
    • 回答数2
  • VB.NETでディレクトリの一覧を表示したい

    VB.NETで簡単にディレクトリの一覧を表示することはできるのでしょうか。VB6だディレクトリリストボックスなるものがあり、それが使用出来たらしいのですが、VB.NETにはそれがありません。APIを呼ばずにディレクトリの一覧を表示する方法がありましたら教えてください。

    • tatsu99
    • 回答数1
  • VB6.0 でメニューを作りたいんですが・・・

    VB6.0 でプログラムを作る研修(?)をしています。 使ってるテキストはVB5.0 のものなので、若干違います。 タイトルの通りなのですが、メニューエディタを使ってメニューを作成したいのです。 テキストには、ツールバーにある、と書いてあるのですが、ありません・・・ コンポーネントで追加する必要があったような記憶があるのですが、 どれを追加するのか思い出せません。 抽象的な質問で申し訳ありませんが、よろしくお願いします。補足はします。

    • liebe
    • 回答数1
  • VBでexcelのプレビュー画面表示

    VB6でフォームにボタンを設定し、押したらexcelのプレビュー画面に行き、excel方式で印刷できるプログラムを作りたいのですが、教えてください。excelへの接続も同時に教えて下さると、ありがたいです。

  • VB6のアプリで、非アクティブの状態でキープレビューする方法

    教えてください。 VBで作成したアプリで、アイコン・最小化状態もしくは非アクティブ状態で、キーボードからの入力を先取り、認識する方法は無いでしょうか? (他のアプリケーションでの操作画面をキャプチャして、保存したいのです。従って、他のアプリケーションがアクティブになっています。そのような状態の中で、あるキー入力を先取り、認識して処理したいものです)

  • SCALEの使い方教えてください

    宜しくお願いします。 以前座標系のSCALEの使い方で質問させて頂きましたが、 どうしても使い方が分かりません。 Pictureの中をマウスクリックしたらそのポジションをデカルト座標の中心点X0Y0にしたいのですが、色々考えたのですがどうしても出来ません。教えて下さい。 マウスも1:1で動かしたいのですが。。。 宜しくお願いします。

    • toko703
    • 回答数3
  • 漢字を数字に変換

    こんにちわ。 例えば、”五”と入力されたら”5”と表示し、”五十五”と入力されたら、”55”となるようないいプログラム法ってあるでしょうか?

    • noname#47454
    • 回答数3
  • VB.NETでフォームの画像を取得したい

    VB.NETでフォームに表示されている内容(画像のイメージ)を取得したいのですがその方法が判りません。最終的には、その内容を印刷したいのですが、まずその内容を取得するにはどうしたら良いでしょうか。Alt+PrintScreenキーを押下したイベントを発生させる方法は、除きます。

    • tatsu99
    • 回答数1