版塊導(dǎo)航: 正在加載中...

登錄注冊

應(yīng)《網(wǎng)絡(luò)安全法》要求，自2017年10月1日起，未進行實名認證將不得使用互聯(lián)網(wǎng)跟帖服務(wù)。為保障您的帳號能夠正常使用，請盡快對帳號進行手機號驗證，感謝您的理解與支持！

24小時熱門版塊排行榜

北京石油化工學院2026年研究生招生接收調(diào)劑公告

返回列表

Fanyb_1993

新蟲 (初入文壇)

應(yīng)助: 0 (幼兒園)
金幣: 0.5
帖子: 10
在線: 2.6小時
蟲號: 3000188
注冊: 2014-02-27
性別: GG
專業(yè): 半導(dǎo)體物理

[求助] 我用vb chart 控件，畫折線圖，出不來，求高人給看看，已有1人參與

四個點的坐標分別為（0,20）（1,80）（4,200）（10,270），總顯示索引越界，我也不知道哪錯了，求高人指導(dǎo)，
mydata(1, 1) = 0: mydata(1, 2) = 20
mydata(2, 1) = 1: mydata(2, 2) = 80
mydata(3, 1) = 4: mydata(3, 2) = 200
mydata(4, 1) = 10: mydata(4, 2) = 270
MSChart1.chartType = VtChChartType2dLine
MSChart1.Plot.Axis(VtChAxisIdX).ValueScale.Auto = False
MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Auto = False
MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Maximum = temp(i)
MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Minimum = 20
MSChart1.Plot.Axis(VtChAxisIdX).ValueScale.Minimum = 0
MSChart1.ColumnCount = 4
MSChart1.RowCount = 1
MSChart1.TitleText = "自動控溫系統(tǒng)溫度顯示"
MSChart1.Plot.Axis(VtChAxisIdX, 0).AxisTitle = "時間 / 分鐘"
MSChart1.Plot.Axis(VtChAxisIdY, 0).AxisTitle = "溫度 / ℃"
For Column = 1 To 4
For Row = 1 To 2
         MSChart1.Column = Column
         MSChart1.Row = Row
         MSChart1.ChartData = mydata
Next Row
   Next Column
End Sub

回復(fù)此樓

» 猜你喜歡

085601材料工程找調(diào)劑已經(jīng)有11人回復(fù)
總分293求調(diào)劑已經(jīng)有9人回復(fù)
334分一志愿武理材料求調(diào)劑已經(jīng)有5人回復(fù)
327求調(diào)劑已經(jīng)有6人回復(fù)
329求調(diào)劑已經(jīng)有10人回復(fù)
275求調(diào)劑已經(jīng)有15人回復(fù)
291求調(diào)劑已經(jīng)有6人回復(fù)
309求調(diào)劑已經(jīng)有7人回復(fù)
297求調(diào)劑已經(jīng)有11人回復(fù)
一志愿南航 335分 | 0856 | GPA 4.07 | 有科研經(jīng)歷已經(jīng)有6人回復(fù)

» 本主題相關(guān)價值貼推薦，對您同樣有幫助:

這種圖是怎么畫的？用origin嗎？已經(jīng)有4人回復(fù)

1樓 2014-11-27 23:57:47

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

deephill

鐵桿木蟲 (職業(yè)作家)

應(yīng)助: 59 (初中生)
金幣: 5262.3
散金: 100
紅花: 16
帖子: 4425
在線: 425小時
蟲號: 305318
注冊: 2006-12-09
性別: GG
專業(yè): 微量元素地球化學

【答案】應(yīng)助回帖

感謝參與，應(yīng)助指數(shù) +1

我把你的程序運行了一下，沒有什么問題啊。
我估計是你這一句中出了問題
MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Maximum = temp(i)

其中用temp() 數(shù)組，估計你的i 值設(shè)置有問題，或是沒有設(shè)置 i 的初值。造成錯誤。

贊一下

回復(fù)此樓

2樓2014-11-28 21:19:59

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

Fanyb_1993

新蟲 (初入文壇)

應(yīng)助: 0 (幼兒園)
金幣: 0.5
帖子: 10
在線: 2.6小時
蟲號: 3000188
注冊: 2014-02-27
性別: GG
專業(yè): 半導(dǎo)體物理

引用回帖:

2樓: Originally posted by deephill at 2014-11-28 21:19:59
我把你的程序運行了一下，沒有什么問題啊。
我估計是你這一句中出了問題
MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Maximum = temp(i)

