質問編集履歴
3
StackedColumn100を追加
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -49,7 +49,19 @@
|
|
|
49
49
|
.Series(columnName).XValueMember = ds.Tables(0).Columns(0).ColumnName.ToString()
|
|
50
50
|
.Series(columnName).YValueMembers = columnName
|
|
51
51
|
Next
|
|
52
|
+
```ここに言語を入力 StackedColumn100
|
|
53
|
+
を追加
|
|
52
54
|
|
|
55
|
+
For i As Integer = 7 To 11
|
|
56
|
+
|
|
57
|
+
Dim columnName As String = ds.Tables(0).Columns(i).ColumnName.ToString()
|
|
58
|
+
.Series.Add(columnName)
|
|
59
|
+
.Series(columnName).ChartType = DataVisualization.Charting.SeriesChartType.StackedColumn100
|
|
60
|
+
.Series(columnName).XValueMember = ds.Tables(0).Columns(0).ColumnName.ToString()
|
|
61
|
+
.Series(columnName).YValueMembers = columnName
|
|
62
|
+
Next
|
|
63
|
+
|
|
64
|
+
```
|
|
53
65
|
 '------------- ここまでは、基本的な表示設定と同じ -----------------------------------------
|
|
54
66
|
With Chart1
|
|
55
67
|
.Series(0).YAxisType = AxisType.Primary
|
2
実行結果のグラフの表示
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -1,4 +1,4 @@
|
|
|
1
|
-
### 前提・実現したいこと
|
|
1
|
+
### 前提・実現したいこと
|
|
2
2
|
VB2010 Windows7環境
|
|
3
3
|
Chartで折れ線と100%積上げグラフを表示したい。
|
|
4
4
|
|
1
タグの追加
title
CHANGED
|
File without changes
|
body
CHANGED
|
File without changes
|