如何使创建的文件名是由textbox的text属性决定
以下是用你的源码做的一个。我应该怎么改 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles ***.click Dim f As String Dim t Dim n n = ***.text f = "d:***.txt" t = ***.text & n If Dir(f) = "" Then Try my.***.writealltext(f, t, True) Catch ex As Exception MsgBox("创建文件出错!") End Try End If ***.show() ***.hide() End Sub
这个只要改
f = "d: est.txt"
为
f = TextBox1.Text
其中TextBox1是你TextBox构件的名字
热门标签: