Advertisement

02.23.2008 at 09:32PM PST, ID: 23188059
[x]
Attachment Details
[x]
The Solution Rating System

With so many solutions, how can you tell which solutions are most likely to help you and which ones are not? To provide you with a tool to use, we rate our solutions based on various elements that most accurately determine if a solution is a quality solution. To explain what factors affect the solution rating, here are the elements we take into consideration when formulating our solution rating.

  • The Grade of the Solution
  • The Zone Rank of the Expert Providing the Solution
  • The Number of Author and Expert Comments
  • The Number of Experts Contributing
  • The Feedback of the Community

Your Input Matters
Because of the way the system is set up, the most important variable in this equation is you. As a member of Experts Exchange, you are able to cast your vote on the quality of the solutions in regard to how complete, accurate, helpful and easy to understand each solution is. When you provide your feedback, each rating is adjusted accordingly. So, if you see a solution that has a poor rating that you think is a good solution, let us know by rating it. As you do, the rating will be adjusted and will become more accurate for other members of our site.

If you have any suggestions that you would like to make for our rating system, please ask a question in the Suggestions Zone of Community Support.

Thank you!
7.3

When debugging the Form1 and Fileopendialog both appear and Form1 reappears at then end of the sub.

Asked by isischen in Microsoft Visual Basic.Net, .Net Editors & IDEs, Microsoft Visual Studio Express

Tags: , ,

I have a button1 in Form1 and I have openfiledialog1 with Form1.  When debug have gone to the
     Private Sub Form1_Load(....)...etc.
Form1 pops up.
When I click the button1 on Form1
debugging takes me to
     Private Sub Button1_click(...)...ect.
And, when ' If Me.OpenFileDialog1.showDialog()=DialogResult.of then ' is executed
Openfiledialog form pops up.
After I selected a file and gone down the line of code with the debugging process and reached to the end of Private Sub Button1_click()
Form1 showed up again and also the program freezes...

Please take a look at my program and let me know which lines cause the problems (or what code is missing and supply the correct code.)  

Thank you.
Start Free Trial 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:

Public Class Form1
    Public Sub New()
 
        ' This call is required by the Windows Form Designer.
        InitializeComponent()
 
        ' Add any initialization after the InitializeComponent() call.
    End Sub
    
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim wdapp = New Microsoft.Office.Interop.Word.Application()
        Try
            If Me.OpenFileDialog1.ShowDialog() = DialogResult.OK Then
                Dim filename = OpenFileDialog1.FileName
                Dim rdonly = False
                Dim isvisible = True
                Dim missing = System.Reflection.Missing.Value
                Dim adoc = New Microsoft.Office.Interop.Word.Document()
                wdapp.Visible = True
                adoc = wdapp.Documents.Open(filename, , rdonly, , , , , , , , , isvisible)
                adoc.Activate()
 
            End If
 
        Catch ex As Exception
 
            main(wdapp)
        End Try
    End Sub
[+][-]02.24.2008 at 07:50AM PST, ID: 20970254

View this solution now by starting your 7-day free trial. Setting up your free trial is quick, easy, and secure. We will return you to this solution, unlocked, when you're done.

 

About this solution

Zones: Microsoft Visual Basic.Net, .Net Editors & IDEs, Microsoft Visual Studio Express
Tags: microsoft, visual basic.net, 2008 express
Sign Up Now!
Solution Provided By: J1H1W1
Participating Experts: 1
Solution Grade: C
 
 
 
Loading Advertisement...
20080716-EE-VQP-32 / EE_QW_2_20070628