Страница: 1 | 
		
		
			
	
		 
		
			
  
    |   | 
    
Вопрос: Конвертация с C# в VB.Net
     | 
    
Добавлено: 23.07.10 00:06
     | 
      | 
  
		
			
			  
    
      
Автор вопроса:   Westr
       | 
    
    
      
Здравствуйте!
 
Есть код написанный на C#, нужно его переконвертировать в VB.Net, проблема в этом участке:
 
if (mnuItem.Parent.GetType() == typeof(ContextMenu))
 
                    ((ContextMenu)mnuItem.Parent).Popup += MenuItem_Popup;
 
                else
 
                    ((MenuItem)mnuItem.Parent).Popup += MenuItem_Popup;
 
 
После конвертации в VB.Net получается вот это, вызывает ошибку с событием
 
 
    If mnuItem.Parent.[GetType]() Is GetType(ContextMenu) Then
 
                DirectCast(mnuItem.Parent, ContextMenu).Popup += MenuItem_Popup()
 
            Else
 
                DirectCast(mnuItem.Parent, MenuItem).Popup += MenuItem_Popup()
 
            End If
 
 
Вот весь код функции:
 
 
void AddVistaMenuItem(MenuItem mnuItem)
 
        {
 
            List<MenuItem> mnuBitmapChildren = (List<MenuItem>)menuParents[mnuItem.Parent.Handle];
 
            if (mnuBitmapChildren == null)
 
            {
 
                if (mnuItem.Parent.GetType() == typeof(ContextMenu))
 
                    ((ContextMenu)mnuItem.Parent).Popup += MenuItem_Popup;
 
                else
 
                    ((MenuItem)mnuItem.Parent).Popup += MenuItem_Popup;
 
                SetMenuInfo(new HandleRef(null, mnuItem.Parent.Handle), mnuInfo);
 
                mnuBitmapChildren = new List<MenuItem> {mnuItem};
 
                menuParents[mnuItem.Parent.Handle] = mnuBitmapChildren;
 
            }
 
            else
 
            {
 
                mnuBitmapChildren.Add(mnuItem);
 
            }
 
        }
Ответить
        | 
    
  
		
			
		
		
			
		
	  
	  
    
      
Номер ответа: 2 Автор ответа:
   Westr
  
 
  Вопросов: 1 Ответов: 1 
       | 
      
 Профиль |  | #2
       | 
Добавлено:  23.07.10 21:24
       | 
    
    
      
Благодарен! Да примерно так
 
-  
 
- AddHandler DirectCast(mnuItem.Parent, ContextMenu).Popup, AddressOf MenuItem_Popup
  
  
Ответить
        | 
    
  
Страница: 1 | 
 
		
			Поиск по форуму