其中用temp() 數(shù)組，估計你的i 值設(shè)置有問題，或是沒有設(shè)置 i 的初值。 ...

我的 temp（）是個靜態(tài)數(shù)組，這沒有問題，我是想知道橫坐標為啥不對啊，你沒發(fā)現(xiàn)橫坐標間距都不對嗎，

[ 發(fā)自小木蟲客戶端 ]

贊一下

回復(fù)此樓

3樓2014-11-29 00:27:20

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

deephill

鐵桿木蟲 (職業(yè)作家)

應(yīng)助: 59 (初中生)
金幣: 5262.3
散金: 100
紅花: 16
帖子: 4425
在線: 425小時
蟲號: 305318
注冊: 2006-12-09
性別: GG
專業(yè): 微量元素地球化學

【答案】應(yīng)助回帖

我的程序
Private Sub Command1_Click()

Dim MyData(10, 10) As Double
Dim temp(1 To 500) As Double
'-----x軸坐標值-----Y軸坐標值----------
For i = 1 To 500
temp(i) = i
Next i
i = 300

MyData(1, 1) = 0: MyData(1, 2) = 20
MyData(2, 1) = 1: MyData(2, 2) = 80
MyData(3, 1) = 4: MyData(3, 2) = 200
MyData(4, 1) = 10: MyData(4, 2) = 270
MSChart1.chartType = VtChChartType2dLine

MSChart1.Plot.Axis(VtChAxisIdX).ValueScale.Auto = False
MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Auto = False

MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Minimum = 0
MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Maximum = temp(i)

