在VB中可以使用依赖注入框架，比如.NET Core中的内置依赖注入容器。下面是一个简单的示例，演示如何使用依赖注入框架创建可测试和可维护的代码：
1.在你的项目中添加Microsoft.Extensions.DependencyInjection NuGet包。
2.在你的应用程序入口点（如Main()方法）中，创建一个IServiceCollection实例并配置所需的服务。例如：
Dim services As New ServiceCollection()
services.AddTransient(Of IMyService, MyServiceImplementation)()
3.在你的应用程序的核心业务逻辑类中，在构造函数中注入所需的服务。例如：
Public Class MyBusinessLogic
Private ReadOnly _myService As IMyService
Public Sub New(myService As IMyService)
_myService = myService
End Sub
' ... 其他方法 ...
End Class
4.在你的测试代码中，使用IServiceProvider和IServiceScopeFactory来创建测试中所需的服务实例。例如：
Dim services As New ServiceCollection()
services.AddTransient(Of IMyService, MyServiceTestingImplementation)()
Dim serviceProvider As IServiceProvider = services.BuildServiceProvider()
Dim scopeFactory As IServiceScopeFactory = serviceProvider.GetService(Of IServiceScopeFactory)()
Using scope As IServiceScope = scopeFactory.CreateScope()
Dim myBusinessLogic As MyBusinessLogic = scope.ServiceProvider.GetService(Of MyBusinessLogic)()
' ... 用myBusinessLogic进行测试 ...
End Using
希望这个例子可以帮助你开始使用依赖注入框架编写可测试和可维护的代码。