vb一个窗体向另一个窗体的文本框 写东西 怎么办 ?
例如PrivateSubCommand5_Click()OpenForm2.Text2.TextForOutputAs#1Print#1,"Key1"Print#1,"L...
例如
Private Sub Command5_Click()
Open Form2.Text2.Text For Output As #1
Print #1, "Key1"
Print #1, "LP: MOV SP ,#60H"
Print #1, " MOV 4AH , #00H"
Print #1, " MOV 49H , #00H"
Print #1, " MOV 48H , #01H"
Print #1, " MOV 47H , #02H"
Print #1, " MOV A , 4EH"
Print #1, " MOV A , 4CH"
Print #1, " MOV 50H , A"
Print #1, " MOV A , 4DH"
Print #1, " ADDC A , 4BH"
Print #1, " MOV 4FH , A"
Print #1, " MOV A , #30H"
Print #1, " MOV DPTR , #30H"
Print #1, " MOVX @DPTR, A"
Close #1
End Sub
我这样不行 展开
Private Sub Command5_Click()
Open Form2.Text2.Text For Output As #1
Print #1, "Key1"
Print #1, "LP: MOV SP ,#60H"
Print #1, " MOV 4AH , #00H"
Print #1, " MOV 49H , #00H"
Print #1, " MOV 48H , #01H"
Print #1, " MOV 47H , #02H"
Print #1, " MOV A , 4EH"
Print #1, " MOV A , 4CH"
Print #1, " MOV 50H , A"
Print #1, " MOV A , 4DH"
Print #1, " ADDC A , 4BH"
Print #1, " MOV 4FH , A"
Print #1, " MOV A , #30H"
Print #1, " MOV DPTR , #30H"
Print #1, " MOVX @DPTR, A"
Close #1
End Sub
我这样不行 展开
展开全部
这是文件的打开方式,不是这样的。
Form2.Text2.mutiline=true
首先,你要显示多行,这个文本框的mutiline属性就要为true
然后往里搞就行了
Form2.Text2.Text = Form2.Text2.Text + “ 要输出的句子1" + vbcrlf
Form2.Text2.Text = Form2.Text2.Text + “ 要输出的句子2" + vbcrlf
Form2.Text2.Text = Form2.Text2.Text + “ 要输出的句子3" + vbcrlf
Form2.Text2.Text = Form2.Text2.Text + “ 要输出的句子4" + vbcrlf
Form2.Text2.Text = Form2.Text2.Text + “ 要输出的句子5" + vbcrlf
....
Form2.Text2.mutiline=true
首先,你要显示多行,这个文本框的mutiline属性就要为true
然后往里搞就行了
Form2.Text2.Text = Form2.Text2.Text + “ 要输出的句子1" + vbcrlf
Form2.Text2.Text = Form2.Text2.Text + “ 要输出的句子2" + vbcrlf
Form2.Text2.Text = Form2.Text2.Text + “ 要输出的句子3" + vbcrlf
Form2.Text2.Text = Form2.Text2.Text + “ 要输出的句子4" + vbcrlf
Form2.Text2.Text = Form2.Text2.Text + “ 要输出的句子5" + vbcrlf
....
展开全部
Private Sub Command5_Click()
Form2.Print "Key1"
Form2.Print "LP: MOV SP ,#60H"
Form2.Print " MOV 4AH , #00H"
Form2.Print " MOV 49H , #00H"
Form2.Print " MOV 48H , #01H"
Form2.Print " MOV 47H , #02H"
Form2.Print " MOV A , 4EH"
Form2.Print " MOV A , 4CH"
Form2.Print " MOV 50H , A"
Form2.Print " MOV A , 4DH"
Form2.Print " ADDC A , 4BH"
Form2.Print " MOV 4FH , A"
Form2.Print " MOV A , #30H"
Form2.Print " MOV DPTR , #30H"
Form2.Print " MOVX @DPTR, A"
End Sub
Form2.Print "Key1"
Form2.Print "LP: MOV SP ,#60H"
Form2.Print " MOV 4AH , #00H"
Form2.Print " MOV 49H , #00H"
Form2.Print " MOV 48H , #01H"
Form2.Print " MOV 47H , #02H"
Form2.Print " MOV A , 4EH"
Form2.Print " MOV A , 4CH"
Form2.Print " MOV 50H , A"
Form2.Print " MOV A , 4DH"
Form2.Print " ADDC A , 4BH"
Form2.Print " MOV 4FH , A"
Form2.Print " MOV A , #30H"
Form2.Print " MOV DPTR , #30H"
Form2.Print " MOVX @DPTR, A"
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询