VB의 실버는

내가 윈도우 폰 7.5

위해 VB에서 응용 프로그램을 쓰고 있어요

하지만 몇 가지 버그가이

Imports System.IO 
Imports System.IO.TextReader 
Imports System.Xml 
Imports System.Windows.RoutedEventArgs 
Imports System.Windows.RoutedEvent 
Imports System.ComponentModel 
Imports System 
Imports System.Collections.Generic 
Imports System.Linq 
Imports System.Net 
Imports System.Windows 
Imports System.Windows.Controls 
Imports System.Windows.Documents 
Imports System.Windows.Input 
Imports System.Windows.Media 
Imports System.Windows.Media.Animation 
Imports System.Windows.Shapes 
Imports Microsoft.Phone.Tasks 
Imports System.Xml.Linq 
Imports System.Net.NetworkInformation 
Imports Microsoft.VisualBasic.CompilerService 

Partial Public Class MainPage 
    Inherits PhoneApplicationPage 

    Public Sub New() 
     InitializeComponent() 
    End Sub 

    Private Sub MainPage_Loaded(sender As Object, e As System.Windows.RoutedEventArgs)    Handles MyBase.Loaded 
     Final.Items.Clear() 
     If NetworkInterface.GetIsNetworkAvailable Then 
      Dim cl As New WebClient 
      AddHandler cl.DownloadStringCompleted, AddressOf cl_DownloadStringCompleted 
      cl.DownloadStringAsync(New Uri("http://web.com/xml.xml")) 
     Else 
      MessageBox.Show("check your internet connection") 
     End If 
    End Sub 


    Private Sub cl_DownloadStringCompleted(sender As Object, e As System.Net.DownloadStringCompletedEventArgs) 
     Dim doc = XDocument.Parse(e.Result) 
     Dim names = XDocument.Parse(e.Result) 
     Dim result_name = names.<Data>.<Entry> 
     For Each result In doc.<Data>.<Entry>.<tag> 
      Dim item As New ListBoxItem 
      item.Content = result.Value 
      AddHandler item.Tap, AddressOf ItemTap 
      Final.Items.Add(item) 
     Next 
    End Sub 

    Private Sub ItemTap(sender As Object, e As GestureEventArgs) 
     Dim lbi As New ListBoxItem 
     lbi = sender 
     Dim url As New Uri("/" & lbi.Content & ".xaml", UriKind.Relative) 
     Me.NavigationService.Navigate(url) 
    End Sub 

End Class

는 Dim url As New Uri("/" & lbi.Content & ".xaml", UriKind.Relative)

에서 버그를 발견하고 그것은에 말한다 보고 :

런타임 라이브러리가 요청 된 작업을 사용할 수 없습니다.function 'Microsoft.VisualBasic.CompilerServices.Operators.ConcatenateObject' 이 정의되지 않았습니다.

참고 : Private Sub ItemTap(ByRef sender As Object, e As GestureEventArgs)

이 오류가 사라지고 다른 나타납니다 :이에 ItemTap을 변경하고

방법 '개인 서브 ItemTap (발신자하는 ByRef 개체로, e As System.Windows.Input.GestureEventArgs) '대리자와 호환되는 서명이 없습니다. Subgate Sub EventHandler (Of ) (System.Windows.Input.GestureEventArgs) (보낸 사람 개체 , e As System.Windows.Input.GestureEventArgs) '로 시작됩니다. 라인에서

"AddHandler에 item.Tap, AddressOf를 ItemTap"나는이 하나가

어떤 아이디어 왜? 감사합니다.

출처

2012-05-13 Dimitris Sapikas

두 개의 문자열과 하나의 개체를 결합하려고하는데이 작업을 수행 할 수 없습니다.

lbi.Content (오류가있는 행에 있음)이 TextBlock 인 것으로 의심되므로 코드에 "문자열, TextBlock 및 문자열을 함께 연결합니다."라고 표시됩니다.
TextBlock에 표시된 텍스트를 원한다고 생각합니다. 따라서 적절하게 캐스트하십시오.

"/" & DirectCast(lbi.Content, TextBlock).Text & ".xaml"

출처

2012-05-14 08:39:26

VB의 실버는

답변

관련 문제