WindowsNT4.0(SP6)上で、VB5(SP3)で作成したアプリケーションからAccess98のレポートをオープンし、オープンしたレポートのページ設定(用紙サイズ)をVBのプログラム内部で設定できるようにしました。

用紙サイズを設定するときは 指定したレポートの PrtDevMode プロパティのメンバ PaperSize に PaperSizeメンバ値(8=A3、9=A4、10=A4 Small、11=A5 等)をセットするとうまく行きました。

しかし問題なのが、Windowsのプリンタ設定のサーバーのプロパティで作成した用紙サイズをレポートの用紙サイズに設定しようと思っても、PaperSizeメンバ値(用紙番号)がわからないため、設定できません。

サーバープロパティで作成した用紙の用紙番号をVBで取得する方法がありましたら是非教えて下さい!

ネット上でいろいろ調べているのですが見つかりません。
1つだけ同じ内容のものを見つけたのですが、使用しているソフトが Delphiだったのでダメでした。

どうかよろしくお願いします。m(__)m

A 回答 (2件)

DeviceCapabilities関数で用紙番号と用紙名を列挙出来ます


参考URLの0327, 0328参照

参考URL:http://www.vbvbvb.com/jp/gtips/index.html
    • good
    • 0
この回答へのお礼

ありがとうございます。
2つのサンプルプログラムを参考にして、うまくいきました。)^o^(

お礼日時:2001/10/19 16:18

通常使うプリンタの用紙をサーバープロパティで作成した用紙


に設定した後、VBでPrinter.PaperSizeの値はどうなりますか?

この回答への補足

お返事ありがとうございます。

確かにこの方法だとPrinter.PaperSizeから値を取得できます。

しかし、この値をプログラム内に固定値で組込むのは問題があります。
例えば、作成した用紙を一度削除して作り直したりした場合、別の値になってしまう可能性があるからです。

あと、API関数のEnumFormsで用紙情報を取得して、用紙名は列挙する事は出来たのですが、これって用紙番号は取得できないですよね?

補足日時:2001/10/19 10:51
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

QねじのISO規格とJIS規格の違いについて

ネジの種類にもいろいろありますが、メネジでJIS規格の M28 P1.0とISO規格の M28 P1.0 H6ではどのように違うのでしょうか。JISはねじのJISをもっているので把握していますが、ISOの情報がありません。参考文献等ありましたら教えてください。お願いします。(引っ掛かりの高さ、谷の径、有効径、内径等、比較できる寸法を教えてください)

Aベストアンサー

tyoku さん おはようございます。

JISハンドブックはお持ちでしょうか?ご質問のメ-トル細目ねじB0207の冒頭に 「備考 この規格の本体に規定する直径とピッチの組み合わせ,小ネジ類,ボルト,ナット用の細目ねじの選択基準,規準山形および基準寸法は,次のISOと一致している」
直径とピッチとの組み合わせ:ISO261
細目ねじの選択基準:ISO262
規準山形:ISO68
基準寸法:ISO724

つまり同じじゃないんですか?
http://www.jsa.or.jp/

QVBからEXCELで印刷するときにユーザー設定用紙を設定したい

こんにちわ。
VBからEXCELにデータを書き込み、印刷したいのですが、
EXCELはフォーマットシートをあらかじめ作成し、それを開いてデータを埋め込んでいます。
そのとき、フォーマットシートのほうでは用紙サイズをユーザー設定にして幅・高さを指定しているのですが、違うプリンタで印刷すると、A4サイズになってしまいます。
VBから用紙のサイズを設定できる方法はあるのでしょうか?
よろしくお願いします。

Aベストアンサー

VBAから印刷用紙のタイプを設定することは可能ですし、ユーザー定義サイズを選択することも可能ですが、ユーザー定義サイズのサイズそのものを変更することは出来ないと思います。ユーザー定義サイズの変更はプリンタドライバの仕事になりますので、いくら万能のExcel VBAといえども、それは無理というものでしょう。

代替策ですが、お使いになりたい用紙よりもひと回り大きい規定のサイズ、たとえば印刷したい用紙が200×280mmならば、ひと回り大きいA4(210×296mm)を選んでおいて、実際に印刷される範囲が200×280mmになるようにExcel上でセルの配置や幅、高さなどを調節すれば良いのではないでしょうか?

QJIS/ISO規格に基づくサンプル数の考え方・決め方

部品の温度上昇に関する試験依頼がありました。
サンプル数については依頼がありませんでしたが、
ISO規格、JIS規格等に基づく根拠を明確にして
説明することが求められています。

ISO規格、JIS規格に基づくサンプル数の決め方、計算方法、
根拠等についてアドバイスいただきますようお願い申しあげます。

Aベストアンサー

以下に詳細がありますのでご覧下さい。
http://homepage1.nifty.com/QCC/2003-3.html
http://aql.blog19.fc2.com/blog-entry-15.html

業務なら
「JIS Z 9015」そのものをご覧になられては
いかがでしょうか?

Qカスタムコントロール作ってます(VB.NET)。VB.Net にVB.6のActiveX作成時にあったプロパティページ作成ができないようですが

タイトルどうりです。VBNETのカスタムコントロールでデザインモードにおけるフォームつまりプロパティページやビジュアルにプロパティボックスから設定できるようにしたいのですが、どうしたらできるでしょうか?VB6ではできたのですが、(Activexコントロール)。

よろしくお願いします。

Aベストアンサー

通常のプロパティと同じように、プロパティ ウィンドウに項目を表示して設定できるようにする必要があります。
具体的には、
1. カスタム コントロールのクラスに外部公開する Property プロシージャを作成して、内部で値を保存できるようにする。
2. そのプロパティの宣言部分で、プロパティ ウィンドウに表示するように指示する属性値を設定する。

こんな感じです。

参考URL:http://www.atmarkit.co.jp/fdotnet/winexp/winexp02/winexp02_01.html

QISOとJAS, JISについて

私の勤務先がISO9000台の認証を受けました。


さっぱりわからなかったので調べてみたのですが
ISOとは国際規格だと言う事がわかりました。

規格、と言う事を聞いた時 同時にJAS,
JISという言葉も頭をよぎりました。

JAS,JISは日本国内の規格ですが,其れを
国際化したもの=ISOと考えてよいでしょうか?

しかし 私の勤務先は 製造メーカーでも
ないので、規格に沿った商品を作っている訳ではないです。

なのに ISOの承認を受けました。


まだまだわからないので ISO/JAS/JISの違いを
教えて下さい.

Aベストアンサー

ISOは、元々、DIN(ドイツ工業規格)、ASA/ANSI(米国標準協会)、JISなど各国に分かれていた規格を標準化するために設立された機構で、その範囲は工業規格だけではありません。

環境や、取引などにも及ぶし、計量の標準化(SI単位など)もISOの仕事です。ですから、製造業に限らず、ISO認証を要求される場面はこれからも増えていくでしょう。

QVB.NETで複数のTextBoxのTextプロパティを設定する方法

TextBoxが10個,20個とある場合に同じ値(もしくは異なる値)をコードでTextプロパティに設定する際の簡単な設定方法があれば教えて下さい。
それとも、一つずつ設定していくしかないのでしょうか?

Aベストアンサー

動的にコントロールオブジェクトの配列を作成するのか最も良い方法でしょう。

フォーム(Form1)にボタンコントロールの配列を作成し、ボタンをクリックするとそのボタンのTextを表示する例を以下に示します。ここではフォームのLoadイベントハンドラでボタンコントロールの配列を作成していますが、コンストラクタの適当な位置で行っても結構です。

[VB.NET]
'ボタンコントロール配列のフィールドを作成
Private testButtons() As System.Windows.Forms.Button

'フォームのLoadイベントハンドラ
Private Sub Form1_Load(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles MyBase.Load
'ボタンコントロール配列の作成(ここでは5つ作成)
Me.testButtons = New System.Windows.Forms.Button(4) {}

'ボタンコントロールのインスタンス作成し、プロパティを設定する
Me.SuspendLayout()
Dim i As Integer
For i = 0 To Me.testButtons.Length - 1
'インスタンス作成
Me.testButtons(i) = New System.Windows.Forms.Button
'プロパティ設定
Me.testButtons(i).Name = i.ToString()
Me.testButtons(i).Text = i.ToString()
Me.testButtons(i).Size = New Size(30, 30)
Me.testButtons(i).Location = New Point(i * 30, 10)
'イベントハンドラに関連付け
AddHandler Me.testButtons(i).Click, _
AddressOf Me.testButtons_Click
Next i

'フォームにコントロールを追加
Me.Controls.AddRange(Me.testButtons)
Me.ResumeLayout(False)
End Sub

'Buttonのクリックイベントハンドラ
Private Sub testButtons_Click(ByVal sender As Object, _
ByVal e As EventArgs)
'クリックされたボタンのNameを表示する
MessageBox.Show(CType(sender, System.Windows.Forms.Button).Name)
End Sub

参考URL:http://dobon.net/vb/dotnet/control/buttonarray.html

動的にコントロールオブジェクトの配列を作成するのか最も良い方法でしょう。

フォーム(Form1)にボタンコントロールの配列を作成し、ボタンをクリックするとそのボタンのTextを表示する例を以下に示します。ここではフォームのLoadイベントハンドラでボタンコントロールの配列を作成していますが、コンストラクタの適当な位置で行っても結構です。

[VB.NET]
'ボタンコントロール配列のフィールドを作成
Private testButtons() As System.Windows.Forms.Button

'フォームのLoadイベントハンドラ
Privat...続きを読む

Q        ☆JIS規格についておしえてください

私はJIS規格とは何の事か分らないので教えて下さい。

JIS企画について3つの質問があるのですが答えて下さい。

   1)会社としてJIS企画を取った方が良いか?メリットを教えてください。

   2)新JIS企画とJIS企画の違い。

   3)JIS企画とはISOの様な物ですか。出来たらその違いも教えて下さい。

