Red de conocimiento informático - Material del sitio web - En VB, quiero diseñar un programa que pueda mostrar el tamaño total de la memoria física disponible de la computadora. ¿Qué debo hacer? Utilice la función API GlobalMemoryStatus en VB6. La declaración de la función es la siguiente: Tipo público MEMORYSTATUSdwLength As LongdwMemoryLoad As LongdwTotalPhys As LongdwAvailPhys As LongdwTotalPageFile As LongdwAvailPageFile As LongdwTotalVirtual As LongdwAvailVirtualAs LongEnd TypePublic Declare Sub GlobalMemo. rySt atus Lib Lib "kernel32" Alias ​​​​"GlobalMemoryStatus" (ByRef lpBuffer As MEMORYSTATUS) Memoria atenuada como nueva MEMORYSTATUS memoria.dwLength = Len(memoria) GlobalMemoryStatus(memoria) tb.Text = tb.Text amp "Memoria física total disponible:" amp; amp; "Byte" amp; vbCrLf tb.Text = tb.Text amp; "Memoria virtual total disponible:" amp vbCrLf tb.Text = tb. ; "Memoria física disponible total:" " & My.Computer.Info.AvailablePhysicalMemory & " Byte " & vbCrLf tb.Text = tb.Text & "Memoria virtual disponible: " & My.Computer.Info.AvailablePhysicalMemory & " Byte " & vbCrLfamp; "Memoria virtual total disponible:" amp; My.Computer.Info.AvailableVirtualMemory amp; "Byte" amp; vbCrLf tb.Text = tb.Text amp; TotalPhysicalMemory amp; "Byte" amp; vbCrLfInfo.TotalPhysicalMemory amp; "Byte" amp; vbCrLf tb.Text = tb.Text amp "Memoria virtual actual total:" amp; ; vbCrLf tb.Text = tb.Text amp; "Memoria virtual actual total:" a

En VB, quiero diseñar un programa que pueda mostrar el tamaño total de la memoria física disponible de la computadora. ¿Qué debo hacer? Utilice la función API GlobalMemoryStatus en VB6. La declaración de la función es la siguiente: Tipo público MEMORYSTATUSdwLength As LongdwMemoryLoad As LongdwTotalPhys As LongdwAvailPhys As LongdwTotalPageFile As LongdwAvailPageFile As LongdwTotalVirtual As LongdwAvailVirtualAs LongEnd TypePublic Declare Sub GlobalMemo. rySt atus Lib Lib "kernel32" Alias ​​​​"GlobalMemoryStatus" (ByRef lpBuffer As MEMORYSTATUS) Memoria atenuada como nueva MEMORYSTATUS memoria.dwLength = Len(memoria) GlobalMemoryStatus(memoria) tb.Text = tb.Text amp "Memoria física total disponible:" amp; amp; "Byte" amp; vbCrLf tb.Text = tb.Text amp; "Memoria virtual total disponible:" amp vbCrLf tb.Text = tb. ; "Memoria física disponible total:" " & My.Computer.Info.AvailablePhysicalMemory & " Byte " & vbCrLf tb.Text = tb.Text & "Memoria virtual disponible: " & My.Computer.Info.AvailablePhysicalMemory & " Byte " & vbCrLfamp; "Memoria virtual total disponible:" amp; My.Computer.Info.AvailableVirtualMemory amp; "Byte" amp; vbCrLf tb.Text = tb.Text amp; TotalPhysicalMemory amp; "Byte" amp; vbCrLfInfo.TotalPhysicalMemory amp; "Byte" amp; vbCrLf tb.Text = tb.Text amp "Memoria virtual actual total:" amp; ; vbCrLf tb.Text = tb.Text amp; "Memoria virtual actual total:" a

mp; Mi.Computer.Info.TotalVirtualMemory amp; "Byte" amp;