MSChart1.Plot.Axis(VtChAxisIdX).ValueScale.Minimum = 0
''''MSChart1.Plot.Axis(VtChAxisIdX).ValueScale.Maximum = 10

MSChart1.ColumnCount = 4
MSChart1.RowCount = 1

MSChart1.TitleText = "自動控溫系統(tǒng)溫度顯示"
MSChart1.Plot.Axis(VtChAxisIdX, 0).AxisTitle = "時間 / 分鐘"
MSChart1.Plot.Axis(VtChAxisIdY, 0).AxisTitle = "溫度 / ℃"

MSChart1.ChartData = MyData

End Sub
---------------------------
運行結(jié)果如圖。

你的這個程序有點意思，特別是最后的那個for循環(huán)，要不要都一樣。

贊一下

回復(fù)此樓

» 本帖附件資源列表

歡迎監(jiān)督和反饋：小木蟲僅提供交流平臺，不對該內(nèi)容負責。
本內(nèi)容由用戶自主發(fā)布，如果其內(nèi)容涉及到知識產(chǎn)權(quán)問題，其責任在于用戶本人，如對版權(quán)有異議，請聯(lián)系郵箱：xiaomuchong@tal.com
附件 1 : QQ截圖20141129162204.png

2014-11-29 16:25:07, 5.79 K

4樓2014-11-29 16:27:30

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

Fanyb_1993

新蟲 (初入文壇)

應(yīng)助: 0 (幼兒園)
金幣: 0.5
帖子: 10
在線: 2.6小時
蟲號: 3000188
注冊: 2014-02-27
性別: GG
專業(yè): 半導(dǎo)體物理

引用回帖:

4樓: Originally posted by deephill at 2014-11-29 16:27:30
我的程序
Private Sub Command1_Click()

Dim MyData(10, 10) As Double
Dim temp(1 To 500) As Double
'-----x軸坐標值-----Y軸坐標值----------
For i = 1 To 500
temp(i) = i
...

要不要都一樣什么意思？

贊一下

回復(fù)此樓

5樓2014-12-01 22:51:08

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

deephill

鐵桿木蟲 (職業(yè)作家)

應(yīng)助: 59 (初中生)
金幣: 5262.3
散金: 100
紅花: 16
帖子: 4425
在線: 425小時
蟲號: 305318
注冊: 2006-12-09
性別: GG
專業(yè): 微量元素地球化學

【答案】應(yīng)助回帖

是你的程序中最后的兩個for語句
For Column = 1 To 4
For Row = 1 To 2
         MSChart1.Column = Column
         MSChart1.Row = Row
         MSChart1.ChartData = mydata
Next Row
   Next Column

你做下比較就知道了。

贊一下

回復(fù)此樓

6樓2014-12-04 00:07:09

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

Fanyb_1993

新蟲 (初入文壇)

應(yīng)助: 0 (幼兒園)
金幣: 0.5
帖子: 10
在線: 2.6小時
蟲號: 3000188
注冊: 2014-02-27
性別: GG
專業(yè): 半導(dǎo)體物理

引用回帖:

5樓: Originally posted by Fanyb_1993 at 2014-12-01 22:51:08
要不要都一樣什么意思？...

其實我不知道兩個for是什么意思，總會顯示
MSChart1.Column = j
MSChart1.Row = k 索引越界
再一個問題是，你有沒有發(fā)現(xiàn)，相鄰兩個點的橫坐標差多少在圖上顯示出來都是一樣的，這有問題��？

贊一下

回復(fù)此樓

7樓2014-12-07 21:00:55

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

相關(guān)版塊跳轉(zhuǎn) 我要訂閱樓主 Fanyb_1993 的主題更新

返回列表

最具人氣熱帖推薦 [查看全部]		作者	回/看	最后發(fā)表

[考研] 一志愿南航 335分 \| 0856 \| GPA 4.07 \| 有科研經(jīng)歷 +6	cccchenso 2026-03-29	6/300	2026-03-29 13:11 by mumin1990
[考研] 求調(diào)劑，一志愿南京航空航天大學，080500材料科學與工程學碩，總分289分 +7	@taotao 2026-03-29	7/350	2026-03-29 12:03 by longlotian
[考研] 299求調(diào)劑 +8	15188958825 2026-03-25	8/400	2026-03-29 01:36 by fmesaito
[考研] 22408 359分調(diào)劑 +4	Qshers 2026-03-27	5/250	2026-03-28 21:26 by zhq0425
[考研] 343求調(diào)劑 +5	愛羈絆 2026-03-28	5/250	2026-03-28 20:53 by 唐沐兒
[考研] 085602 化工專碩 338分求調(diào)劑 +12	路癡小琪 2026-03-27	12/600	2026-03-28 15:41 by L135790
[考研] 085600，材料與化工321分求調(diào)劑 +9	大饞小子 2026-03-28	9/450	2026-03-28 14:56 by 神馬都不懂
[考研] 311求調(diào)劑 +9	lin0039 2026-03-26	9/450	2026-03-28 13:05 by 唐沐兒
[考研] 085701環(huán)境工程，267求調(diào)劑 +16	minht 2026-03-26	16/800	2026-03-28 12:16 by zllcz
[考研] 調(diào)劑 +3	好好讀書。 2026-03-28	3/150	2026-03-28 12:04 by 王保杰33
[考研] 328求調(diào)劑 +7	嗯滴的基本都 2026-03-27	7/350	2026-03-28 04:19 by fmesaito
[考研] 265求調(diào)劑 +8	小木蟲085600 2026-03-27	8/400	2026-03-27 22:16 by 無際的草原
[考研] 0703化學求調(diào)劑，各位老師看看我�。�！ +5	祁祺祺 2026-03-25	5/250	2026-03-27 21:44 by 東方豬豬
[考研] 材料292調(diào)劑 +12	橘頌思美人 2026-03-23	12/600	2026-03-27 15:44 by caszguilin
[考研] 0703化學338求調(diào)劑！ +6	Zuhui0306 2026-03-26	7/350	2026-03-27 10:35 by shangxh
[考研] 324求調(diào)劑 +8	hanamiko 2026-03-26	10/500	2026-03-27 08:06 by hypershenger
[考研] 317求調(diào)劑 +7	蛋黃咸肉粽 2026-03-26	7/350	2026-03-27 02:29 by fmesaito
[考研] 材料調(diào)劑 5+4	想要一壺桃花水 2026-03-25	10/500	2026-03-26 19:56 by 不吃魚的貓
[考研] 285求調(diào)劑 +3	AZMK 2026-03-24	3/150	2026-03-25 12:23 by userper
[考研] 277分求調(diào)劑，跨調(diào)材料 +3	考研調(diào)劑lxh 2026-03-24	3/150	2026-03-24 13:52 by JourneyLucky

24小時熱門版塊排行榜

[求助] 我用vb chart 控件，畫折線圖，出不來，求高人給看看， 已有1人參與

» 猜你喜歡

» 本主題相關(guān)價值貼推薦，對您同樣有幫助:

【答案】應(yīng)助回帖

【答案】應(yīng)助回帖

» 本帖附件資源列表

【答案】應(yīng)助回帖

[求助] 我用vb chart 控件，畫折線圖，出不來，求高人給看看，已有1人參與