0

本題に入る:

Function Create(ByVal network, ByVal location, ByVal type, ByVal requirement1, ByVal requirement2, ByVal requirement3, ByVal name)
    Dim net As String = network
    Dim loc As String = location
    Dim typ As String = type
    Dim nam As String = name
    Dim req1 As String = requirement1
    Dim req2 As String = requirement2
    Dim req3 As String = requirement3
    Dim Mission As New System.IO.StreamWriter("C:\" & nam & ".txt")
    Mission.WriteLine("Name: " & net)
    Mission.WriteLine("Network: " & net)
    Mission.WriteLine("Location: " & loc)
    Mission.WriteLine("Type: " & typ)
    Mission.WriteLine("Requirement: " & req1)
    Mission.WriteLine("Requirement: " & req2)
    Mission.WriteLine("Requirement: " & req3)
    Mission.Close()
    Console.WriteLine("Written")
    System.Threading.Thread.Sleep(3000)
End Function

エラーは表示されませんが、ファイルパス内のファイルも表示されません。関数を呼び出すときにすべて宣言しているので、問題ではないことがわかります。ヘルプ?:)

4

1 に答える 1

0
Sub Create(ByVal network As String, ByVal location As String, 
    ByVal type As String, ByVal requirement1 As String, 
    ByVal requirement2 As String, ByVal requirement3 As String,
    ByVal name As String)

    Dim net As String = network
    Dim loc As String = location
    Dim typ As String = type
    Dim nam As String = name
    Dim req1 As String = requirement1
    Dim req2 As String = requirement2
    Dim req3 As String = requirement3
    If Not nam.EndsWith(".txt") Then
        nam &= ".txt"
    End If
    Dim Mission As New System.IO.StreamWriter(Path.Combine(
      System.Environment.GetFolderPath(
      System.Environment.SpecialFolder.Desktop), nam))
    Mission.WriteLine("Name: " & net)
    Mission.WriteLine("Network: " & net)
    Mission.WriteLine("Location: " & loc)
    Mission.WriteLine("Type: " & typ)
    Mission.WriteLine("Requirement: " & req1)
    Mission.WriteLine("Requirement: " & req2)
    Mission.WriteLine("Requirement: " & req3)
    Mission.Close()
    Console.WriteLine("Written")
    'System.Threading.Thread.Sleep(3000)
End Sub

まず第一に、あなたはパラメータをオブジェクトとして渡していました!!、第二に、管理者権限を持っていない限り、C ルート ディレクトリに保存する権限がありません。第三に、最後のスレッド部分は完全に役に立たず、UI をブロックし、ドン '何の利益にもなりません。
最後になりましたが、少なくとも。
幸運を

于 2012-08-27T05:52:16.880 に答える