VB用mschart画折线图，怎样做到变换坐标？
我想变换坐标，比如说新增加一个缩短按钮，点击按钮，横坐标就会变短。
这是我的代码：
请大家帮忙
Option Explicit
Private Sub cmd_close_Click()
Unload Me
End Sub
Private Sub cmd_pic_Click()
Dim s As String, i As Long, ss() As String
Dim cn As New adodb.Connection
Dim rs As New adodb.Recordset
cn.CursorLocation = adUseClient
cn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=sample;Data Source=."
rs.Open "select number,sdatetime,data from udata", cn, adOpenStatic, adLockOptimistic
If rs.RecordCount = 0 Then Exit Sub
ReDim ss(rs.RecordCount)
With MSChart1
.RowCount = rs.RecordCount
.ColumnCount = 1
.chartType = VtChChartType2dLine
For i = 1 To rs.RecordCount
.Row = i
.Data = rs.Fields("data")
.RowLabel = rs.Fields("sdatetime")
rs.MoveNext
Next i
&nb
相关问答：
大家好，问个vb打印问题
printer.print "dsff"
.....
....
Printer.EndDoc
打印成功后我将执行
sqlstr = "update vc_yh set pr=' 已打印 ', ......
比如进程加载新的程序。
在其运行之前阻止。
然后允许后放行。
比如程序主文件路径是c:\test\test.exe，建立内容任意的文件c:\test\test.exe.manifest。
就是不知道程序文件路径。
设� ......
用VB怎么只针对windows自带的文件的右键添加菜单 如（.txt .doc)
这个是只针对以这两个为扩展名的文件操作
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[随便起名]\command]
@= ......
比如说要在1表中的第三列第二行单元中输入“一二三”一要粗体宋体12号字，二 不要粗体 15号字 三斜体5号字
代码应该怎么打？
LZ指的是个什么表格控件呢，貌似只能设置整个表的字体，或者某几行或几列，没有单独设� ......
怎么优化查询的效率，比如我想从100万条记录中每次只查询100条记录的话，那么这条sql语句该怎么实现，注意：语言是VBScript的，
http://www.cnblogs.com/anjou/archive/2007/10/17/926944.html
涉及到算法，goog ......
