求助VB，急用

2024年11月28日 15:44

有3个网友回答

网友（1）：

这个是求救，这是任务？

网友（2）：

VB2010的可以吗？
1）
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If UCase(Replace(Trim(Text1.Text), vbCrLf, "")) <> "END" Then
Open "d:\t1.txt" For Append As #1
Print #1, Text1.Text
Text1.Text = ""
Close #1
Else
Text1.Text = ""
End If
End If
End Sub

网友（3）：

我也同求大神，来个脚印下次好找

南京大学的中德经济法研究每年的录取比例是多少？谢谢大家哈，本人想13年考研考这个

家用空调冬天如何判断是否缺氟

魅族MX4PRO还可能降价吗？？？？

美国面签后护照最快多久拿到怎么加急尽快领取护照

我才19岁脸上就有斑点了，据说是体内毒素多没排出来，请问有什么可以真正排毒而不反弹的？

这里的提问和注册要钱的吗？

我几年前体检是大三阳，今天刚到体检，总胆红素、直接胆红素、间接胆红素偏高一点点，要不要吃药啊？

海文考研郭继承

怎样升级我的电脑的显卡驱动?