[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 2chのread.cgiへ]
Update time : 05/17 16:00 / Filesize : 172 KB / Number-of Response : 794
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

VBプログラマ質問スレ(6.0以前) Part55



1 名前:デフォルトの名無しさん [2009/07/13(月) 21:12:36 ]
ここは Visual Basic 〜6.0 の質問スレです。
質問者は使用しているOS、VBのバージョン、サービスパックのバージョン、
「何がしたくて、どうしたけど、どう困っているのか」を明確に書きましょう。

VB.NETは別物なので専門スレで、VBA、APIの質問もそれぞれのスレで。

○ 質問者の心得
 一.質問する前にMSDNやGoogle、過去ログにも目を通してみる。
 二.VBScript、インストーラーなどはこのスレでOK。
 三.質問は第三者にもわかりやすいよう簡潔かつ具体的に。
 四.荒らしは相手しない。

○ 回答者の心得
 一.答えられない質問は無駄に罵倒せずスルー。無理するな。
 二.代用法を強制しない。
 三.回答する上で必須ではない情報をむやみに聞き返さない。
 四.荒らしは相手しない。
 五.VB情報募集中。
 六.回答は質問者が理解できるよう具体的に。

MSDN Online Japan ホーム
 www.microsoft.com/japan/msdn/default.asp
Visual Studio 6.0 Service Pack 6
 msdn.microsoft.com/vstudio/downloads/updates/sp/vs6/sp6/default.aspx
Google
 www.google.co.jp/

※「まず自分で調べる」クセを身につけよう。


653 名前:デフォルトの名無しさん mailto:sage [2010/04/22(木) 01:00:29 ]
これがVB脳の恐怖か....

654 名前:デフォルトの名無しさん mailto:sage [2010/04/22(木) 01:08:15 ]
ListViewは数字でのソートが・・・上位桁に0埋めて桁合わせないと数字の大きさ順にソートしてくれなかった

655 名前:デフォルトの名無しさん mailto:sage [2010/04/22(木) 01:09:28 ]
>>653
おまえは鳩山か?

656 名前:デフォルトの名無しさん mailto:sage [2010/04/22(木) 07:08:37 ]
バブルソートでおk

657 名前:デフォルトの名無しさん mailto:sage [2010/04/22(木) 10:38:20 ]
>>652
「ListViewソート機能の否定」ならわかるんだが
単に「ソート機能の否定」ってと「ソートすんな」だよね?
ListViewじゃなくてオブジェクトで「ソートしよう」って言ってるのに、なんで「ソートすんな」なんだ?

658 名前:デフォルトの名無しさん mailto:sage [2010/04/22(木) 16:05:16 ]
>>651
しかし見た目を掌るListViewが見た目のソートを持たないというのも微妙な気が。
データそのものやその扱い自体のソートなら内部で持つべきだと思うけど。

ともかく。
ふつうにはやりにくい、でいいのかしら?
>>642のひとの手法が知りたい…使い物になるのかはさておいて。

659 名前:デフォルトの名無しさん mailto:sage [2010/04/22(木) 16:14:21 ]
ListViewの昇順降順くらい

Private Sub ListView1_ColumnClick (ByVal ColumnHeader as ColumnHeader)
Let ListView1.SortKey = ColumnHeader.Index-1
Let ListView1.SortOrder = lvwAscending :Rem 昇順。降順ならlvwDescending
Let ListView1.Sorted = True
End Sub



660 名前:デフォルトの名無しさん mailto:sage [2010/04/22(木) 17:28:33 ]
すると、クリック毎に入れ替えると

ListView1.SortKey = ColumnHeader.Index - 1
If ListView1.SortOrder = lvwAscending Then
ListView1.SortOrder = lvwDescending
Else
ListView1.SortOrder = lvwAscending
End If
ListView1.Sorted = True

かな

661 名前:デフォルトの名無しさん mailto:sage [2010/04/22(木) 17:53:22 ]
lvwAscendingとlvwDescendingの値は1と0だから
ListView1.SortOrder=1-ListView1.SortOrder
でおk



