vb高手来啊,vb点击命令按钮新建一个txt文件,并将输入文本内容保存其中,代码如下:

[复制链接]
查看11 | 回复1 | 2011-7-3 15:13:35 | 显示全部楼层 |阅读模式
Private Sub Command1_Click()
Open "C:\Users\123\Desktop\123.txt" For Output As #1
Print #1, Text1
Text1.Text = "姓名:" + txtname + ",年龄:" + txtage + ",性别:" + txtsex + ",身份证号:" + txtid + ",毕业学校:" + txtschool + ",家庭住址:" + txtad + ",高考分数:" + txtscore
End Sub
(请问这一段哪里错了??)
Private Sub Command2_Click()
shell "notepad " & "C:\Users\123\Desktop\123.txt", vbMaximizedFocus
End Sub
Private Sub Command3_Click()
txtname.Text = "": txtage.Text = "": txtsex.Text = "": txtid.Text = "": txtschool.Text = "": txtad.Text = "": txtscore = ""
End Sub
Private Sub Command4_Click()
End
End Sub


回复

使用道具 举报

千问 | 2011-7-3 15:13:35 | 显示全部楼层
Text1.Text = "姓名:"&txtname &",年龄:" &txtage &",性别:" &txtsex & ",身份证号:" &txtid & ",毕业学校:" & txtschool &",家庭住址:" &txtad &",高考分数:" & txtscore...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行