请问为什么我的这个程序不能换行输出
Private Sub Command1_Click()
Dim a%, b%, c%, d%, f%
For a = 1 To 9
For b = 0 To 9
For c = 0 To 9
d = a ^ 3 + b ^ 3 + c ^ 3
f = a * 100 + b * 10 + c
If d = f Then
Text1.Text = Text1.Text & d & vbCrLf
End If
Next c
Next b
Next a
End Sub
问题点数:0、回复次数:3Top
1 楼inskyfish()回复于 2005-04-01 22:35:20 得分 0
Text1.Text = Text1.Text & d & vbCrLf => Text1.Text = Text1.Text & d & chr(10) & chr(13)
chr(8)、chr(9)、chr(10) 和 chr(13) 分别转换为退格、制表、换行和回车字符。Top
2 楼risine()回复于 2005-04-01 23:44:02 得分 0
多谢楼上了 我已经从其他帖子里找到答案了 是因为TEXTBOX的属性 MULITILINE没有置TURE 才导致以上程序不能换行Top
3 楼xinliangyu(yxl)回复于 2005-04-02 10:27:40 得分 0
我。。。Top