662 名前:デフォルトの名無しさん mailto:sage [2010/04/22(木) 17:55:01 ]
Withくらい使えよ・・

663 名前:デフォルトの名無しさん mailto:sage [2010/04/22(木) 18:13:32 ]
Withとかきめぇ

664 名前:デフォルトの名無しさん mailto:sage [2010/04/23(金) 17:57:51 ]
>>594
やってみた
RichTextBoxでjavaファイルをTeraPad風に色とボールドしてみた
ファイルを読み込んだ時だけ色・ボールドするので
中身編集すると・・・めちゃくちゃにはなる
やり方が悪いのかもしれんがファイル大きいと結構時間かかる

結論:RichTextBoxでやるのは無理がある

665 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 07:09:38 ]
>>594 >>664
こんなんどう?
非表示でIEやリッチテキストに描画させて、それをPicture内に再描画して提供。
右クリックやドラッグなどの処理は透過的に処理する。

まぁ面倒くさい事に変わりはないな。



666 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 07:25:57 ]
それだと文字位置などの管理が無理だな
すべて自分で描画したほうがラクだろ

667 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 08:11:32 ]
>>666
そうかね?
クリックも全部裏のコントロールに渡せばカーソル位置や文字の選択もそっちが勝手にやってくれるんじゃない?
実際に試して話してるわけじゃないけど。

668 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 08:22:24 ]
実際試してみろよ
そもそもそんな使い方ならピクチャに再描画する意味なんてないだろ

669 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 08:36:17 ]
>>668
意味は、うーんあんまないかもなw
描画エンジンを自前で作りたくないし、リッチテキストの処理は非常にめんどくさいのでパスしたいのさ。
俺がやるなら内部にIE一匹飼ってHTMLで表示を作る。CSS使って自由度高いし。
で、入力はフックしてHTMLに変換して制御とか。

670 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 09:05:00 ]
入力部(カーソルなど)が問題だってのになにいってんの

671 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 09:18:24 ]
>>603がすばらしいじゃん



672 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 09:23:00 ]
笑えない冗談だ

673 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 09:26:10 ]
www7a.biglobe.ne.jp/~sigotnin/delphi.htm
これ使えない?

674 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 09:29:08 ]
まあ>>603にはかなわないか

675 名前:デフォルトの名無しさん [2010/04/24(土) 20:56:25 ]
>>603みたいなやり方だと
日本語入力とか出来ないよね?
KeyDownやKeyPressイベントじゃIMEとかの日本語入力使えないよね?

676 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 21:29:22 ]
え?どこに入力が?

677 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 21:33:29 ]
IMEの制御くらいAPIでいくらでもできますよ

678 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 23:26:26 ]
>>594のってエディタ作るんでしょ?>>603のってエディタになってなくね?

679 名前:デフォルトの名無しさん mailto:sage [2010/04/24(土) 23:48:22 ]
だからみんな相手してないんじゃん

680 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 00:54:56 ]
まあRitchTextBoxを使うのが一番簡単だとは思う。
入力した文字にシンタックスカラーがリアルタイムで適用されるような
応答性の高いものは難しいと思うけど、以下の方針で作ればそれなりに
実用的なものはできるんじゃないか。

- テキストの解析とシンタックスカラーの適用は、タイマーを使って一定時間ごとに一行ずつ行う。

- 上記タイマーは、Changeイベントで起動し、全行の解析が完了時点で停止する。

- 行の解析は、タイマー起動時の現在行か、またはその1行上の行から開始する。

- 行番号表示は、左側にもう一つ別の行番号専用のRitchTextBoxを置いて実現する。

681 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 00:59:51 ]
VB厨はコントロールに頼りすぎる



682 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 01:22:40 ]
>>680
そんなアホな事をする位だったら自作したほうがラクだろ?

