Question

VB中如何做出直方图，散点图？

根据list列表给出的数值，用常规做法
在图片框内进行作图，list列表什么的都不用管。

Answer 1

这不叫直方图，这是散点图，可以用picturebox的画线line()或画点pset()来实现。

Answer 2

line（x1,y1）—（x2,y2）,,B是画矩形
pset （x，y）是描点。

追问

能稍微具体一点点吗？比如说第一个中国的，怎么画？

追答

P1.Scale (-0.1, 200)-(4, -30)
P1.Line (-0.1, 0)-(4, 0)
P1.Line (0, 200)-(0, -30)
P1.CurrentX = 1: P1.CurrentY = -10: P1.Print "金牌"
P1.CurrentX = 2: P1.CurrentY = -10: P1.Print "银牌"
P1.CurrentX = 3: P1.CurrentY = -10: P1.Print "铜牌"
P1.Line (0.9, 183)-(1.1, 0), vbBlue, BF
P1.Line (1.9, 107)-(2.1, 0), vbBlue, BF
P1.Line (2.9, 51)-(3.1, 0), vbBlue, BF