Warning: file_get_contents(/data/phpspider/zhask/data//catemap/3/sql-server-2005/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
如果我的VB.net应用程序无法运行combox列表索引中的内容,我就无法让它退出_Vb.net - Fatal编程技术网

如果我的VB.net应用程序无法运行combox列表索引中的内容,我就无法让它退出

如果我的VB.net应用程序无法运行combox列表索引中的内容,我就无法让它退出,vb.net,Vb.net,下面是我自己制作的程序的代码片段,当进度条达到100%时,我无法让程序退出;检查组合框中选定的索引中是否有要运行的有效文件后 Private Sub CheckIfRunning() p = Process.GetProcessesByName(ComboBox1.SelectedIndex = TabIndex) If p.Count > 0 Then ' Process is running Else Dim did

下面是我自己制作的程序的代码片段,当进度条达到100%时,我无法让程序退出;检查组合框中选定的索引中是否有要运行的有效文件后

Private Sub CheckIfRunning()
    p = Process.GetProcessesByName(ComboBox1.SelectedIndex = TabIndex)
    If p.Count > 0 Then
        ' Process is running
        Else
           Dim did_an_oopsie As DialogResult = Form3.ShowDialog
           If did_an_oopsie = Form3.ProgressBar1.Value = 100 Then
               Close()
           End If
           Try
               Process.Start(System.IO.Path.Combine(
         AppDomain.CurrentDomain.BaseDirectory,ComboBox1.SelectedIndex = TabIndex))
            Catch ex As Exception
            End Try
    End If
End Sub

Form3.ShowDialog的返回值是多少?1这可能与手头的问题无关,但您确实意识到ComboBox1.SelectedIndex=TabIndex返回的是布尔值,而不是字符串,对吗?2永远不要接受异常,尤其是在调试问题时。这毫无意义:如果did_an_oopsie=Form3.ProgressBar1.Value=100,那么。oopsie是否为DialogResult类型,那么将其与DialogResult值以外的任何值进行比较有何意义?您应该首先打开Option Strict并修复它标记的所有错误。然后,你需要考虑你实际上试图用那一行代码来实现什么。不管它是什么,你都不能用那个代码实现它。Form3是什么?为什么要从中获取DialogResult?请打开选项Strict。这是一个由两部分组成的过程。首先,对于当前项目-在解决方案资源管理器中双击“我的项目”。选择左边的Compile。在“选项严格”下拉列表中,选择“启用”。第二,对于未来的项目-进入工具菜单->选项->项目和解决方案->VB默认值。在“选项严格”下拉列表中,选择“启用”。这将使您在运行时避免出现bug。首先执行此操作,然后再次查看代码。修复它显示的任何错误并重新发布代码。