683 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 01:34:19 ]
>>682(あと>>681)
またそういう寝ぼけた事を言う。
そう思うならやってみたら?
まあやってみなきゃ大変さが分からない時点で君がダメグラマなのは確実だな。

エディタの類はVBじゃなくても一から実装するのは難しい部類に入るプログラムなのに、
低レベルのコーディングにまったく向いてないVBでやったら気が狂うこと確実だわ。

しかし、エディタを書けるかって質問して舐めたこというかどうかで
ダメな奴を見分けられそうだよなw

684 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 01:43:30 ]
寝ぼけた事を言ってるのは>>680(あと>>683)だが

685 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 01:46:04 ]
682だけど、
以前やってみたから言ってんだよ。

686 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:37:31 ]
やってるわけがない。
やってたら>>682みたいな戯言が言えるはずがない。
だからVB厨って言われる連中はダメなんだ。

687 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:42:33 ]
ではお前が作ったRutchTextBoxを使ったエディタを見せてくれないか?
俺はリアルタイムの色変更とスクロール、文字位置制御で挫折したんだ
えらそうに言うくらいだから、できたんだろうな?

688 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:44:34 ]
>>680
些細なことだけど
×RitchTextBox
○RichTextBox


689 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:44:38 ]
技術的な難易度を指摘してるだけなのに、いつのまに俺がRutchTextBox(笑)
を使ったエディタを作ったことになってるんだろう。

訳がわからん。

690 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:45:22 ]
>>687
些細なことだけど
×RutchTextBox
○RichTextBox

691 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:46:30 ]
>>689
てめえが難癖つけてきたんじゃねえか糞野郎!!!!!



692 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:47:09 ]
>>680
行番号表示って、編集してるほうのカーソル位置とかスクロールに合わせてスクロールさせるんだよね?
RitchTextBoxのスクロール量の取得・設定てどうやるの?

693 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:52:34 ]
VB6のIDEだと編集中の行は色づけが解除されるよね

694 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:53:12 ]
>>692
↓の454のサンプルの方法で可能なはずだと思った。
もう長いことVB6使ってないんで記憶が確かなら、だけど。
web.archive.org/web/20030110071501/www.vbvbvb.com/jp/gtips/index0451.html

695 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:53:44 ]
解除されるのでもいいから、リッチテキストでやってみろよ

696 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 03:07:47 ]
>>692
ごめん、君の文章を少し読み間違えてたようだ。
でも>>694のサンプルにはそれも一応載ってるな

697 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 04:06:19 ]
OS、Windows2000じゃないんですけど

698 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 04:07:02 ]
めちゃくちゃ重いサイトだな

699 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 04:33:29 ]
>>692
API

700 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 07:27:25 ]
GWはテキストエディタつくろーっと

701 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 23:25:04 ]
別にあなたが何しようとどうでもいんですけど・・・^^;



702 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 23:30:53 ]
気になるくせにーw

703 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 23:44:19 ]
反応早すぎだろうw
気にしてるのがどっちか丸分かりじゃねーかw

704 名前:デフォルトの名無しさん mailto:sage [2010/04/25(日) 23:52:19 ]
一日中2ちゃんしてるからw

705 名前:デフォルトの名無しさん mailto:sage [2010/04/26(月) 14:15:51 ]
VB6でデータベースの列を追加する方法か、その内容をひっかけられるMSDNの語句を教えていただけないでしょうか。
.NETやC#ならすんなり当たるのに…世の中つらい。

706 名前:デフォルトの名無しさん mailto:sage [2010/04/26(月) 14:17:14 ]
alter tableするだけじゃねーの?

707 名前:デフォルトの名無しさん mailto:sage [2010/04/26(月) 14:31:02 ]
扱いは追加じゃなくて変更なのか…d。
ググるとそこそこあたるので探ってみる。

708 名前:デフォルトの名無しさん mailto:sage [2010/04/26(月) 17:31:07 ]
つうか、SQLの知識のほうじゃねぇか…

