Detailed graphic explanation of how to imitate the message style of WeChat Moments in .Net language Smobiler development

This article mainly introduces how the .Net language Smobiler development platform can imitate the message style of WeChat Moments? This article reveals the answer for everyone

The first words: Smobiler is a development platform that uses .Net language to develop APP in the VS environment. It may be more convenient than Xamarin

1. Goal Style

To achieve the effect in the picture above, we need the following operations:

1. From the "Smobiler Components" on the toolbar Drag a MicroBlog control onto the form interface

2. Use code to add the content displayed on the mobile phone interface

Load event code:

VB:

 Private Sub TestMicroBlog_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  Try
   Me.MicroBlog1.DefaultUserName = "伟斌"
   Me.MicroBlog1.DefaultUserID = "伟斌"

   contentArray(0) = "把青春献给身后那座"+ vbCrLf + "辉煌的城市" + vbCrLf + "为了这个美梦" + vbCrLf + "我们付出着代价"
   
   userarray(0) = "伟斌"

   picturearray(0) = 0

   InitialMicroBlogData()

  Catch ex As Exception
   MessageBox.Show(ex.Message, Sub() Me.Close())
  End Try
End Sub C#：
 private void TestMicroBlog_Load(object sender, EventArgs e)
 {
  try
  {
   this.MicroBlog1.DefaultUserName = "伟斌";
   this.MicroBlog1.DefaultUserID = "伟斌";

   contentArray[0] = "把青春献给身后那座" + System.Environment.NewLine + "辉煌的城市" + System.Environment.NewLine + "为了这个美梦"+ System.Environment.NewLine + "我们付出着代价";
   
   userarray[0] = "伟斌";

   picturearray[0] = "0";

   InitialMicroBlogData();
  }
  catch (Exception ex)
  {
   MessageBox.Show(ex.Message, (Object s, MessageBoxHandlerArgs args) => this.Close());
  }
 }

Other codes:
VB:

##

 Dim contentArray(4) As String
 Dim userarray(4) As String
 Dim picturearray(8) As String
 Dim voice(5) As String
 Private Sub InitialMicroBlogData(Optional count As Integer = 10, Optional ByVal insert As Boolean = False)
  Dim user As String = userarray(0)
  Dim picturerandomnum As Integer = 6
  Dim imageList As New List(Of String)
  imageList.Add(6)
  
  Dim item As New MicroBlogItem(user, user, contentArray(0), DateTime.Now.ToString)
  item.Pictures = imageList
  item.ILikes.Add(userarray(0), userarray(0))
  If insert = False Then
    Me.MicroBlog1.BlogItems.Add(item)
  Else
    Me.MicroBlog1.BlogItems.AddTop(item)
  End If
 Next
End Sub C#：
 string[] contentArray = new string[5];
 string[] userarray = new string[5];
 string[] picturearray new string[9];
 string[] voice = new string[6];
 private void InitialMicroBlogData(int count = 10, bool insert = false)
 {
  string user = userarray[0];
  List<string> imageList = new List<string>();
  imageList.Add("6");    
  MicroBlogItem item = new MicroBlogItem(user, user, contentArray[0], DateTime.Now.ToString());
  item.Pictures = imageList;
  item.ILikes.Add(userarray[0], userarray[0]);
  if (insert == false)
  {
    this.MicroBlog1.BlogItems.Add(item);
  }
  else
    this.MicroBlog1.BlogItems.AddTop(item);
  }
 }

2. Mobile phone effect display

##

The above is the detailed content of Detailed graphic explanation of how to imitate the message style of WeChat Moments in .Net language Smobiler development. For more information, please follow other related articles on the PHP Chinese website!