Aベストアンサー

単にJIS規格といえば、参考URLのような回答しかできません。また、JIS企画というのは劇団名です。
今回の質問は「JIS規格」の方だと解釈ます。

> 1)会社としてJIS企画を取った方が良いか?メリットを教えてください。

もう少し質問が具体的にならないと、どうしようもありません。
例えば、御社の製品がJISの中の特定の規格に準拠すべきかどうかということであれば、販売戦略等にもよりますので、一般論では何とも言えません。

> 2)新JIS企画とJIS企画の違い。

JISの中の個々の規格は頻繁に改定されていますので、何をもって「新」なのかが分かりません。

> 3)JIS企画とはISOの様な物ですか。出来たらその違いも教えて下さい。

JISは「日本工業規格」ですから日本国内における標準規格であり、ISOは「国際標準化機構」という組織名です。ですから、国内におけるISOに相当するのは「日本規格協会(JSA)」ということになります。
もし、ISO 9000シリーズのような、特定の規格のことを質問されているのであれば、正確な内容を補足してください。

参考URL:http://www.aao.ne.jp/accessibility/jis/whats_jis/index.html

単にJIS規格といえば、参考URLのような回答しかできません。また、JIS企画というのは劇団名です。
今回の質問は「JIS規格」の方だと解釈ます。

