如何在Sub语句中用文本框内容替换File.Copy路径中的硬编码主机名

完全明白你的需求——把硬编码的NetworkComputer1换成窗体文本框里的用户输入值对吧？这在WinForms开发里是很常见的场景，核心就是用字符串拼接/插值来动态构建路径，而不是写死固定值。

下面分两种常用的.NET语言给你示例：

C# 示例 #

假设你的文本框控件名为txtNetworkComputer（可以根据实际控件名修改），我们可以用C#的字符串插值（写法更简洁直观）来构建路径：

// 先获取文本框中的计算机名称，去除首尾空格避免无效路径
string computerName = txtNetworkComputer.Text.Trim();

// 先验证输入，避免空值导致路径错误
if (string.IsNullOrEmpty(computerName))
{
    MessageBox.Show("请输入网络计算机名称！");
    return;
}

// 动态构建源路径和目标路径
string sourcePath = $@"\\{computerName}\mall\Productionx64\productdesigner.cfg";
string targetPath = $@"c:\mall\{computerName}_productdesingner.cfg";

// 执行复制操作
File.Copy(sourcePath, targetPath, true);

VB.NET 示例 #

如果是用VB.NET开发，同样可以用字符串插值或者传统的&运算符拼接路径：

' 获取文本框中的计算机名称，去除首尾空格
Dim computerName As String = txtNetworkComputer.Text.Trim()

' 验证输入有效性，防止空值引发异常
If String.IsNullOrEmpty(computerName) Then
    MessageBox.Show("请输入网络计算机名称！")
    Return
End If

' 动态构建路径（这里用字符串插值，也可以用"\\ " & computerName & "\mall\Productionx64\productdesigner.cfg"）
Dim sourcePath As String = $"\\{computerName}\mall\Productionx64\productdesigner.cfg"
Dim targetPath As String = $"c:\mall\{computerName}_productdesingner.cfg"

' 执行复制操作
File.Copy(sourcePath, targetPath, True)

重要注意事项 #

• 一定要验证文本框输入：空值、非法字符（比如/\:*?"<>|）都会导致路径无效，引发IO异常，建议在复制前做输入检查。
• 确保程序有足够的权限访问网络共享路径和本地目标文件夹，否则会抛出权限不足的异常。

内容的提问来源于stack exchange，提问作者Jeffrey Roccaforte