Quantcast
Channel: OKWAVE 最新質問(Visual Basic/257)【本日】
Viewing all 7264 articles
Browse latest View live

visual vasic5.0に代わるソフト

$
0
0
osはwindows7を使ってます。以前visual basic5.0で作成したプログラムを少し直したいんですが今のosではvisual basic5.0ではエラーが出て開けません。この自作プログラムを開いて直せるソフトがあれば教えていただきませんか。visual basic6.0は6万円と高くも少し安くできたら無料のがあればと思ってますがどうでしょうか。お願いします。

VisualBasicで作ったものをブログに

$
0
0
VisualBasicで作ったものをホームページやブログに載せることはできるでしょうか。 たとえば、テキストボックスに時刻を表示させるだけの単純なプログラム「testtime.exe」を作り、それをホームページの一部として表示したり、ブログのサイドバーに表示させたりということです。 ご存知の方、教えてください。

Chartコントロールの凡例を大きくしたい

$
0
0
Chartコントロールでマーカー付きで折れ線グラフを作成し、凡例を表示するようにしています。 そのグラフをPrintあるいはPrintPreviewで印刷すると、凡例のマーカーがとても小さく印刷されます。 グラフエリアのマーカーサイズを変更しても凡例は変わりません。 画面上への表示、ビットマップ等への保存をした場合は大丈夫です。 凡例のマーカを大きく印刷することはできなのでしょうか? よろしくお願い致します。 開発環境 OS : Windows 7 言語 : Visual Basic .NET 2013Community .NetFramework4.5.1

高速なグレースケール変換

$
0
0
vb.netで画像処理のプログラムを作成しています。 カラーのBitmapを8bitのグレースケールに変換する方法としては、Format8bppIndexedを利用する方法がもっとも高速のようです。 しかし、このとき内部で行われている変換式がわかりません。 例えば、「(R+G+B)/3」なのか別の重み付けなのか。 ご存知の方があれば教えてください。 処理内容をもう少し具体的に書くと、 1. 入力画像と同じ大きさのBitmapをFormat8bppIndexedで作成する(グレーBitmap)。 2. 8bitグレースケールのColorPaletteを作成して「グレーBitmap」のPaletteに設定。 3. 「グレーBitmap」を入力画像のPixelFormatでLockBits。 4. 入力画像のScan0を「グレーBitmap」のScan0に代入。 5. 「グレーBitmap」をUnlockBits(ここでカラーからグレースケールへの変換が行われる)。 となります。 上記 5. の部分で行われる変換式を教えてください。

課題のVisualBasicについて質問です

$
0
0
プログラム初心者です。 VisualBasicについてご教授ください。 課題は、 TextBox1(数値)からTextBox2(数値)の間で、偶数・奇数がそれぞれ何個あるかを求めるアプリを作りなさい。といったものですが、添付画像のところで偶数の個数を出そうとしているのですが、うまく解答を出すことができません。どうぞご教授ください。よろしくお願いいたします。

DataTableのselectメソッドで日付検索

$
0
0
vbのDataTableのselectメソッドで、年月に該当する日付検索をしたいです。 DataTable1.select(date1 = CDate('2015/01/01')) みたいな事ですが、 やりたいのは、2015年01月のものを全てという条件です。 date1の属性を年月に変換して、2015/01とイコールのものを抽出するか、 date1の属性をYYYYMMDD文字列に変換して、like '201501%' みたいな事をするのか。 postgresqlに例えると、 select * from tb1 where to_char(date1,'YYYYMMDD') like '201501%' みたいな事をVBのDataTableのselectメソッドでやりたいです。 よろしくお願いします。

VisualBasic2008の「LINQ」で..

$
0
0
VisualBasic2008の「LINQ」で「SQLServer」を操作する場合、「NorthwindDataContext」というAccessの匂いのするやつは必須なのでしょうか?

ディスプレイの拡大率取得

$
0
0
コントローパネルのディスプレイから、「デスクトップ上のテキスト~~縮小拡大」の処 小 100% 中 125% 大 150% で変更ができますが、この拡大率をVBで取得する方法を教えて下さい。 アクセス2013 VBA使用です。

「LINQ」って...

$
0
0
「LINQ」ってあまり使われてないんでしょうか。 事例を検索しても、少ないっていうかコピーしたとしか思えないような似たものばかりなんですよね。 どうなんでしょうか。

Do...Loopについてお伺いします

$
0
0
Visual Basic初心者です。演習問題に、 「1+2+3...=n<100となる最大のnを求めるアプリ。」を作成しなさい。 といったものがあり、添付画像のようにプログラムしてみたのですが、1+2+3...=n>100となる最小のnは求められても最大のnの求め方がわかりません。どうぞご教授ください。よろしくお願いします。

【VB.NET】 J#ライブラリのエラー

$
0
0
Framework4.5.2の環境で、J#ライブラリ(vjslib.dll)のjava.io.FileOutputStreamクラスのインスタンスを作成するとエラーになります。 Framework2.0ではエラーは発生しませんでした。 エラーになる箇所 ↓ Dim clsStream As New java.io.FileOutputStream(FilePath) エラー内容 'java.lang.System' のタイプ初期化子が例外をスローしました。 場所 java.lang.System.getSecurityManager() どうすれば解決できますか?教えてください。お願い致します。

DateTimePickerで選択した日について

