国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > .NET > 正文

.Net語言Smobiler開發之如何仿微信朋友圈的消息樣式

2024-07-10 12:46:39
字體:
來源:轉載
供稿:網友

最前面的話:Smobiler是一個在VS環境中使用.Net語言來開發APP的開發平臺,也許比Xamarin更方便

一、目標樣式

我們要實現上圖中的效果,需要如下的操作:

1.從工具欄上的”Smobiler Components”拖動一個MicroBlog控件到窗體界面上

2.用代碼添加手機界面上顯示的內容

Load事件代碼:

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 TryEnd 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());  } } 

其他代碼:
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 NextEnd 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);  } }            
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 霸州市| 邵武市| 红桥区| 临朐县| 上林县| 凤庆县| 科技| 孝昌县| 南宁市| 石城县| 余姚市| 鲜城| 舞钢市| 高州市| 汉源县| 武穴市| 张家口市| 综艺| 石屏县| 马山县| 景洪市| 成安县| 五家渠市| 九龙县| 孟州市| 湟源县| 隆尧县| 沅江市| 灌阳县| 桐城市| 靖西县| 揭西县| 辰溪县| 唐海县| 白玉县| 桐梓县| 从化市| 固阳县| 彭州市| 乃东县| 金寨县|