' Timelineの表示
Dim tl As New TimelineAPI
Dim statuses As List(Of Status) = tl.HomeTimeline(oauth)
For Each status As Status In statuses
	Console.WriteLine(status.User.Name)
	Console.WriteLine(status.Text)
	Console.WriteLine("")
Next
 

// Timelineの表示
TimelineAPI tl = new TimelineAPI();
List<Status> statuses = tl.HomeTimeline(oauth);
foreach (Status status in statuses)
{
	Console.WriteLine(status.User.Name);
	Console.WriteLine(status.Text);
	Console.WriteLine("");
}
 

' 非同期でTimeline()
' イベント登録
AddHandler Utility.DownloadCompleted, AddressOf Download_Completed
Dim tl As New TimelineAPI
tl.HomeTimelineAsync(oauth)
 
' 非同期キャンセル
'Utility.CancelAsync()
 
'イベント
Private Sub Download_Completed(ByVal sender As Object, ByVal e As TwitterEventArgs)
	If e.Cancelled Then
		Console.WriteLine("キャンセルされました。")
	ElseIf Not (e.Error Is Nothing) Then
		Console.WriteLine("エラー:{0}", e.Error.Message)
	Else
		Console.WriteLine("非同期")
        For Each result As Object In e.ResultObject
            If TypeOf result Is Status Then
                Console.WriteLine(result.User.Name)
                Console.WriteLine(result.Text)
                Console.WriteLine("")
            End If
        Next
    End If
End Sub
 

// 非同期でTimeline()
// イベント登録
Utility.DownloadCompleted += new Utility.TwitterEventHandler(Utility_DownloadCompleted);
TimelineAPI tl = new TimelineAPI();
tl.HomeTimelineAsync(oauth);
 
// 非同期キャンセル
//Utility.CancelAsync();
 
//イベント
static void Utility_DownloadCompleted(object sender, TwitterEventArgs e)
{
	if (e.Cancelled)
	{
		Console.WriteLine("キャンセルされました。");
	}
	else if (e.Error != null)
	{
		Console.WriteLine("エラー:{0}", e.Error.Message);
	}
	else
	{
        Console.WriteLine("非同期");
        if (e.ResultObject.GetType() == typeof(List<object>))
        {
            foreach (var result in (List<object>)e.ResultObject)
            {
                if (result.GetType() == typeof(Status))
                {
                    Console.WriteLine(((Status)result).User.Name);
                    Console.WriteLine((result as Status).Text);
                    Console.WriteLine("");
                }
            }
        }
    }
}
 

' Tweet
Dim tw As New TweetsAPI
Dim update As Status = tw.Update(oauth, "つぶやき")
Console.WriteLine("Tweet:" + update.Text)
 

// Tweet
TweetsAPI tw = new TweetsAPI();
Status update = tw.Update(oauth, "つぶやき");
Console.WriteLine("Tweet:" + update.Text);