🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: fj.lang.visualbasic
2 messages
2 total messages Started by Atsushi Hattori Fri, 29 Aug 1997 00:00
[Q: VB5 on NT4] MSChart no Size
#1480
Author: Atsushi Hattori
Date: Fri, 29 Aug 1997 00:00
54 lines
2181 bytes
$B!!I~It!w5~BgEZLZ$H?=$7$^$9!#(B

$B!!(BMSChart$B$H$$$&(BActiveX Control$B$K4X$9$k<ALd$rJ9$$$F$d$C$F2<$5$$!#(B

$B!!(BMSChart$B$O(BWidth$B!"(BHeight$B$GI=$5$l$kBg$-$5!"$=$NCf$K$"$k(B
$B%0%i%UItJ,$NBg$-$5!"$5$i$K$=$NCf$K$"$k<4@~$ND9$5$N(B
3$B<oN`$NBg$-$5$,$"$k$h$&$G$9!#$3$l$i$N$&$A<4@~$ND9$5$,(B
$B0lHV=EMW$@$H;W$&$N$G$9$,!"$=$N@_Dj$O$I$&$9$l$PNI$$$N$G$7$g$&$+!#(B
$B<o!9%W%m%Q%F%#$d%a%=%C%I$J$I$r8+$?$D$b$j$J$N$G$9$,!"(B
$B:#0l$DJ,$+$j$^$;$s$G$7$?(B...

 $B!!$A$J$_$K!"0J2<$N%3!<%I(B(Form1$B>e$K(BMSChart1$B$,:8>e$K0l$D(B)$B$r(B
$B<B9T$9$l$P!"$I$&$J$j$^$9$+(B??$B%G!<%?$NM?$(J}$,0-$$$s$G$7$g$&$+(B...

Option Explicit

Private Sub Form_Load()
    Dim X As Integer

    With MSChart1
        .chartType = VtChChartType2dXY

        .RowCount = 100
        .ColumnCount = 2
        .RowLabelCount = 0
        .ColumnLabelCount = 0

        .Row = 1
        For X = 1 To 99
            .Column = 1: .Data = X        'X$B$N%G!<%?$N$D$b$j(B
            .Column = 2: .Data = X ^ 2   'Y$B$N%G!<%?$N$D$b$j(B

            .Row = .Row + 1
        Next X
    End With
End Sub

Private Sub Form_Resize()
    With MSChart1
        .Width = ScaleWidth
        .Height = ScaleHeight
    End With
End Sub

$B!!(BGraph$B$d(BGrid$B$,(BVB5$B$G%5%]!<%H$5$l$J$$$H%^%K%e%"%k$K=q$$$F$"$k$N$rCN$j!"(B
$BX3A3$H$7$F!"(BMSChart$B$H(BMSFlexGrid$B$,8e7Q<T$K0c$$$J$$$H;W$$!"(B
$B0\?"$r;O$a$?$N$G$9$,(B...MSFlexGrid$B$O!"(BTextMatrix$B$GGc$$$G$9!#(B
MSChart$B$OFq$7$$(B...

--
Atsushi Hattori, Research Associate, Kyoto University
Tel: 81 75 753 5102  Fax: 81 75 761 0646
e-mail: hattori@cml2.kuciv.kyoto-u.ac.jp
Re: VB5 on NT4] MSChart no Size
#1361
Author: Atsushi Hattori
Date: Wed, 03 Sep 1997 00:00
25 lines
1448 bytes
 $B!!I~It!w5~BgEZLZ$H?=$7$^$9!#(B

$B!!<+8J%U%)%m!<$G$9$,!"2<5-$N7o$O(B

    MSChart1.Plot.UniformAxis = False

$B$H$9$k$3$H$G!"2r7h$7$^$7$?!#(B"Width"$B$H$+(B"Height"$B$P$+$j(B
$BC5$7$F$$$?$N$,<:GT$G$7$?(B...$B$=$l$K$7$F$b!"(BMSChart1$B$O(B
$BB?5!G=$JJ,!"Fq$7$$$G$9!#;H$$$G$O$"$j$^$9$M!#(B

--
Atsushi Hattori, Research Associate, Kyoto University
Tel: 81 75 753 5102  Fax: 81 75 761 0646
e-mail: hattori@cml2.kuciv.kyoto-u.ac.jp

Atsushi Hattori wrote in article
<5u5ic7$ffo$1@tetoron.imel.kyoto-u.ac.jp>...

>$B!!(BMSChart$B$O(BWidth$B!"(BHeight$B$GI=$5$l$kBg$-$5!"$=$NCf$K$"$k(B
>$B%0%i%UItJ,$NBg$-$5!"$5$i$K$=$NCf$K$"$k<4@~$ND9$5$N(B
>3$B<oN`$NBg$-$5$,$"$k$h$&$G$9!#$3$l$i$N$&$A<4@~$ND9$5$,(B
>$B0lHV=EMW$@$H;W$&$N$G$9$,!"$=$N@_Dj$O$I$&$9$l$PNI$$$N$G$7$g$&$+!#(B
>$B<o!9%W%m%Q%F%#$d%a%=%C%I$J$I$r8+$?$D$b$j$J$N$G$9$,!"(B
>$B:#0l$DJ,$+$j$^$;$s$G$7$?(B...
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads