VB问题：如何用Print方法显示在PictureBox控件上的内容自动换行？？？
我用inputbox录入数据后，用pint方法显示在PictureBox控件上，但它只能横排显示，由于控件宽度有限，后面的无法在第二排出现。请帮忙解决如何能自动换行显示！我用的代码是：
Private Sub Command1_Click()
ff:
a(i) = InputBox("请录数据！", "", " ")
If a(i) = "" Then Exit Sub
If a(i) = " " Then MsgBox "还没输入！": GoTo ff
If a(i) > 100 Then a34003 = MsgBox("数据为空或越界，请重新输入", vbOKOnly): GoTo ff
If Not IsNumeric(a(i)) Then MsgBox "请录入数字！": GoTo ff
Picture1.Print a(i) + "\";
Next i
End Sub
前面少写了一句代码：
for i=1 to 60
对于一楼的回答，那样只能一行显示一个数字啊！不好不好！
（你的for循环不知是放在哪里的）
-------
调试了下你的程序 发现不少问题
改成这样了 应该没什么Bug了
使用数据时 可用b(60)数组
a(60)只为测试是否符合要求
其中调整处你体会下：
Private Sub Command1_Click()
Dim a(60) As String
Dim b(60) As Double
For i = 1 To 60
ff:
a(i) = InputBox("请录数据！", "", " ")
If a(i) = "" Then Exit Sub
If a(i) = " " Then MsgBox "还没输入！": GoTo ff
If Not IsNumeric(a(i)) Then MsgBox "请录入数字！": GoTo ff
If CDbl(a(i)) > 100 Then a34003 = MsgBox("数据为空或越界，请重新输入", vbOKOnly): GoTo ff
Picture1.Print a(i) + "\";
If i Mod 10 = 0 Then '每行显示十个数后 ，换行
Picture1.Print
End If '
Next i
For i = 1 To 60
b(i) = CDbl(a(i))
Next
End Sub
你应该去调试他的代码
完后用代码进行RPT的无代码超做!
这样他才能自动换行!
你的代码好奇怪啊!
for i=1 to 60
我觉得应该是FOR I=60 TO 1
打错了或者是.....
把这一窜加代码录入就OK了!
改成
Picture1.Print a(i) + "\"
vb中怎么让picturebox输出多行文字
想要让picturebox输出多行文字，可以反复使用Print方法在PictureBox控件中输出多行文字，在插入的文字中输入回车符（即Chr(13)）即可，每一个Print语句右面是一行的内容。此外，在需要换行的地方加上“ & vbCrlf & ”代码也是可以实现让picturebox输出多行文字的。
VB中利用picturebox控件每显示一个随机数都会自动换一行,如何让一行中...
很简单，Picture1.Print a(i, j)后加一个分号就可以了。代码如下：Private Sub Command1_Click()Dim i As Integer, j As Integer, a(4, 5) As Integer For i = 1 To 4 For j = 1 To 5 a(i, j) = Int(Rnd * 90) + 10 Picture1.Print a(i, j);Next j Picture1.Print Ne...
VB中多个按钮,点击后然后在窗体固定位置显示不同的内容
用容器控件（PictureBox或Frame控件）可以实现。比如先放一个PictureBox控件，在上面再放上其他控件；然后再在窗体放入一个PictureBox控件，再在上面放上另一批按钮、文本框之类的控件，依此类推。然后点第一个按钮时，把第一个PictureBox的Visible属性设为True，其他PictureBox的Visible属性设为False；同理...
vb中怎么能使picturebox 里显示文本???
最简单 使用控件的print方法就可以了 例如如picture1.print "文本",但是控制不了文本的位置 最好是使用API函数textout 方法 textout 句柄,x,y,文本,长度(英文1个汉字2个)例如 textout picture1.hdc,0,0,"文本",4
VB中怎样用print方法在picturebox中输出数据
Picture1.Print "r=" & a, "周长=" & b 改为 Picture1.Print "r=" & a & “, 周长=" & b
请问VB里能不能在一张图片(pictureBox)之上用print在固定位置输出一些字 ...
可以的：Picture1.AutoRedraw = True Picture1.CurrentX = 150 '设置打印起始位置横坐标 Picture1.CurrentY = 150 '设置打印起始位置纵坐标 Picture1.Print "ABC" '打印字符 不过建议最好选用Label控件，比较方便
Vb++中Print方法有哪些?
1、Print方法 Print方法可用于窗体、图片框、立即窗口、打印机等对象。用来显示文本字符和表达式的值。2、Object.Print Obiect是对象的名称，对象可以是窗体(Form)、立即窗口(Debug)、图片框(PictureBox)、打印机(Printer)等。Print关键字可以用”？”里代替。注意：1.每一次使用Print方法后，Printer对象...
vb Picture1.Print 换行问题
程序见附件，代码如下 Private Sub Text1_Change()Picture1.ClsPicture1.Print Text1.TextEnd Sub
详细介绍一下VB PictureBox的print和cls方法
为了在窗体或图片框上显示文本，使用 Print 方法，将该窗体或图片框的名称加在它的前面即可。把输出文本发送到打印机上，应使用Printer对象上的Print方法。操作方法如下：1、首先编写窗体（设其姓名为form1）click事件。即在窗体上写入一个command1命令按钮。2、编写事件的编程如下。3、若想在同一个窗体...
vb中如何实现在一个pictruebox控件的情况下,鼠标每单击一下,换一张...
楼上说的很对，但是你想要实现连续替换 可以写上下面的循环语句 Dim i As Integer Private Sub Form_Load()i = 1 End Sub Private Sub Picture1_Click()i = i + 1 If i >= 6 Then i = 1 End If Select Case i Case 1 Picture1.Picture = LoadPicture(App.Path & "\\1.jpg")Case ...
