Visual Basic编程题解

题目： 请编写一个Visual Basic程序，实现以下功能：用户输入一个正整数n，程序输出1~n之间所有能被3整除但不能被5整除的数，每个数之间用逗号分隔。

解答：

```vb

Module Module1

Sub Main()

Dim n As Integer

Console.Write("请输入一个正整数n：")

n = Console.ReadLine()

Console.Write("满足条件的数有：")

Dim output As String = ""

For i As Integer = 1 To n

If i Mod 3 = 0 And i Mod 5 <> 0 Then

output = i.ToString() ","

End If

Next

If output = "" Then

Console.WriteLine("无满足条件的数。")

Else

Console.WriteLine(output.TrimEnd(","))

End If

Console.ReadLine()

End Sub

End Module

```

通过以上的Visual Basic程序，用户可以输入一个正整数n，程序将输出所有1~n之间能被3整除但不能被5整除的数，符合条件的数之间用逗号分隔。如果没有符合条件的数，则输出"无满足条件的数"。

希望以上解答对您有帮助，若有任何疑问，请随时向我提问。