NurseryManager-Project/TestProjectCreche/MySettingsPropertyTest.vb
Thoscellen c66626ff3a init
2020-05-16 17:38:46 +02:00

67 lines
1.9 KiB
VB.net
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

Imports Microsoft.VisualStudio.TestTools.UnitTesting
Imports ApplicationCrèche_1.My
'''<summary>
'''Classe de test pour MySettingsPropertyTest, destinée à contenir tous
'''les tests unitaires MySettingsPropertyTest
'''</summary>
<TestClass()> _
Public Class MySettingsPropertyTest
Private testContextInstance As TestContext
'''<summary>
'''Obtient ou définit le contexte de test qui fournit
'''des informations sur la série de tests active ainsi que ses fonctionnalités.
'''</summary>
Public Property TestContext() As TestContext
Get
Return testContextInstance
End Get
Set(value As TestContext)
testContextInstance = Value
End Set
End Property
#Region "Attributs de tests supplémentaires"
'
'Vous pouvez utiliser les attributs supplémentaires suivants lorsque vous écrivez vos tests :
'
'Utilisez ClassInitialize pour exécuter du code avant d'exécuter le premier test dans la classe
'<ClassInitialize()> _
'Public Shared Sub MyClassInitialize(ByVal testContext As TestContext)
'End Sub
'
'Utilisez ClassCleanup pour exécuter du code après que tous les tests ont été exécutés dans une classe
'<ClassCleanup()> _
'Public Shared Sub MyClassCleanup()
'End Sub
'
'Utilisez TestInitialize pour exécuter du code avant d'exécuter chaque test
'<TestInitialize()> _
'Public Sub MyTestInitialize()
'End Sub
'
'Utilisez TestCleanup pour exécuter du code après que chaque test a été exécuté
'<TestCleanup()> _
'Public Sub MyTestCleanup()
'End Sub
'
#End Region
'''<summary>
'''Test pour Settings
'''</summary>
<TestMethod()> _
Public Sub SettingsTest()
Dim actual As MySettings
actual = MySettingsProperty.Settings
Assert.Inconclusive("Vérifiez l'exactitude de cette méthode de test.")
End Sub
End Class