$
0
0
VB2005を使用して開発しています。 DateTimePickerで表示されるカレンダーにて、グレーになっている日(前月か翌月の日) を選択したか判別する方法はありますでしょうか。 ご存知の方がいらっしゃいましたらご教授ください。 宜しくお願いします。

VBで現在起動中のFireFoxのURLを...

$
0
0
VisualBasicで、現在起動中の全ての FireFoxのURLとタイトルを取得するにはどうしたらいいでしょうか? IEのURLとタイトルは取得できました。(SHDocVw.dllなんてのを使ったサンプルがありました) VBがMSだからIEしかできないんでしょうか。

VB6.0、スペース区切りでSplit関数。""

$
0
0
「kkk4 "バージョン 6" 23」 このような文字列(コマンドライン引数)をsplitで分割したいです。 ""で囲った部分は一続きとして配列に入れたいです。 なので期待としては ary(0)・・・kkk4 ary(1)・・・"バージョン 6" ary(2)・・・23 となってほしいですが、バージョンと6の間にスペースがあるので ary(0)・・・kkk4 ary(1)・・・"バージョン ary(2)・・・6" ary(3)・・・23 となってしまいます。 これを期待通りにするにはどうすればいいでしょうか? ""は実際には後で外そうと思っています。(「バージョン 6」という文字列が必要) ""が使えないかと思って一時的につけているのです。 大変恐れ入りますが、よろしくお願いします。

Do...Loopにつてご教授ください

$
0
0
Visual Basicの課題で、 3+3²+3³+・・・3n乗で、500から50000の間に入る数字は 何個あるか?を求めるアプリを作らなければいけないのですが、 Do...Loop構造の繰り返し処理が理解できていないために解答 することができません。 解答と考え方をご教授いただけば大変助かります。 どうぞよろしくお願いいたします。

EXCEL VBA クエリーテーブルの更新

$
0
0
EXCEL2007 ワークシートのクエリーテーブルの更新で、メールで毎日送られてくる同じ形式のCSVデータで更新したいのですが、ファイル名はいつも違います。ダイアログボックスを開かずに、ファイル名(パスは固定)を指定して更新するマクロは作成可能でしょうか? OUTLOOK で添付ファイルを指定のパスへ保存するマクロはできています。 同じファイル名で保存するのは避けたいと思っています。 外部データ範囲のプロパティの”ファイル名確認のチェック欄”をはずすとファイル名が同一の必要があり出来ないと思います。 ダイアログボックスでファイルをしてするとオペレーターが間違う可能性があるので、 OUTLOOKで保存したファイル名を指定して更新したいのです。 よろしくお願いいたします。

VBでFFFTPのように外部のサーバーを操作

$
0
0
VisualBasicでFFFTPのように外部にあるサーバーのフォルダやファイルをツリー状に表示させ操作したいのですが... FtpConnectServerでサーバーへ接続し、FtpPutやFtpGetで直接記述しての操作はできてます。 でもやはりビジュアルにやりたいのです。 どうすればいいのか、どなたか教えてください。

生産予定の見える化

$
0
0
いつもお世話になっております。 早速ですが、現在会社で生産の進捗がわかるソフトを開発中です。 生産予定を絵として見たいのでラベルを積み重ねて表示しています。 例) 生産1 8:20~9:00 作業時間が40分なのでラベル幅40に設定 生産2 9:00~10:00 作業時間が60分なのでラベル幅60に設定し、生産1ラベルの左位置値+生産1ラベル幅の位置を求め生産2ラベル配置 といった感じで作成しています。 この組み方の問題点は解像度の変化に臨機応変に変動しないことです。 解像度変化時等伸縮が臨機応変に変化できるような組み方何かないものでしょうか? 教えてください。 開発環境 vb2010Express

エクセルVBA ブック間のコピー

$
0
0
選択したテキストファイルをエクセルで開いたコピーし、 もう一つ開いたエクセルファイルにペーストするというマクロをVBAで 作成していますが、つまずいてしまいました。 ----------------------------------- Dim wb1 As String Dim wb2 As String Sub Opentxt() wb1 = Application.GetOpenFilename("テキストファイル,*.txt") If wb1 <> "False" Then Workbooks.OpenText Filename:=wb1, DataType:=xlDelimited, comma:=True End If End Sub Sub Copy() Dim LastRow As Long wb2 = Application.GetOpenFilename("Microsoft Excelブック,*.xls?") If wb2 <> "False" Then Workbooks.Open wb2 LastRow = wb2.Sheets("一覧表").Range("A" & Rows.Count). End(xlUp).Row wb2.Sheets("一覧表").Range("A5:A" & lastRow).Copy _ wb1.Sheets("Sheet1).Range("B33") End If End Sub ----------------------------------- Opentxtの方は問題ないですが、Copyの方を実行すると wb1とwb2で引っかかって「コンパイルエラー/ 修飾子が不正です」と 表示されて、エラーになってしまいます。 この場合変数の型などがおかしいのでしょうか? excel2007を使用しています。 よろしくお願いします。

VBでHTMLの分析にNTidyを使いたい

$
0
0
VBでHTMLの分析のためにNTidyを使いたいのですが、 「Dim status As TidyStatus = doc.LoadFile("C:\index.html")」は問題なく分析できるのですが、 「Dim status As TidyStatus = doc.LoadFile("http://www.abcde.co.jp/index.html")」とやるとエラーになります。 どうやればいいんでしょうか
Viewing all 7264 articles
Browse latest View live


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>