You could use the custom iProperties to act as "prompted entry properties". The rule below will check if a custom iProperty exists and is filled. if not it will ask for a value.
Dim promtedEntries As New List(Of String)
promtedEntries.Add("PromtedProperty1")
promtedEntries.Add("PromtedProperty2")
promtedEntries.Add("PromtedProperty3")
For Each entry As String In promtedEntries
Try
Dim entryValue As String = iProperties.Value("Custom", entry)
If (String.IsNullOrEmpty(entryValue)) Then
entryValue = InputBox(
"Plz give value for: " + entry, "None value found")
iProperties.Value("Custom", entry) = entryValue
End If
Catch ex As Exception
Dim entryValue As String = InputBox(
"Plz give value for: " + entry, "None value found")
iProperties.Value("Custom", entry) = entryValue
End Try
Next
Jelte de Jong
Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.

Blog: hjalte.nl - github.com