> 1)会社としてJIS企画を取った方が良いか?メリットを教えてください。

もう少し質問が具体的にならないと、どうしようもありません。
例えば、御社の製品がJISの中の特定の規格に準拠すべきかどうかということであれば、販売戦略等にもよりますので、一般論では何とも言えません。

> 2)新JIS企画とJIS企画の違い。

JISの中の個々の規格は頻繁に改定さ...続きを読む

QVB .net コントロールのプロパティ設定方法

Visual Basic 2010を勉強しています。

フォームに貼り付けたコントロールのプロパティの設定についてですが、
今までは、貼り付けた後にプロパティウインドウで直接いじっていました。
(Text、Font、Imageなど...)

ですが、知人が書いたコードを見ていると、コードの中で設定しているようなのです。

プロパティウインドウで設定した方が、視覚的にも確認しながら設定できるのでそうしていたのですが、コード内で設定するのと違いはあるのでしょうか?(パフォーマンスやコードの見やすさなど...)

動的にコントロールを配置したい時や、プロパティを変更したい場合にはコード内で操作しますが、初期設定やラベル等の変更することがないようなコントロールに関しては、どちらでも同じような気がするのですが...

実際に皆さんがどうされているのかも気になり、質問させて頂きました。

以上、何卒よろしくお願いいたします。

