Dim i As Intent
i.Initialize(i.ACTION_MAIN, "")
i.SetType("vnd.android-dir/mms-sms")
i.SetComponent("com.android.mms.ui.ConversationList")
StartActivity(i)
This code works correctly for all default devices. For Samsung Galaxy the SetComponent change to
"com.android.mms.ui.ConversationComposer"
However, I do not think that works on all devices. I solved it on my device anyway