解决问题? [英] Resolution Issue?
问题描述
大家好.
首先,我要感谢迄今为止帮助过我的每个人.你们都真的在帮助我成为我想要成为的人.
没有这样的地方,我会迷路的.
反正.我一直在为房东开发一个租户数据库.他正在运行Windows XP,今天我设法去见他并将其安装在他的计算机上.一切正常(我很高兴,因为这是我第一次笑).
但是,我的问题是我的应用程序不在监视器屏幕的中间.
有人可以向我指出正确的解决方法.这是我唯一的问题,之后我可以将产品卖给他.
我再次非常感谢你们每个人的帮助.
Hi guys.
First of all I want to thank everyone who has helped me out so far. You are all really helping me become the person I want to be.
Without places like this I would be lost.
Anyway. I have been developing a tenant database for a landlord. He is running windows XP and I managed to go see him today and install it on his computer. Everything worked fine (which I was happy about as it was my first time lol).
My issue however, is that my application is half way off the monitor screen.
Could someone please point me in the right direction on how to fix this. Its my only issue and after this I can sell my product to him.
Once again I am really grateful for each and every one of you for helping me.
推荐答案
Castorix31,您好
Hi Castorix31,
请您原谅我.我会在这方面做得更好.哈哈
我在VB中启动了Windows窗体应用程序.这是我的主要表单的代码,这也是在监视器上被切断的表单.
我没有添加任何控制大小或比例的代码.我只是使表格出现在中间.其他我还没有尝试过的东西,因为我不确定该怎么做.
那有什么原因导致我发生这种情况.
我先在虚拟盒子里测试过,一切都很好.
感谢您的链接,我将仔细阅读它.任何进一步的帮助都将是很棒的.
感谢您抽出宝贵的时间来帮助我.
Please forgive me for not being more specific. I will get better at this. lol
I started a windows forms application in VB. Here is the code for my main form which is also the form that is being cut off on the monitor.
I have not added any code that controls size or scale. I just made the form appear in center. Other that that I have not attempted anything as I am not sure yet as what to do.
So is there any reason why I have caused this to happen.
I tested in a virtual box first and all was well.
Thanks for the link, I will read through it carefully. Any further help would be fantastic.
I appreciate you taking the time to help me.
Public Class Form3
Private Sub Form3_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'TODO: This line of code loads data into the 'TenantDatabase1DataSet.TenantTable' table. You can move, or remove it, as needed.
Me.TenantTableTableAdapter.Fill(Me.TenantDatabase1DataSet.TenantTable)
End Sub
Private Sub TenantTableDataGridView_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles TenantTableDataGridView.CellContentClick
End Sub
Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
If First_NameTextBox.Text = Nothing Then
First_NameTextBox.Text = "unknown"
End If
Me.Validate()
Me.TenantTableBindingSource.EndEdit()
Me.TableAdapterManager.UpdateAll(Me.TenantDatabase1DataSet)
Me.TenantTableTableAdapter.Fill(Me.TenantDatabase1DataSet.TenantTable)
MessageBox.Show("Tenant Data Saved", "Data Saved", MessageBoxButtons.OK)
End Sub
Private Sub btnNewTenant_Click(sender As Object, e As EventArgs) Handles btnNewTenant.Click
Try
TenantTableBindingSource.AddNew()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
Private Sub btnDelete_Click(sender As Object, e As EventArgs) Handles btnDelete.Click
Select Case MsgBox("Are you sure you want to delete tenant", MsgBoxStyle.YesNo, "Are you sure")
Case MsgBoxResult.Yes
Try
TenantTableBindingSource.RemoveCurrent()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
Case MsgBoxResult.No
''nothing
End Select
End Sub
Private Sub btnExit_Click(sender As Object, e As EventArgs) Handles btnExit.Click
Application.Exit()
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
TenantTableBindingSource.MovePrevious()
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
TenantTableBindingSource.MoveNext()
End Sub
End Class
这篇关于解决问题?的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!