Aベストアンサー

私は、デフォルト設定から変更する場合は、主にコードで設定しています。

ただ、デザイナで変更しても、InitializeComponent 内に自動でコードが
書かれます。そういった意味では、プロパティウインドウで設定しても
自分でコードを書かないだけで、コードで設定しているとも言えます。

ところが、この自動で書かれているコードには独自のルールがあるようで、
プロパティのデフォルト値と同じであると省略されたり、コードに書かれる
コントロールの順も不定な部分があります。また、開発環境の解像度などの
影響を受けて、プロパティ値が自動調整される事があります。

そういった諸々の事情から、企業で開発するプロジェクトでの保守性や、
別プロジェクトへの再利用性に劣ります。

自前のコードで書いてあると、そこが自動で変更される事は無い(実行時に
調整される事はあっても)ので、意図して値を変更した事が明確に履歴管理
でき、また、そのコードで1回十分にテストしておけば、そのまま安心して
他プロジェクトに流用できます。また、複数プロジェクトで、どのプロパティ
を流用して、どのプロパティは流用しなかったか(つまり、どの機能を実装し、
どの機能は実装しなかったか)といった差分比較も簡単になります。

少し特殊な事例としては、画面上に規則正しくコントロールが並んでいる時に
その位置や初期値を関数で設定した事があります。一度設定するだけなら
デザイナ上で設定しても手間は変わらないか、むしろ関数化するほうが時間が
掛かるかもしれませんが、何度も調整したり、変更が予想される場合は
少しの変更で調整できて便利でした。

以上のような経験から、
デザイナ上で調整するのは、位置と、タブ順・コントロール名くらいで、
他のプロパティは基本的には自前のコードで設定するようになりました。

私は、デフォルト設定から変更する場合は、主にコードで設定しています。

ただ、デザイナで変更しても、InitializeComponent 内に自動でコードが
書かれます。そういった意味では、プロパティウインドウで設定しても
自分でコードを書かないだけで、コードで設定しているとも言えます。

ところが、この自動で書かれているコードには独自のルールがあるようで、
プロパティのデフォルト値と同じであると省略されたり、コードに書かれる
コントロールの順も不定な部分があります。また、開発環境の解像度などの
影...続きを読む

QJIS規格

JIS規格について調べています。
「JSA(日本規格協会)」と「JISC(日本工業標準調査会)」という2つの団体がありますが、どちらがどんな役割をしているのでしょうか?
JIS規格を考えて制定しているのはどちらですか?
ISO等国際規格とJIS規格との連携をおこなっている のはどちらでしょうか?

Aベストアンサー

JIS規格の制定は経済産業省が行っています。
日本工業標準調査会は経済産業省に設置されている審議会なので、JISの審査を行っています。
JIS規格は誰でも考えられます、メーカーや大学の研究機関から果ては個人まで。
ISOとの連携はJISC(日本工業標準調査会)が行っているようですね、経済産業省に設置されているから当然といえば当然でしょうが。
JSA(日本規格協会)は、JISのデータベースや規格表の発行、ハンドブック出版等の、どちらかというと規格を世に知らしめる類の活動ですね。

QVB6 exeファイルのプロパティの設定方法

VB6で作成したexeファイルを右クリックし、プロパティ画面を開いた場合に表示されるバージョン情報タブ内の、詳細にでてくるファイルバージョンと製品バージョンの設定方法が分かりません。どなたか知っている方、教えて頂きたいのですが。よろしくお願いします。

Aベストアンサー

VBのメニューで プロジェクト > 一番下のプロジェクトのプロパティ
実行可能ファイルの作成タブで設定します
ただし ファイルバージョンと、製品バージョンは同じものになると思います


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング

おすすめ情報