709 名前:デフォルトの名無しさん mailto:sage [2010/04/26(月) 20:55:03 ]
>>708
ああ、そうか… って、VBでSQLなスレ見つけたけど、中身がわりと残念な進行してるねえ。
むこうで聞いて大丈夫だろうか?

710 名前:デフォルトの名無しさん mailto:sage [2010/04/26(月) 21:29:41 ]
DBはDB板へ

711 名前:デフォルトの名無しさん mailto:sage [2010/04/27(火) 02:33:05 ]
>>705
まずどうやってデータベースに接続してるのか?
まあ、DAO.TableDefかADOXを調べてみろ

つかここ見れば解決
msdn.microsoft.com/ja-jp/library/cc948693(v=msdn.10).aspx




712 名前:デフォルトの名無しさん mailto:sage [2010/04/27(火) 18:50:25 ]
VB6付属のMSDNライブラリのVBのLogの項目で

Static Function Log10(X)
Log10 = Log(X) / Log(10#)
End Function

ってあったんだけど、これってStaticつけられてるけど何か意味があるの?

713 名前:デフォルトの名無しさん mailto:sage [2010/04/28(水) 12:07:17 ]
実行速度が遅くなる以外は違いがない気がするな

714 名前:デフォルトの名無しさん mailto:sage [2010/04/28(水) 13:22:42 ]
インスタンス無くてもアクセスできる

715 名前:デフォルトの名無しさん mailto:sage [2010/04/28(水) 14:01:46 ]
なぜインスタンスが?

716 名前:デフォルトの名無しさん mailto:sage [2010/04/28(水) 14:16:03 ]
C++とは意味が違う

717 名前:デフォルトの名無しさん [2010/04/28(水) 19:20:06 ]
Property Let とか Property Set は斬新だった


718 名前:デフォルトの名無しさん mailto:sage [2010/04/29(木) 09:35:43 ]
b() = Inet1.OpenURL(strURL, icByteArray)
でバイト配列にデータを格納したら
そのあとは
どんなプログラムを書けばハードディスクに記憶できるのか

719 名前:デフォルトの名無しさん mailto:sage [2010/04/29(木) 10:30:15 ]
ファイルを作って書き込めばいい。

720 名前:デフォルトの名無しさん [2010/04/29(木) 11:18:24 ]
>>718

b = Inet1.OpenURL(strURL, icByteArray)
fn=FreeFile()
Open "File.txt" For Binary As #fn
Put #fn, , b
Close #fn

721 名前:デフォルトの名無しさん mailto:sage [2010/04/29(木) 11:32:29 ]
サンクス



722 名前:デフォルトの名無しさん mailto:sage [2010/04/30(金) 01:06:10 ]
またVB厨か
el.jibun.atmarkit.co.jp/minagawa/2010/04/post-ebc4.html

723 名前:デフォルトの名無しさん [2010/04/30(金) 02:19:34 ]
>>720
この方法のヤバさと言ったら
File.txtが既に存在していて
書き込むbのサイズよりファイルサイズが大きい場合だよね
超ヤバイ

724 名前:デフォルトの名無しさん mailto:sage [2010/04/30(金) 05:57:50 ]
なにが?

725 名前:デフォルトの名無しさん mailto:sage [2010/04/30(金) 09:58:29 ]
引き出したい言葉を普通に質問すればいいのに

726 名前:デフォルトの名無しさん mailto:sage [2010/04/30(金) 15:25:44 ]
>>723
サンプルにエラー処理の事でつっこむとかバカなの?

727 名前:デフォルトの名無しさん mailto:sage [2010/04/30(金) 15:27:14 ]
>>722
60年代前半生まれだしな

つうかSAPて言語・・・なのか?w

728 名前:デフォルトの名無しさん [2010/04/30(金) 17:33:14 ]
>>726
エラー?

729 名前:デフォルトの名無しさん [2010/05/04(火) 00:24:00 ]
つい最近、Trueの値が-1である理由に気づいた。
もう10年以上(まぁかなりの素人ではあるけれど)プログラミングに触れてきてるのにね。
2の補数のビットで表現してたって本当つい3日前に気づいた
Falseがビットが全部0に対してTrueはビットが全部1
ビットが全部1だと2の補数だと-1になるという・・・
ずっと昔から、何で1じゃなく-1なんだろうと思ってた・・・その疑問がやっと解決した・・・


730 名前:デフォルトの名無しさん mailto:sage [2010/05/04(火) 00:39:23 ]
全部0とそれ以外
それだけだと思うんだ

731 名前:デフォルトの名無しさん mailto:sage [2010/05/04(火) 00:43:18 ]
Debug.Print "True="; CInt(True) ' -1
Debug.Print "False="; CInt(False) '0



732 名前:デフォルトの名無しさん mailto:sage [2010/05/04(火) 00:44:56 ]
CBool(1) さて・・・どっち?

733 名前:デフォルトの名無しさん mailto:sage [2010/05/04(火) 00:46:46 ]
誰もそんな話してないけどな。

734 名前:デフォルトの名無しさん mailto:sage [2010/05/04(火) 00:46:47 ]
Dim a,b
a=10
b=20
Debug.Print CInt(a < b)

735 名前:デフォルトの名無しさん mailto:sage [2010/05/04(火) 12:02:02 ]
宇宙線の影響を考えると1ビット反転でコンピュータ障害がおきかねないな



736 名前:デフォルトの名無しさん [2010/05/04(火) 23:28:37 ]
原因不明のエラーはWindowsMeのせいじゃなくて、宇宙線のせいだったんだな。それなら仕方ないな。

737 名前:デフォルトの名無しさん mailto:sage [2010/05/05(水) 00:40:56 ]
ageてまで言うような事なのか?

738 名前:デフォルトの名無しさん mailto:sage [2010/05/05(水) 01:01:06 ]
そこはスルーしとけ

739 名前:デフォルトの名無しさん mailto:sage [2010/05/05(水) 10:32:50 ]
なんでもWindows Meのせいにするのは天江衣

740 名前:デフォルトの名無しさん mailto:sage [2010/05/06(木) 00:59:32 ]
顧客「おたくのアプリケーション、ちょくちょくエラーが出るんですけど
営業「宇宙線の影響なので仕方ありません
顧客「なんだ宇宙線のせいなのか。それならば仕方ないな。

使える!

741 名前:デフォルトの名無しさん mailto:sage [2010/05/06(木) 10:00:50 ]
ねーよwwww



742 名前:デフォルトの名無しさん mailto:sage [2010/05/07(金) 23:52:26 ]
なんのためのECCか

743 名前:デフォルトの名無しさん [2010/05/08(土) 00:17:54 ]
英語塾?

744 名前:デフォルトの名無しさん mailto:sage [2010/05/09(日) 00:23:58 ]
ECCで訂正できるのって1bitのミスだけで2bit以上は検出だけじゃなかったっけ

745 名前:デフォルトの名無しさん mailto:sage [2010/05/09(日) 00:28:41 ]
ミスるメモリだとわかる点だけでも価値はあったんだぜ

746 名前:デフォルトの名無しさん mailto:sage [2010/05/09(日) 00:31:56 ]
エラー検出訂正 (error detection and correction)?

747 名前:デフォルトの名無しさん mailto:sage [2010/05/09(日) 02:32:50 ]
クラスモジュールでグローバルな変数・定数・メソッドを使うのに抵抗があります

748 名前:デフォルトの名無しさん mailto:sage [2010/05/10(月) 10:01:21 ]
>>747
それは明らかにおかしい
必要ならば使うしかないだろ


749 名前:デフォルトの名無しさん mailto:sage [2010/05/10(月) 14:40:47 ]
俺は使いまくり。とても人に見せられるソースじゃない

750 名前:デフォルトの名無しさん mailto:sage [2010/05/10(月) 19:30:36 ]
グローバル変数は害悪
定数やメソッドは問題ない

751 名前:デフォルトの名無しさん mailto:sage [2010/05/12(水) 14:03:49 ]
>>750
そのへん含め.NETになったと聞いたけど、そうなのかしら? .NET触ったことないからよくわかんないけど。

ところで。
Windows7でMSCommがマトモに動いてくれないのだが、なにか情報出てたりしますか?
MSComm使って無さそうなソフトだと(ActiveX?)普通に受信するのに
MSComm32を使ったアプリだと、[ 通信デバイス読み取り時にエラーが発生しました(8020) ] を返してくる…。

USBtoシリアルとWindows7の組み合わせが悪いのか、Windows7だけの話なのか?



752 名前:デフォルトの名無しさん mailto:sage [2010/05/12(水) 14:13:30 ]
うちの環境で

DELLノート Win7+エレコムのUSBシリアル
でソフト書いても問題なかったけどなぁ
VB6でもC#でも

753 名前:デフォルトの名無しさん mailto:sage [2010/05/12(水) 14:21:08 ]
APIで書き直せばおk

754 名前:デフォルトの名無しさん mailto:sage [2010/05/12(水) 14:36:04 ]
>>752
マジカ
おのれIOデータ

とりあえず、受信バッファに何かあるときに MSComm.Inputすると出るの。
それ以外は出ないし送信もできるのに…。

>>753
それは最終手段にしたい…。

755 名前:デフォルトの名無しさん mailto:sage [2010/05/12(水) 19:53:45 ]
まず本当にOSの問題かどうかの裏をとろうよ。
そんなこと言ってるからVB厨とか言われちゃうんだよ。

756 名前:デフォルトの名無しさん mailto:sage [2010/05/12(水) 20:03:34 ]
IOデータってOSなの?

757 名前:デフォルトの名無しさん mailto:sage [2010/05/12(水) 20:09:54 ]
おのれIOデータのUSBシリアルめ、という意味なんだろう

758 名前:754 mailto:sage [2010/05/12(水) 22:38:13 ]
IOデータのサポートに言ったら、他にそういう報告はないとのこと。
とりあえず1世代前の製品の最新ドライバ入れてみてという変なこといわれた。
やったら治った。

なんぞーっ
ドライバがこなれてないのかしら。

>>755
XPで起こらないのは確認済み。

759 名前:デフォルトの名無しさん mailto:sage [2010/05/15(土) 01:44:06 ]
自分に限界を感じた
データベースというのがさっぱり理解できない
データベースそのものもわけわからんのだが
それを扱うメソッドもよくわからん
VisDataもヘルプ読みながら使ってみたがよくわからん
これは
もう完全にセンスの問題だと思う。俺のプログラミングに関するセンスがダメなんだと思う
家計簿的なもの作ってやろうじゃんと思ったけど
さっぱりだ。
そもそもデータベースの入門書みたいな本とかもまったく理解できなかった
これは致命的だろう
ああ、くそだ

760 名前:デフォルトの名無しさん mailto:sage [2010/05/15(土) 02:30:57 ]
バイナリアクセスモードでファイル開いて
putやgetでstringの読み書きって半角や全角や制御コードとか全部2バイトデータかな
dim s as string * 20
put #1, , s
put #1, , n&

get #1, , s
get #1, , n&
で取り出せるよね? sの内容にかかわらず


761 名前:デフォルトの名無しさん mailto:sage [2010/05/15(土) 02:31:58 ]
回答待つより自分で試したほうが早いか・・・やってみるお



762 名前:デフォルトの名無しさん mailto:sage [2010/05/15(土) 08:23:17 ]
>>759
こういう人が居ると安心する。
自分は頭がよくてよかった。

763 名前:デフォルトの名無しさん mailto:sage [2010/05/16(日) 12:49:35 ]
>>759
マジレスしたら
センスの有無はあるだろうけど
要は慣れだと思う

俺でもできるんだ
俺だって最初はまったく理解できなかった

764 名前:デフォルトの名無しさん mailto:sage [2010/05/16(日) 21:18:53 ]
>759
DBを使わず、自分でファイルの読み書きするプログラムを書いたことはある?
まずはそれからだと思うが・・・」


765 名前:デフォルトの名無しさん mailto:sage [2010/05/17(月) 01:29:14 ]
>>759
その「入門書」のタイトルを教えてくれれば、
何かアドバイスできるかも知れないな。
(もっと適切な入門書を紹介するとか)

766 名前:759 mailto:sage [2010/05/17(月) 01:47:04 ]
なんかいっぱいレス下さって・・・意外です^^;

>>762 士農工商より下の位がいるみたいな感じっすかね

>>763 もう諦めの境地ですから、試行錯誤的にやってみてもエラーメッセージとか意味不明すぎて
 MSDNの説明じゃ要領得なくて、ネット検索とかもう探すの面倒になりましたっす

>>764 当初は、DB使わず、データをLongやStringの配列で自前でデータ管理しようと試みたんすけど
 データを表示する表みたいなコントロール?(DataGridとか)がイマイチ使い方が理解できなくって
 そのコントロールってデータベースのデータ使ったほうがいいのかなって思って
 データベースに挑んでみたですけど、まぁ忍耐の限界っす

>>765 書籍タイトルはちょっと分からんです、図書館で立ち読みでしたので
 データベースの本はほとんどMicrosoftAccessの使い方の本ばっかでそれらは読んでないです
 大学時代に一応データベースの授業受けたんですけど、ちんぷんかんぷんで、出席点だけで単位を貰った感じっす

まぁ趣味でやってる程度なんで、どうしても出来る必要ってないんで
でもみなさんの気持ちには感謝っす
 



767 名前:デフォルトの名無しさん mailto:sage [2010/05/17(月) 02:00:26 ]
あきらめろよ。

768 名前:759 mailto:sage [2010/05/17(月) 02:08:47 ]
>>767
書き損ねましたっすが、はい、あきらめてます

769 名前:デフォルトの名無しさん mailto:sage [2010/05/17(月) 02:27:49 ]
愚痴るだけとか士ねよ

770 名前:デフォルトの名無しさん mailto:sage [2010/05/17(月) 02:33:17 ]
家計簿程度ならエクセルで十分なキガス

771 名前:デフォルトの名無しさん mailto:sage [2010/05/17(月) 15:42:08 ]
初心者ならVBAでいいな



772 名前:デフォルトの名無しさん mailto:sage [2010/05/17(月) 17:51:52 ]
でもまぁ、集計とかその辺が入るしなぁ
どうせやるならDBだろ と思うんだが

773 名前:デフォルトの名無しさん mailto:sage [2010/05/17(月) 18:03:02 ]
趣味で古いVB使うってどんな状況なんだ?

774 名前:デフォルトの名無しさん mailto:sage [2010/05/17(月) 20:02:03 ]
>>773
使わなくなったVBを貰ったとかいうのはどうか。
あとは昔からのBASICはよく知ってるんだが、.NETの具合にクラクラしたとかどうか。

775 名前:デフォルトの名無しさん mailto:sage [2010/05/17(月) 20:35:32 ]
>>576
>>579

776 名前:デフォルトの名無しさん [2010/05/17(月) 21:29:52 ]
質問させて下さい。
VBScriptを使用して開発を行う際、
何のエディタを使っていらっしゃいますか。

ASP(VBScript+HTML)で開発することになったのですが、
使用するエディタを何にしようか迷っています。
詳しい方がいらっしゃいましたら教えていただきたいです。

※候補としてはVisual web developer 2008 expressを考えています。

777 名前:デフォルトの名無しさん mailto:sage [2010/05/17(月) 22:12:39 ]
趣味で家計簿みたいなのを作るならExcelVBAがいいと思うよ。
表みたいなやつはもともとデフォルトでついてるし(Excelだから)
結構いろんなこともできる。
VBで画面作ってデータベースに接続して・・・・となるとそりゃ
趣味の範囲としては難しいよ。

778 名前:デフォルトの名無しさん [2010/05/19(水) 01:33:39 ]
複数のテキストボックスをテキスト形式で保存するプログラムを作成しています。
なんとか「保存」「読み込み」のボタンを設置し異常なく作動しました。
ここまではいいのですが、よく考えたら起動時に自動で読み込んでくれると
便利だと思うのですが、検索してもなかなか出てきません。
お詳しい方ご教授頂けると嬉しいです。宜しくお願い致します。


779 名前:デフォルトの名無しさん mailto:sage [2010/05/19(水) 01:36:24 ]
Form_Loadで処理すればいいんじゃないの?いや、俺も初心者レベルだけど

780 名前:デフォルトの名無しさん mailto:sage [2010/05/19(水) 01:47:47 ]
Private Sub Form_Load()
Dim f As New FileSystemObject
Dim t As TextBox
For Each t In Text1
t.Text = f.OpenTextStream("Data" & t.Index & ".txt").ReadAll()
Next
End Sub

こんな感じ?


781 名前:779 mailto:sage [2010/05/19(水) 01:55:47 ]
>>780も俺のレスだけど、>>779,780は無かったことにして欲しい。俺の勘違いだった



782 名前:778 [2010/05/19(水) 09:47:49 ]
すいません追加事項を
起動時に自動で読み込み、なおかつ参照ファイルが存在しなければ
作成する。を追加でお願いします。


783 名前:デフォルトの名無しさん mailto:sage [2010/05/19(水) 15:18:27 ]
>>758
マジで? おれも数ヶ月前に同じようなこと聞いて同じような回答をもらったが、あきらめて
Ratocのやつに買い換えたよ。
もう一度試してみる価値ありかもな。

784 名前:デフォルトの名無しさん mailto:sage [2010/05/20(木) 00:30:58 ]
>>782
よくわからんけど、どういうことなの?

785 名前:デフォルトの名無しさん mailto:sage [2010/05/20(木) 00:38:19 ]
自分で考えるつもりはなくて
人に作って欲しいってことじゃね?w

786 名前:デフォルトの名無しさん mailto:sage [2010/05/20(木) 00:46:35 ]
MDIフォームで作ってんのか?

787 名前:デフォルトの名無しさん mailto:sage [2010/05/20(木) 00:54:11 ]
>>778の言いたいことを少しずつみんなで推理していこう
まずこれ
>複数のテキストボックスをテキスト形式で保存するプログラムを作成しています


う〜ん・・・
複数のテキストボックスをテキスト形式で保存???
これは・・・・テキストボックスの内容をテキスト形式のファイルに保存してるってことなのかな?
1つのテキストボックスに対してファイルを一つ用意するのかなぁ・・?



788 名前:デフォルトの名無しさん [2010/05/20(木) 22:24:38 ]
age

789 名前:デフォルトの名無しさん mailto:sage [2010/05/21(金) 00:50:30 ]
フォームロード時にファイルシステムオブジェクト使えば簡単に処理できます

790 名前:デフォルトの名無しさん mailto:sage [2010/05/21(金) 16:01:21 ]
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\wmi")
Set colitem = objWMIService.ExecQuery _
("Select * from WmiMonitorID")
For Each objitem in colitem
Wscript.Echo
Wscript.Echo "シリアル: "& objitem.SerialNumberID[]
Next

win7ですが、シリアル採集できるはずですが、ステートメントの末尾が不正エラー出ます。
YearOfManufactureとかは採集できますが、[]のなかになにかいれないとだめなんでしょうか。

791 名前:デフォルトの名無しさん [2010/05/21(金) 17:03:55 ]
角かっこを私は知らない



792 名前:デフォルトの名無しさん mailto:sage [2010/05/21(金) 17:17:07 ]
かっこわるい

793 名前:デフォルトの名無しさん mailto:sage [2010/05/21(金) 17:22:47 ]
ひとまずwinmgmtsでググってみたよ
おれには分からない






[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<172KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef