用户第一次打开项目时，在连接外部数据源之前，会先弹出一个InputValue的对话框要求用户先输入网络类型是外网使用还是内网使用，会出现下面的问题
此主题相关图片如下：网络类型选择.png
如上图“正在打开文件请稍后“那个画面会挡在InputValue对话框的前面，如何让InputValue显示在最前面？
BeforeConnectOuterDataSource事件中用了如下代码
'---判断C盘根目录下是否有网类型络配置文件,0为内网使用;1为外网使用
Dim netFile As String = "C:\Net.txt"
If Filesys.FileExists(netFile) = False Then
Dim Val As Integer
InputValue(Val, "网络类型","请正确输入网络类型,只能输入0或1,0为内网使用;1为外网使用") '输入数值
If Val = 0 OrElse Val = 1 Then
FileSys.WriteAllText("C:\Net.txt", Val , True)
Else
MessageBox.Show("必须正确指定网络类型,请重新打开系统后再试,0为内网,1为外网!","提示")
System.Diagnostics.Process.GetProcessesByName("Newsource")(0).Kill '直接结束进程退出
End If
End If
谢谢！
加好友 
发短信
Post By：2016/1/18 9:40:00 [显示全部帖子]
