关于mschart的问题，帮忙up者有分

Question

第2个问题：要引用Microsoft ActiveX Data Objects 2.x library

Answer 1

关于ADO的问题：你应该先引用Microsoft ActiveX Data Objects 2.x library
声明变量的格式应为Dim cnn1 As new adodb.connection

Answer 2

1.引用(ADO)
    Project(工程)---Peferences（引用)---Microsoft ActiveX Data Objects 2.7 Library  2.在模块中建变量
    Public g_AdoSqlCon As ADODB.Connection  3.建模块(Module)
    Public Function SqlConnect_Db(SqlVar_Con As Connection) As Boolean
    Dim intRec As Integer
    Set SqlVar_Con = New Connection
    SqlVar_Con.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=yxl;pwd=771112;Initial Catalog=ws;Data Source=10.10.66.246"
    SqlConnect_Db = True
    Exit Function
    End Function  4.调用模块(Moudle)
    Private Sub Form_Load()
    Call SqlConnect_Db(g_AdoSqlCon)
    End Sub  5.连数据库
    Private Sub Command1_Click()
    Dim rs As Recordset
    Dim sql As String
    Set rs = New Recordset
    sql = "select * from cg"
    rs.Open sql, g_AdoSqlCon
    Text1.Text = rs!xm
    rs.Close
    Set rs = Nothing
    End Sub

Answer 3

MSCHART中你是否指定了多少行  mschart.rows=多少

Answer 4

可以把chart设置成三维的就有了，或着在属性对话框中设置X轴标签和Y轴标签。

Answer 5

MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Auto = FalseMSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Maximum = 80
MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.Minimum = 0 'y轴最小刻度
MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.MajorDivision = 10 ' y轴刻度10等分
MSChart1.Plot.Axis(VtChAxisIdY).ValueScale.MinorDivision = 1 '每刻度一个刻度线
MSChart1.Plot.Axis(VtChAxisIdY).CategoryScale.DivisionsPerLabel = 10 '每时刻一个标注
= False
'
MSChart2.Plot.Axis(VtChAxisIdY).ValueScale.Maximum = 80
MSChart2.Plot.Axis(VtChAxisIdY).ValueScale.Minimum = 0 'y轴最小刻度
MSChart2.Plot.Axis(VtChAxisIdY).ValueScale.MajorDivision = 10 ' y轴刻度10等分
MSChart2.Plot.Axis(VtChAxisIdY).ValueScale.MinorDivision = 1
MSChart2.Plot.Axis(VtChAxisIdX).ValueScale.Auto = False
MSChart2.RowCount = 60
MSChart2.Plot.Axis(VtChAxisIdX).CategoryScale.DivisionsPerLabel = 10 '每时刻一个标注

Answer 6

我正要使用 .net下的mschart，
没底。哪位看看.
http://www.csdn.net/expert/topic/1007/1007349.xml?temp=.2908747

Answer 7

ado的问题是因为你没有引用ADo，引用方法见 okwang1979(小笨) (